[单项选择题] 在窗体上画一个名称为 Command1的命令按钮，然后编写如下事件过程： Private Sub Command1

[单项选择题] 在窗体上画一个名称为 Command1的命令按钮，然后编写如下事件过程：

Private Sub Command1_Click()

Dim a(4)As Integer, x As Integer, sum As Integer

n = 4: sum = 0

a (1) = 1

For k = 0 To n - 1

For i = 1 To k + 1

x = k + 2 - i

a(x)= a(x)+ a(x - 1)

If x ＜ n - k Then Exit For

sum = sum + a(x)

Next i

Next k

Print sum

End Sub

程序运行后，单击命令按钮，则窗体上显示的内容是

A．5

B．6

C．8

D．11

D解析：[分析]： 上述程序在双层循环内有一个判断条件，分析其计算过程时比较麻烦，读者要仔细分析。变量x的计算过程为：x=1、2、3、2、1、4、3、2、 1，表达式n-k的计算过程为：n-k=4、3、2、2、 2、1、1、1、1。其中有1＜4、2＜3、2＜1这些条件成立时跳出内部循环，其他内循环都将数组元素值相加起来，即sum=1+2+1+3+3+1=11。