请问怎么把字符串数据放到数组 - 编程论坛

#2

陌上过客2016-05-11 10:25

你可以选择把数组设置为字符串属性，dim datatemp（）as string，或者变体属性也是可以的

#3

风吹过b2016-05-11 10:47

datatemp=split(buffer," ") '按空格把 buffer 分解成一个数组，放到 datatemp 是，下标是从0开始。

#4

ZHRXJR2016-05-11 12:43

程序代码：

'这种方法可以检测多位结构相同的数据，如果结构不同，你可以适当修改就可以了
Dim I As Integer, SS As String, X As Integer, Y As Integer, AA(1 To 20) As String, BB(1 To 20) As Integer '二个数组的下标可以根据需要修改即可
SS = "22 33 56 68"
X = Len(SS)
For I = 1 To X Step 3 '根据这个SS特定的数据结构可以这样，数据结构不同，不能这样
If InStr(I, SS, " ", 1) > 0 Then
Y = Y + 1
BB(Y) = InStr(I, SS, " ", 1)
AA(Y) = Left(SS, BB(Y) - 1)
End If
Next I
If BB(Y + 1) = 0 Then BB(Y + 1) = X
If AA(Y + 1) = "" Then AA(Y + 1) = SS
For I = 1 To Y + 1
If I = 1 Then AA(I) = AA(I)
If I > 1 Then AA(I) = Right(AA(I), BB(I) - BB(I - 1))
Next I
'现在在数组AA中已经存储了这些被提取的数据，你可以使用数组的数据了。

还有一个更简单的方法：

程序代码：

Dim SS As String, AA, X As Integer
SS = "22 33 56 68"
AA = Split(SS, " ", -1, 1) '使用 Split 函数分组
X = UBound(AA)
For I = 0 To X
Text1.Text = Text1.Text & AA(I) & Space(3)
Next I

直接可以将字符串分配到数组中,在 Text1 中显示出来，你可以使用这些数组的数据了。

[此贴子已经被作者于2016-5-11 13:44编辑过]

#5

hjxlj2016-05-11 14:12

放到什么类型的数组里面？楼主这个都尚未说清楚，楼上各位就一窝蜂地出谋划策，实在令人啼笑皆非。