读书人

一个VB数组算法,该怎么处理

发布时间: 2012-02-16 21:30:36 作者: rapoo

一个VB数组算法
AA 0A 0F 02 44 12 34 89 55 83 AA 0D 0F 02 14 12 34 00 15 11 31 55 14 AA 0A 0F 02 44 12 34 89 55 83 AA 0B 0F 02 18 12 34 56 78 55 9D

这是接收到的数据,保存到一数组中;现在要依次分开为四个分别取出来,长度都是不固定的.并保存在一数组中;因为有4个AA开头的.由于VB数据要先定义长度才能赋值.所以一直没好办法解决,请帮一下.

[解决办法]
给你参考吧
Private Sub Command1_Click()
Dim a() As String, b() As String
Const t = "AA 0A 0F 02 44 12 34 89 55 83 AA 0D 0F 02 14 12 34 00 15 11 31 55 14 AA 0A 0F 02 44 12 34 89 55 83 AA 0B 0F 02 18 12 34 56 78 55 9D "
a = Split(t, "AA ")
b = Split(Trim(a(1)))
Print b(0), b(1), b(2), b(UBound(b))
End Sub

读书人网 >软件架构设计

热点推荐