单选题
执行以下程序,在窗体上输出______。
Private Sub Command1_Click()
Dim a(20)
For j=1 To 20 Step 2
a(j)=j
Next j
Print a(1)+a(2)+a(3)
End Sub
A.4
B.5
C.6
D.7
A
B
C
D
【正确答案】
A
【答案解析】
[考点] 数组的基本操作 [解析] 本题For循环只为下标是奇数的各项赋值,且各项的值与其下标数值一致,其余项值为0。故a(1)+a(2)+a(3)=1+0+3=4。
提交答案
关闭