Declare Function WStr Overload ( ByVal n As Byte ) As WString
Declare Function WStr ( ByVal n As UByte ) As WString
Declare Function WStr ( ByVal n As Short ) As WString
Declare Function WStr ( ByVal n As UShort ) As WString
Declare Function WStr ( ByVal n As Integer ) As WString
Declare Function WStr ( ByVal n As UInteger ) As WString
Declare Function WStr ( ByVal n As LongInt ) As WString
Declare Function WStr ( ByVal n As ULongInt ) As WString
Declare Function WStr ( ByVal n As Single ) As WString
Declare Function WStr ( ByVal n As Double ) As WString
Declare Function WStr ( ByRef str As Const String ) As WString
Declare Function WStr ( ByVal str As Const WString Ptr ) As WString

result = WStr( number )

or

result = WStr( string )

number
string

返回数字或字符串表达式的宽字符表示形式。

WStr将数字变量转换为宽字符字符串表示形式。相当于Str的宽字符。

WStr也将ASCII字符串转换为Unicode字符串。如果给出了一个宽字符串，则该字符串将不会被修改。

#if defined( __FB_WIN32__ )
#include "windows.bi"
#endif

Dim zs As ZString * 20
Dim ws As WString * 20

zs = "你好，世界"
ws = WStr(zs)

#if defined( __FB_WIN32__ )

MessageBox(null, ws, WStr("Unicode'Hello World'"), MB_OK Or MB_ICONINFORMATION)

#else

Print ws
Print WStr("Unicode'Hello World'")

#endif

• DOS不支持WStr.
  
  
  

• 在-lang qb 方言中不可用，除非使用别名__Wstr引用。
  
  

• 新的FreeBASIC
  
  

• Str
  
• WString