RosettaCodeData/Task/Literals-String/PureBasic/literals-string-2.basic

Select StringByteLength("X")
  Case 1
    Print("ASCII-mode;  Soo, Hello world!")
  Case 2
    Print("UNICODE-mode; Soo, 您好世界!")
EndSelect