问题
单项选择题
在窗体上画一个命令按钮,名称为Command1。然后编写如下程序: Private Sub Command1_Click() Dim i As Integer,a As IntegerDo While i<20 Do While True If i Mod 10=0 ThenExit Do Elsei=i-1 End If Loop i=i+11 a=a+iLoopPrinta End Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。
A.21
B.32
C.33
D.11
答案
参考答案:B
解析: 本题内层循环的循环条件始终为True,因此内层循环体内的Exit Do语句为终止循环的语句。首先,判断外层循环Do While后面表达式“i<20”的值为True,接着执行内层循环的If语句,表达式“i Mod 10=0”的值为True,执行Exit Do语句,跳出内层循环,执行下面的语句,此时i和a的值分别为11:回到外层循环,判断条件“i<20”,仍为True,执行内层循环语句,此时If条件不满足,执行Else语句,i的值为10,继续内层循环,If语句条件满足,执行Exit Do语句,跳出内层循环,执行下面的语句后,i和a的值分别为21和32。再判断外层循环的条件,不再满足,结束循环。输出变量a的值为32。