如何把String 一个byte一个byte的读出来?

Question

比如 "阿啊"
就是 176,162,176,161我最后想要得到 176+172*256+176*256^2+161*256^3
就是这个4字节的数
如果可以跳过一个一个分解就更快更好了 

Answer 1

你的 176+172*256...     172从哪来的，呵呵，是176吧其实很简单，看下面的代码：
Dim ByteData() As Byte,LongData As long,TempStr As String
ByteData = StrConv("阿啊", vbFromUnicode)
TempStr=""
For X=Lbound(ByteData) to Ubound(ByteData)
TempStr=TempStr & HEX(ByteData(X))
Next X 
LongData=int("&H" & TempStr)