阅读下面的程序: Private Sub Form_Click() Dim Check As Boolean,Counter As Integer Check=True Counter=5 Do

admin2013-04-11  52

问题 阅读下面的程序:
   Private Sub Form_Click()
     Dim Check As Boolean,Counter As Integer
     Check=True
     Counter=5
     Do
       Do While Counter<20
         Counter=Counter+1
           If Counter=10  Then
              Check=Fadtse
           EXit  Do
         End  If
       Loop
     Loop  Until  Check=False
     Print  Counter
   End  Sub
   程序运行后,单击窗体,输出结果为 ______。

选项

答案10

解析 本题考查嵌套的Do… Loop循环。Do循环嵌套的规则与For-Next循环相同,按照先进后出、后进先出的原则,不能交叉。考生需判断程序在何时跳出循环,内层循环是在 Counter<20时,对其加1,但要注意循环内的条件语句,当Counter=10时,跳出内层循环,同时将Check设为False。外层循环的循环条件是Check=False,所以当程序跳出内层循环时,外层循环的条件也满足了,故同时也跳出循环,此时Counter=10。
转载请注明原文地址:https://kaotiyun.com/show/Q9Qp777K
0

最新回复(0)