VB串口通信怎么对接收到的一组数据进行处理

VB串口通信如何对接收到的一组数据进行处理？
用VB接收一串数据，是16进制的，每位数两个字节，如何把接收到的数据计算后分别存储

[解决办法]
Private Sub MSComm1_OnComm()
Dim dd() As Byte, i%
Dim iTime As Double

Select Case MSComm1.CommEvent
Case comEvReceive ' 收到 RThreshold # ofchars.

i% = MSComm1.InBufferCount
ReDim dd(i% + 1)
dd = MSComm1.Input
Call RecvBufAdd(dd, i%) '处理接收串口数据
end select
[解决办法]

VB code

Private Sub MSComm1_OnComm() '这是串口触发的事件Dim dd() As Byte, i%   ' 定义变量Dim iTime As Double    ' 定义变量  Select Case MSComm1.CommEvent        Case comEvReceive ' 收到 RThreshold # ofchars(收到你定义的字符数时触发事件)  i% = MSComm1.InBufferCount    ' 收到多少个字符  ReDim dd(i% + 1)               '重定义数组的下界  dd = MSComm1.Input             '获取串口缓存里的数据  Call RecvBufAdd(dd, i%) '处理接收串口数据   (这个是你自己写的处理数据的过程)  end select