数组赋值，菜鸟请教!

来源：百度知道 编辑：UC知道 时间：2024/06/20 17:39:51
简单的说就是如何给一个数组一次付多个值。
请举例说明，谢谢

dim str1
str1=array(1,2,3,4,5,6,7,8,9,0)
注意str1一定要定义成变体型，否则就不会成功。

dim a(1 to 10) as integer
dim i as integer
for i=1 to 10
a(i)=val(inputbox("请输入数据"))
next i
就这么简单