mcs/btests/StringLiterals.vb

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