RosettaCodeData/Task/Unicode-strings/FreeBASIC/unicode-strings.basic

10 lines
219 B
Plaintext

' Define a Unicode string
Dim unicodeString As String
unicodeString = "こんにちは, 世界! 🌍"
' Print the Unicode string
Print unicodeString
' Wait for the user to press a key before closing the console
Sleep