问题
单项选择题
在窗体上画一个名为Command1的命令按钮，然后编写以下程序：
Private Sub Command1_Click()
Dim a(10)As Integer
For k=10 To 1 Step-1
a(k)=20-2*k
Next k
k=k+7
Print a(k-a(k))
End Sub
运行程序，单击命令按钮，输出结果是( )。
A．18
B．12
C．8
D．6
答案
参考答案：A
解析： 本题需要清楚两点：数组中每一项的值以及最后输出语句中k的值。根据循环的特点，可知数组中a(1)的值为18，a(2)的值为16，后面的依次比前一个元素减2。在退出循环时必然是循环变量不满足循环条件，即k=0，故此实际最后输出的是a(1)的值。