Imports System
Imports System.Collections
Public Class MainClass
Shared Sub Main(ByVal args As String())
Dim s1 As String = "abcd"
Dim s2 As String = "ABCD"
' the String copy method
Dim s5 As String = String.Copy(s2)
Console.WriteLine("s5 copied from s2: {0}", s5)
' use the overloaded operator
Dim s6 As String = s5
Console.WriteLine("s6 = s5: {0}", s6)
End Sub
End Class
|