mcs/btests/ConcatenationOperatorC1.vb

   1 ' BC30201: Expression expected\r
   2 \r
   3 Imports System\r
   4 \r
   5 Module ConcatenationOperatorC1\r
   6     Sub main()\r
   7         Dim a As String = "Hello "\r
   8         Dim b As String = "World"\r
   9 \r
  10         Dim c As String\r
  11         c = a & \r
  12 \r
  13         c = & b\r
  14 \r
  15         c = a & b\r
  16         If c <> "Hello World" Then\r
  17             Console.WriteLine("#A1-Concatenation Failed")\r
  18         End If\r
  19     End Sub\r
  20 \r
  21 End Module