Dim s1 As String = "abc"
Dim s2 As String
s2 = s1.ToUpper()

执行后，s2的值将等于“ABC”。