在窗体上画一个名为Command1的命令按钮，然后编写以下程序：Priva

问题：

[单选] 在窗体上画一个名为Command1的命令按钮，然后编写以下程序：

Private Sub Command1 Click（　　）

Dim a(10)As Integer

Fork=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

A。【解析】根据for循环先计算出数组a的值以及k的当前值是1，则a(k-a(k))=a(7-a(7))= a(7-6)=a(1)=18。