7 lines
103 B
Text
7 lines
103 B
Text
Public Sub Main()
|
|
Dim sString As String = "alphaBETA "
|
|
|
|
Print UCase(sString)
|
|
Print LCase(sString)
|
|
|
|
End
|