Question

Array函数的示例

Answer 1

该示例使用 Array函数来返回一个包含 Variant 的数组。
Dim MyWeek, MyDayMyWeek = Array(Mon, Tue, Wed, Thu, Fri, Sat, Sun)'返回值假设下界的设置为 1（使用 Option Base' 语句）。MyDay = MyWeek(2) 'MyDay 的值为 Tue。MyDay = MyWeek(4) 'MyDay 的值为 Thu
例子：当代码窗口输入如下：private sub form_click
dim a
a = array（2,3,4,5）
for i = 0 to 3
print a（i）;
next i
end sub
则运行时会在窗体上显示：2 3 4 5