String case: Difference between revisions

Line 1,429:
 
=={{header|FutureBasic}}==
<lang futurebasic>window 1
include "ConsoleWindow"
 
aCFStringRef s = @"alphaBETA"
dim as Str255 a
 
print as
a = "alphaBETA"
print ucase$(as)
print alcase(s)
 
print ucase$(a)
HandleEvents</lang>
fn lcase(a)
print a
</lang>
 
Output:
416

edits