Question

VB中MSComm控件怎么一次性把数组发出去？

长话短说：我用以下代码就不能实现，必须要按8次按钮才能发送完：
Private Sub Command2_Click()
Dim a As Integer

Dim TiData(8) As Byte
TiData(1) = &HAA
TiData(2) = &HBB
TiData(3) = &HCC
TiData(4) = &HDD
TiData(5) = &HEE
TiData(6) = &HFF
TiData(7) = &H00
TiData(8) = &H11
MSComm1.Output = TiData
End Sub
然后改成这样才行：
Private Sub Command2_Click()
Dim a As Integer

Dim TiData(8) As Byte
TiData(1) = &HAA
TiData(2) = &HBB
TiData(3) = &HCC
TiData(4) = &HDD
TiData(5) = &HEE
TiData(6) = &HFF
TiData(7) = &H00
TiData(8) = &H11
For a = 1 To 8
MSComm1.Output = TiData
Next a
End Sub
这是为什么？有什么办法可以一次性把整个数组发出去吗？

Answer 1

一次发送8字节肯定是可以的，试试 Dim TiData(8) As Byte改成 Dim TiData(1 to 8) As Byte

追问

可以了耶。。。请问这是为什么啊？

追答

Dim TiData(8) As Byte ，默认下标从0开始，所以是9个字节，但是你没给TiData(0) 赋值，导致出问题了