A-A+
在窗体上画一个名称为Commandl的命令按钮 然后编写如下程序: Option Base
问题详情
在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序: 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 Print d End Sub 程序运行后,如果单击命令按钮,则在窗体上输出的内容为
A. 10
B.16
C.12
D.20
参考答案
正确答案:C
解析:Array函数是为数组赋值,而Option Base l是用来设置数组下标是从1开始。由于刚开始c的值为6,故前三个数组值不大于c,执行三次d=d-c,d=-18;而后三个数组值都大于c,执行三次d二d+ x(i),d=-18+8+10+12=12。