在窗体上画一个名称为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
程序运行后,如果单击命令按钮,则在窗体上输出的内容为
A.89
B.99
C.23
D.77
参考答案: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。