如何把这样一个记录用数组分离出来？急！！！

Question

0x20,0x20,0x22,0x22,0xFE,0x21,0x21,0x20,0x20,0xFF,0x20,0x22,0xAC,0x20,0x20,0x00,0x04,0x04,0x42,0x82,0x7F,0x01,0x01,0x10,0x10,0x08,0x07,0x1A,0x21,0x40,0xF0,0x00后面还有十几个空格！
以上数据我放在一个字段中，读取数据库后，我想一一把他分开，即用数组保存！
请高手指教？谢谢！

Answer 1

Private Sub Command1_Click()
 Dim aa As String
 Dim bb() As String
 Dim i As Integer
 aa = "0x20,0x20,0x22,0x22,0xFE,0x21,0x21,0x20,0x20,0xFF,0x20,0x22,0xAC,0x20,0x20,0x00,0x04,0x04,0x42,0x82,0x7F,0x01,0x01,0x10,0x10,0x08,0x07,0x1A,0x21,0x40,0xF0,0x00"
 bb = Split(aa, ",")
 For i = 1 To UBound(bb)
  Print bb(i)
 Next i
End Sub

Answer 2

Private Sub Command1_Click()
    Dim strAA As String
    Dim arrAA() As String
    Dim i As Integer
    strAA = "0x20,0x20,0x22,0x22,0xFE,0x21,0x21,0x20,0x20,0xFF,0x20,0x22,0xAC,0x20,0x20,0x00,0x04,0x04,0x42,0x82,0x7F,0x01,0x01,0x10,0x10,0x08,0x07,0x1A,0x21,0x40,0xF0,0x00"
    arrAA = Split(strAA, ",")
    Text1 = ""
    For i = 0 To UBound(arrAA)
        Text1 = Text1 & Space(3) & arrAA(i)
    Next i
End Sub
是从0开始的

Answer 3

我要的是16进制数，不是字符串，请问如何转为16进制数或10进制数也可以！？
还有为什么要定义为Dim arrAA() As String，而定义为Dim arrAA(32) As String就说不能给数组附值。

Answer 4

split啊 youxia001(游侠001) 已经很清楚了,剩下的问题应该自己解决(在摸搜中过河)