问题
单项选择题
在窗体上绘制一个名称为Command1的命令按钮，然后编写如下程序：
Option Base 1
Private Sub Commandl_Click()
Dim c As Integer，d As Integer
d=0
c=6
x=Array(2，4，6，8，10，12)
For i=1 To 6
If x(i)＞c Then
d=d+x(i)
c=x(i)
Else
d=d-c
End If
Next i
Print d
End Sub
程序运行后，如果单击命令按钮，则在窗体上输出的内容为
A．10
B．16
C．12
D．20
答案
参考答案：C
解析： 本题属于综合性题目，考查知识点较多，难度较大。首先程序包含了一个循环结构，同时循环结构中还嵌套有一个条件结构。循环体内部将数组中的元素与c做比较，如果大于c，则与d求和，并将结果赋给d，将该元素赋给c。否则执行d=d-c。最后的运行结果是12，选项C正确。