Dim N As Long
Dim SJARR() As Byte
ReDim SJARR(1 To N)
不知道第三句什么意思
还有下面一句也不知道什么意思
chksum = chksum And &HFF