问题
单项选择题
在窗体上放置一个命令按钮Command1，并编写下列单击事件的程序：
Option Base 1
Private Sub Commandl_Click0
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．12
C．16
D．20
答案
参考答案：B
解析： 程序首先使用Array函数为x数组变量赋值，然后利用For循环和If结构语句实现程序功能。程序执行过程如下：
①当i=1时，X(i)=2; d=d-c=6；②当i=2时，X(i)=4；d=d- c=-12；③当i=3时，X(i)=6；d=d-c=-18；④当i=4时，X(i)=8；d= d+X(i)=-10；c=8；⑤当i=5时，X(i)=10；d=d+X(i)=0；c=10：⑥当i=6时，X(i)=12；d=d+X(i)=12；c=12。