在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:Option Base 1Private Sub Command1_Click() d=0 c=10 x=Array(10, 12, 21, 32, 24) For i=1 To 5 If x(i)>c Then d=d+x(i) c=x(i) Else d=d-c End If Next i Print dEnd Sub程序运行后,如果单击命令按钮,则在窗体上输出的内容为( )。
A.89
B.99
C.23
D.77
热度🔥802
参考答案:C
解析:
【解析】程序中Option Base 1语句指定数组下标下限从1开始。程序通过赋初值定义变量x为含有5个元素的数组,元素值依次为10, 12, 21, 32, 24。For循环的功能是把这5个元素中大于10且大于前一个元素的值累加到变量d中,如果小于等于10或前一个元素则从变量d减去10或前一个元素的值。因此d=0-10+12+21+32-32=23。