问题 单项选择题

在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:Option Base 1Private Sub Command1_Click()Dim c As Integer, d As Integer d = 0c = 6 x = Array(2, 4, 6, 8, 10, 12) For i = 1 To 6If x(i) > c Then d = d + x(i) c = x(i) Else d = d - cEnd If Next Print dEnd Sub 程序运行后,如果单击命令按钮,则在窗体上输出的内容为______。

A.10

B.16

C.12

D.20

答案

参考答案:C

解析:Array 函数是为数组赋值,而 Option Base 1 是用来设置数组下标是从 1 开始。本题中,由于刚开始 c的值为 6,故前三个数组值不大于 c,执行三次 d = d-c,d=-18;而后三个数组值都大于 c,执行三次 d = d+ x(i),d=-18+8+10+12=12。

单项选择题
多项选择题