'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)
'并将整数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)