Question on CASE

Is this acceptable syntax:
case(t$)
"toy":
showmessage("");
"boy":
showmessage("");
end;
In otherwords, can you use strings as case members? If so, It's not working for me.
case(t$)
"toy":
showmessage("");
"boy":
showmessage("");
end;
In otherwords, can you use strings as case members? If so, It's not working for me.