单选题 执行以下程序,在窗体上输出______。
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
【答案解析】[考点] 数组的基本操作 [解析] 本题For循环只为下标是奇数的各项赋值,且各项的值与其下标数值一致,其余项值为0。故a(1)+a(2)+a(3)=1+0+3=4。