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

a$ ="alphaBETA"

print a$           '=> alphaBETA
print upper$(a$)   '=> ALPHABETA
print lower$(a$)   '=> alphabeta
September Morn Update 2019-09-12 10:33:56 -07:00			`a$ ="alphaBETA"`
Time for an 2014 update… 2014-01-17 05:32:22 +00:00
September Morn Update 2019-09-12 10:33:56 -07:00			`print a$ '=> alphaBETA`
			`print upper$(a$) '=> ALPHABETA`
			`print lower$(a$) '=> alphabeta`