?chr(&HC7)
ヌ
?chr(&H7A)
z
?chr(&HD8)
リ
?chr(&H7D)
}
.
.
.
?chr(&HDF)
゚
?chr(&H75)
u

解决方案 »

  1.   

        Dim str As String
        Dim tmp As String
        Dim HexStr As String
        Dim i As Integer
        str = "GuangZhou"
        
        For i = 1 To Len(str)
            tmp = Mid(str, i, 1)
            HexStr = HexStr & Hex(Asc(tmp))
        Next i
        
        Debug.Print HexStr得到
    4775616E675A686F75 
    比较
    C77AD87DD6A2DF75看看有什么规律? 我一下看不出来