单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下代码：
Option Base 1
Private 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

<上一题目录下一题>

热门试题

单项选择题

在窗体上画一个命令按钮和一个文本框，名称分别为Command1和Text1，然后编写如下程序： Private Sub Command1_Click() a=InputBox( 请输入日期(1～31) ) t= 旅游景点: _ & Iif(a＞0 And a＜=10, 长城 , )_ & Iif(a＞10 And a＜=20, 故宫 , )_ & Iif(a＞20 And a＜=31, 颐和园 , ) Text1. Text=tEnd Sub 程序运行后，如果从键盘上输入16，则在文本框中显示的内容是______。

A．旅游景点：长城故宫
B．旅游景点：长城颐和园
C．旅游景点：颐和园
D．旅游景点；故宫

单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Static x As Integer Cls For i=1 To 2 y=y+x x=x+2 Next Print x, y End Sub 程序运行后，连续3次单击Command1按钮后，窗体上显示的是______。

A．4 2
B．12 18
C．12 30
D．4 6

相关试题