mcs/btests/StringLiterals.vb

   1 Module StringLiterals\r
   2     Sub main()\r
   3         Dim s As String\r
   4         s = "x"\r
   5 \r
   6         Dim a As String = "xyz"\r
   7         a = "xyz1"\r
   8 \r
   9         If a = "xyz1" Then\r
  10         End If\r
  11 \r
  12         'Escaped " mark\r
  13         ' each "" represents a single " in a string\r
  14         a = ("a""b""")\r
  15 \r
  16         Dim x As String = "hi"\r
  17         Dim y As String = "hi"\r
  18 \r
  19         If Not x Is y Then\r
  20             Throw New System.Exception("x and y are different instances")\r
  21         End If\r
  22     End Sub\r
  23 End Module\r