|
发表于 2010-11-17 21:06:24
|
显示全部楼层
本帖最后由 yu4241 于 2010-11-17 21:05 编辑
If Len(TxtSend) Mod 2 = 0 And Len(TxtSend) <> 0 Then '检验16进制字符串长
ReDim sj(Len(sj_Txt) / 2 - 1)
For i = 0 To Len(sj_Txt) - 1 Step 2
sj(i / 2) = Val("&H" & Mid(sj_Txt, i + 1, 2))
Next
想问一哈,好多都是 /2为什么要是2 |
|