单项选择题
对于如下程序,单击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
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
执行下面的程序,单击命令按钮后,窗体中的输出结果是 ______。 Private Sub Cotomand1_Click() Ch$= Welcome Home! a=Len(ch$) For i= 1 To a b$ = Mid(ch$, i 1) If b$ = m Then m = m + 1 Next 1 Print m End Sub
A.2
B.3
C.1
D.0
点击查看答案&解析
单项选择题
在窗体上画一个命令按钮,然后编写如下程序: Private Sub Command1_Click() Dim a As Integer, b As integer b = 1 For a = 1 To 100 If b >= 10 Then Exit For If b Mod 3 = 1 Then b = b + 3 End If Next a Print a End Sub 在命令按钮上单击后,窗体上显示的结果是 ______。
A.101
B.6
C.5
D.4
点击查看答案&解析
相关试题
有如下程序,运行时从键盘输入3,输出结果...
窗体上有一个列表框,编写下列程序: Priv...
Command1_Click()事件代码如下: Priv...