vb 怎么将汉字转换成unicode

Question

将txt板中文字转换成unicode

Answer 1

Private Sub Command1_Click()
Dim a As String
a = Text1.Text
Print Hex(AscW(a))
End Sub
你在TEXT1.TEXT 输入文字单击Command1就得到unicode码

Answer 2

private sub command1_Click()
combo1.text=ascW(text2) '把"text2" 汉字 转换成 "combo1"unicode字符
End sub
注:是单个汉字转换 要批量字体转换在研究一下

Answer 3

TextExchange.exe本回答被提问者采纳

Answer 4

unicode码:

Print Hex(ascw("好"))

Answer 5

MARK