如何把这样一个记录用数组分离出来？急！！！
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后面还有十几个空格！
以上数据我放在一个字段中，读取数据库后，我想一一把他分开，即用数组保存！
请高手指教？谢谢！
问题点数：20、回复次数：7Top
1 楼victorycyz（--）回复于 2003-04-04 17:05:46 得分 0
split()函数。Top
2 楼danielinbiti（金）回复于 2003-04-04 17:27:30 得分 5
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 SubTop
3 楼shen303（一生不放弃）回复于 2003-04-04 17:40:05 得分 0
不会用？Top
4 楼youxia001（游侠001）回复于 2003-04-04 17:41:23 得分 10
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开始的
Top
5 楼shen303（一生不放弃）回复于 2003-04-06 20:20:50 得分 0
我要的是16进制数，不是字符串，请问如何转为16进制数或10进制数也可以！？
还有为什么要定义为Dim arrAA() As String，而定义为Dim arrAA(32) As String就说不能给数组附值。Top
6 楼shen303（一生不放弃）回复于 2003-04-06 21:19:16 得分 0
是朋友的请告知，谢谢！！！Top
7 楼czqMaster（fly）回复于 2003-04-07 01:27:18 得分 5
split啊 youxia001(游侠001) 已经很清楚了,剩下的问题应该自己解决(在摸搜中过河)Top
