[单项选择题] 对于如下程序，单击Co皿andl事件发生后，窗体上显示的内容为 ______。Private Sub Command1_Click()Dim i As Integer,a a As

[单项选择题] 对于如下程序，单击Co皿andl事件发生后，窗体上显示的内容为 ______。 Private Sub Command1_Click()Dim i As Integer,a a As

[单项选择题] 对于如下程序，单击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，因此内层循环体内的Exit Do语句为终止循环语句。首先，判断外层循环Do While后面的表达式“i＜20”为True，接着执行内层循环的If语句。表达式“i Mode 10=0”的值为True，执行Exit Do，跳出内层循环，执行下面的语句，得i=11， a=11。回到外层循环，判断Do While后面的表达式“i＜20”为True，执行内层循环的If语句，表达式“i Mode 10=0”的值为False，执行i=i-1，i=10。跳出内层循环，执行下面的语句，得到i=21，a=32。