Question

请教vb中的array函数

Private Sub Form_Load()
Dim a, i%
a = Array(1, 2, 3, 4, 5) '
For i = LBound(a) To UBound(a)
Print a(i)
Next i
End Sub

Answer 1

array是给数组赋值的，默认是从下标0开始
lbound是求数组下标最小值
ubound是求数组下标最大值

Answer 2

详细的实例代码如下：
Private Sub Command1_Click()
Combo1.AddItem "一月"
Combo1.AddItem "二月"
Combo1.AddItem "三月"
Combo1.AddItem "四月"
Combo1.AddItem "五月"
Combo1.AddItem "十二月"
End Sub
Private Sub Command2_Click()
a = Array("一月", "二月", "三月", "四月", "五月", "六月", "七月", "八月", "九月", "十月", "十一月", "十二月")
For i = 0 To UBound(a)
Combo1.AddItem a(i)
Next
Combo1.ListIndex = 0
End Sub

Answer 3

A 是个数组。a(0)=1;a(1)=2;^……
从a(0)到a(5)，依次输出。

Answer 4

问啥呢?
a是个数组啊

Answer 5

就是用元素建立一个数组。