在窗体上画一个名为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) 6
B) 8
C) 12
D) 18

水结成冰体积不变。