在窗体上画一个名称为Commandl的命令按钮,然后编写如下代码: Option Base 1 Prirate 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 d End Sub 程序运行后,如果单击命令按钮,则在窗体上输出的内容为 D.77
A.89 B.99 C.23
【参考答案】
C 解析:本题考查For循环控制语句。首先使用Array为数组x赋值。For循环表示当x(i)值大于c时就执行: d=d+x(i) c=x(i) 表示如果x(i)>c则令d加x(i),并且赋x(i)给变量c。否则,执行d=d-c语句.要注意c的值在不断发生变化,根据题意,最终答案为C。