单项选择题

对于如下程序，单击Co皿andl事件发生后，窗体上显示的内容为 ______。 Private Sub Command1_Click() Dim i As Integer,a a As Integer Do While i＜20 Do While True If i Mod 10 = 0 Then Exit Do Else i=i-1 End If Loop i=i+11 a=a+1 Loop Print a End Sub

A．21
B．32
C．33
D．11

<上一题目录下一题>

热门试题

单项选择题

Command1_Click()事件代码如下： Private Sub Command1_Click() Dim x As Integer, Y As Integer x = 6 : Y : 8 Call ABC(X, Y) Print X; Y End Sub Private Sub ABC(ByVal X As Integer，Y As Integer) X = X + 4 Y = Y = 2 End Sub 事件发生后，X和Y的值分别为 ______。

A．6, 8
B．10, 10
C．10, 8
D．6, 10

单项选择题

执行下面这段程序后，单击命令按钮，窗体中输出结果是 ______。 Private Sub Command1_Click() a=1 : b=4 : c = 9 : d = 5 If a ＜ b Then If c＜d Then x=True Else If a＜c Then x=False Else x=True End If End If End If Print Val(x) End Sub

A．True
B．False
C．0
D．1

相关试题