VB的基本使用2

'4. 先声明一个一维动态数组，然后将其数组元素个数确定为10，
'并将整数1到10依次赋值给数组的各个元素，然后打印显示数组的第五个元素。


Option Explicit '强制显式声明模块中的所有变量
 Dim a(9),i '数组元素个数确定为10
 'Sub num
 For i=0 to 9'For Next 循环遍历
   a(i)=i+1   
Next
'End Sub
'num
MsgBox a(4)