使用VB, 如何将大量数据初始化到数组里面? 急~~ 多谢多谢

使用VB(不能用.net), 好像不能使用类似:
Dim array2 As Integer(,) = { {12, 24...}, {10, 20...} .........}
的方法来初始化数组吧?

现在有大量的数据(int型), 如何才能对数组进行初始化呢? 难道要一个一个赋值吗?
或者还有没有其他的途径来存储这些数据呢?

我对VB不怎么熟悉, 还请指教, 谢谢啊~~~~

13 个解决方案

#1

有没有人帮忙呢? 3x 如果我概念错了请别见怪

#2

资源文件好一些。

#3

当然不用了，你可以这样。
用循环给数组赋初值。
for i =1to10
A(I=1)
Next i
这样不就可以了吗。当然了，你要赋多少就在1to10的地方改就可以了吗。

#4

dim array2 as variant
array2 = Array(23,234,34,34,35,3,54,54,5,4)

#5

Array 函数

返回一个包含数组的 Variant。

语法

Array(arglist)

所需的 arglist 参数是一个用逗号隔开的值表，这些值用于给 Variant 所包含的数组的各元素赋值。如果不提供参数，则创建一个长度为 0 的数组。

说明

用来表示数组元素的符号由变量名、圆括号以及括号中的所需元素的索引号组成。在下面的示例中，第一条语句创建一个 Variant 的变量 A。第二条语句将一个数组赋给变量 A。最后一条语句将该数组的第二个元素的值赋给另一个变量。

Dim A As Variant
A = Array(10,20,30)
B = A(2)

使用 Array 函数创建的数组的下界总是 0。这和其它类型的数组不同，它不受 Option Base 语句指定的下界的影响。

注意没有作为数组声明的 Variant 也可以表示数组。除了长度固定的字符串以及用户定义类型之外，Variant 变量可以表示任何类型的数组。尽管一个包含数组的 Variant 和一个元素为 Variant 类型的数组在概念上有所不同，但对数组元素的访问方式是相同的。

======================================

该示例使用 Array 函数来返回一个包含 Variant 的数组。

Dim MyWeek, MyDay
MyWeek = Array("Mon", "Tue", "Wed", "Thu", "Fri", "Sat", "Sun")
'返回值假设下界的设置为 1（使用 Option Base
' 语句）。
MyDay = MyWeek(2) 'MyDay 的值为 "Tue"。
MyDay = MyWeek(4) 'MyDay 的值为 "Thu"。

#6

>当然不用了，你可以这样。
>用循环给数组赋初值。
>for i =1to10
>A(I=1)
>Next i
>这样不就可以了吗。当然了，你要赋多少就在1to10的地方改就可以了吗。

我的数据都是没有规律的, 这样好像不可以吧

#7

>dim array2 as variant
>array2 = Array(23,234,34,34,35,3,54,54,5,4)

二维的数组怎么办呢? 我需要的就是二维的

#8

还有热心的朋友帮忙看看吗?

#9

那就用双重循环
一个控制数组x下标，另一个是y下标，

#10

>那就用双重循环
>一个控制数组x下标，另一个是y下标，

数据是没有规律的, 怎么用loop实现?

#11

1，你把你的那段数据的数量除以你每维的大小加一就得到你要得到的数组的大小，这样你就得到了x下标和y下标的范围
2，定义一动态数组，给它分配上面得到的大小那么大的空间
3，用双重循环，一个控制数组x下标，另一个是y下标，依次给每个数组元素赋值。

#12

Dim array1(2) As Variant

array1(0) = Array(1, 2)
array1(1) = Array(3, 4)

取值array1(0)(0)

#13

嗯我想要的是jpinglee的解决方法, 我刚开始用VB, 有些东西不大习惯,
可能其他朋友的方法也是对的, 但我没有理解, 谢谢大家了. ^_^

#1