Private Sub Command1_Click()MsgBox StrConv("金創(chuàng)藥", vbUnicode)MsgBox StrConv(StrConv("金創(chuàng)藥", vbUnicode), vbFromUnicode)End Sub第一個出現(xiàn)亂碼，第二個出現(xiàn) "金創(chuàng)。"這是為什么？我想知道怎樣才能得到金創(chuàng)藥的UNICODE！直接告訴我得到UNICODE的其他方法也行?。芑マD）那我知道金創(chuàng)藥的UNICODE是 D1 91 1B 52 6F 83我該如何用msgbox這條命令讓他顯示金創(chuàng)藥?
3 回答
慕婉清6462132
TA貢獻1804條經(jīng)驗 獲得超2個贊
舉例：
Dim B1(0 to 5) As Byte
'下面你就把這個字節(jié)數(shù)組填充為你要轉換的Unicode碼：D1 91 1B 52 6F 83
B1(0) = &HD1
B1(1) = &H91
B1(2) = &H1B
B1(3) = &H52
B1(4) = &H6F
B1(5) = &H83
Dim Str1 as String
Str1 = B1 '直接將字節(jié)數(shù)組賦值給字符串
Msgbox Str1 '彈出對話框顯示“金創(chuàng)藥”
- 3 回答
- 0 關注
- 1442 瀏覽
添加回答
舉報
0/150
提交
取消