Imports System
Class Sample
Public Shared Sub Main()
Dim str1 As String = "abc"
Dim str2 As String = "xyz"
str2 = [String].Copy(str1)
Console.WriteLine("3) str1 = '{0}'", str1)
Console.WriteLine("4) str2 = '{0}'", str2)
End Sub
End Class