Option Strict On
Imports System
Class Tester
Public Shared Sub Main( )
Dim s1 As String = "abcd"
Dim s2 As String = "ABCD"
Dim s6 As String = s1
Console.WriteLine("s6 = s1: {0}", s6)
End Sub 'Main
End Class 'Tester
s6 = s1: abcd