单选题 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click{{U}} {{/U}}
Dim a(4)As Integer,x As Integer,sum As Integern=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。