RosettaCodeData/Task/String-case/BASIC/string-case-8.basic

9 lines
134 B
Text
Raw Normal View History

2014-01-17 05:32:22 +00:00
' Define 's'
Dim s AS String = "alphaBETA"
' Change 's' to Upper Case.
s = s.ToUpper()
' Change 's' to Lower Case.
s = s.ToLower()