在進行103規約軟體撰寫的時候，遇到要上傳以ASCII8位碼表示中文字串的部分。
簡而言之如“遙信”，翻譯為ASCII8位碼就為D2 A3 D0 C5；應該是用的936表把，或者是UTF16碼？這個概念我也亂亂的。
那么從“遙信”到D2 A3 D0 C5如何轉化呢？同樣在決議一端，怎么決議出來呢。
在網上有找到幾個解決方案，但都沒成功。比較急切，趕忙請教大家，求助~~~~
uj5u.com熱心網友回復：
Option Explicit
Sub Main()
Dim s As String
Dim a() As Byte
Dim i As Long
s = "遙信"
'轉換只需要這一句'
'如果只在中文系統下運行，可以省略引數 &H804'
a = StrConv(s, vbFromUnicode, &H804) 'Chinese (PRC)
For i = 0 To UBound(a)
If i <> 0 Then Debug.Print "-";
Debug.Print Right$("0" & Hex(a(i)), 2);
Next
Debug.Print
End Sub
D2-A3-D0-C5
uj5u.com熱心網友回復：
這個就是gb編碼，asc取出來的也行，如果要取unicode編碼，要用ascw
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/73751.html
標籤：VB基礎類