如何在字符和ASCII码之间转换

Question

dim aa() as byteaa=strconv(str,vbfromunicode)

Answer 1

“vb把汉字认为只占一个字节”是错误的。
VB使用Unicode，认为任何字符都占两字节。
只要转化就可以解决。

Answer 2

to:wgku(云霄)
 我要汉字的ASCII码转换为汉字,这个ASCII码来自asc()函数

Answer 3

Dim TempBytes() As ByteTempBytes=StrConv(……,vbFromUniCode)ASCII码就储存在TempBytes这个Byte型数组中

Answer 4

dim ch3 as string
Ch3 = Hex(Asc(UserName))'这里只可以去一个汉字或字符
Ch = Mid(Ch3, 1, 2)
M = CInt("&H" + Ch)
If M >= &HA1 Then'说明是汉字