对于如下程序,单击Co皿andl事件发生后,窗体上显示的内容为 ______。 Private Sub Command1_Click() Dim i As Integer,a a As Integer Do While i<2

admin2010-09-11  26

问题 对于如下程序,单击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

答案2

解析 本题内层循环的条件始终为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。
转载请注明原文地址:https://kaotiyun.com/show/qwmp777K
0

最新回复(0)