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

4 lines
79 B
Text
Raw Normal View History

2014-01-17 05:32:22 +00:00
s$ = "alphaBETA"
upper$ = UCase(s$) ;uppercase
lower$ = LCase(s$) ;lowercase