VB二段码一次串口发送

当按commmand1时，“H96 H01  H03  HA0”，这数据在哪能另时存储下，等
当按commmand2时，“H95 H02  H04  HA0”。8位数据能同时发送串口。
因为在按下command1后，程序不要求何时按下command2.
我自己考虑这样，按command1时，将数据存在文本框内，等command2按下再一起发送，有更好的方法吗？谢！

---

使用一个数组变量来保存。
另外 H96?是 &H96 吧。

---

VB code:

Option Explicit
Dim bytHex() As Byte

Private Sub Command1_Click() '1命令－得到设备当前频率
ReDim bytHex(1 To 8) As Byte
bytHex(1) = &H96
bytHex(2) = &H1 H03 HA0
bytHex(3) = &H3
bytHex(4) = &HA0
End Sub

Private Sub Command2_Click() '2命令－得到设备当前温度
bytHex(5) = &H95
bytHex(6) = &H2
bytHex(7) = &H4
bytHex(8) = &HA0
MSComm1.Output = strSend
End Sub

Private Sub Form_Load()
MSComm1.CommPort = 1 'PortNo
MSComm1.Settings = "9600,n,8,1"
MSComm1.InBufferCount = 0
MSComm1.OutBufferCount = 0
MSComm1.InputMode = comInputModeBinary
MSComm1.RThreshold = 1
MSComm1.PortOpen = True
MSComm1.InputLen = 0
End Sub

---

留个记号

---

写得匆忙，修正错误：
VB code:
Option Explic