[单项选择题] 对于如下程序，单击Co皿andl事件发生后，窗体上显示的内容为 ______。 Private Sub Command1_Click()Dim i As Integer,a a As IntegerDo 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+1LoopPrint a End Sub

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

参考答案： B

● 参考解析

本题内层循环的条件始终为True，因此内层循环体内的ExitDo语句为终止循环语句。首先，判断外层循环DoWhile后面的表达式“i＜20”为True，接着执行内层循环的If语句。表达式“iMode10=0”的值为True，执行ExitDo，跳出内层循环，执行下面的语句，得i=11，a=11。回到外层循环，判断DoWhile后面的表达式“i＜20”为True，执行内层循环的If语句，表达式“iMode10=0”的值为False，执行i=i-1，i=10。跳出内层循环，执行下面的语句，得到i=21，a=32。

当前位置：IT认证＞BASIC题库

[单项选择题] 对于如下程序，单击Co皿andl事件发生后，窗体上显示的内容为 ______。 Private Sub Command1_Click()Dim i As Integer,a a As IntegerDo 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+1LoopPrint a End Sub

相关题目: