问题
单项选择题
在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click( )
Dim a( )
a = Array( 1, 3, 5, 7)
s=0
For i = 1 To 3
s=s*10+a(i)
Next i
Print s
End Sub
程序运行后,输出结果为( )。
A.135
B.357
C.531
D.753
答案
参考答案:B
解析: 程序中的Array是给一维数组赋初值的函数。需要注意,它只能给一维数组赋初值,数组只能是变体类型;赋值号只需写上数组名,不要写上括号。程序中For循环控制的初值从1开始,可见a(i)的取值依次是3、5、7,而不是1、3、5,所以程序运行的结果是选项B。