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