RosettaCodeData/Task/String-case/PureBasic/string-case.basic

4 lines
79 B
Plaintext

s$ = "alphaBETA"
upper$ = UCase(s$) ;uppercase
lower$ = LCase(s$) ;lowercase