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