您所在位置：主题：请教下：这个程序中通信的output值是多少。
云顶晓风
[专家分：0] 发布于 2011-11-26 10:49:00
请教下，这个程序，最后sarr的值是多少呢？请指教，非常感谢。
Dim sArr() As Byte
ReDim sArr(0 To 15)
tmpStr = "0D020300164D4541533A534C49503F0A"
For i = 0 To 15
猀Arr(i) = Val("&H" & Mid(tmpStr, i * 2 + 1, 2))
一攀砀琀 i
MSComm2.Output = sArr
Dim sArr() As Byte
ReDim sArr(0 To 15)
tmpStr = "0D020300164D4541533A534C49503F0A"
For i = 0 To 15
猀Arr(i) = Val("&H" & Mid(tmpStr, i * 2 + 1, 2))
一攀砀琀 i
MSComm2.Output = sArr