VB中怎样数组里存储呢? 我懂得是字符串里存储方法, 但是要读取数据时,每次读取时不能原来的数据来读取。如,原来的数据12 ,2, 23 这样长度不确定的情况下,在字符串里读取时,无法确定它的长度。 我想,数组里存储,然后,读取时可以原来的长度数据读出来呢? 长度是不固定的 ,就是1 到 3的长度之间。 怎样使用数组呢?
VB中怎样数组里存储呢? 我懂得是字符串里存储方法, 但是要读取数据时,每次读取时不能原来的数据来读取。如,原来的数据12 ,2, 23 这样长度不确定的情况下,在字符串里读取时,无法确定它的长度。 我想,数组里存储,然后,读取时可以原来的长度数据读出来呢? 长度是不固定的 ,就是1 到 3的长度之间。 怎样使用数组呢?
这个怎样使用呢?我好久研究了这个,怎么总是数据类型不匹配。
最好实例来演示一下吧。
Dim Data As String
Dim Arr(1 To 20) As Long '原来数组里面的数据 Arr
Dim bArr() As String '
Dim i As Long
'给原始数组 Arr 赋值
For i = 1 To 20
Arr(i) = i
Next
'将原始数组中的数据赋值给一个字串
For i = 1 To 20
Data = Data & i & vbTab
Next
'看一下Data里面的数据
MsgBox Data
'将字串中的数据放至另一个数组中
bArr = Split(Data, vbTab)
If UBound(bArr) <> -1 Then '如果等于-1表示返回的数组是空的。不能进行处理。强制处理会出错。
For i = 1 To UBound(bArr)
MsgBox bArr(i - 1) '按顺序读出重新分离后的数组数据
Next
End If
End Sub