以下是窗体的Click事件过程: Private Sub Form_Click() Dim a As Integer a = 1 Do a = a + 5 Loop Until a > 18 Print a End Sub 程

admin2015-06-30  21

问题 以下是窗体的Click事件过程:
Private Sub Form_Click()
  Dim a As Integer
  a = 1
  Do
     a = a + 5
  Loop Until a > 18
  Print a
End Sub
程序运行过程中单击窗体,输出结果是

选项 A、1
B、20
C、16
D、21

答案D

解析 Do…Loop Until,先运行一次,再计算循环"条件"值,当条件为真时结束循环,否则执行循环体。当程序开始执行时,a=1,先运行一次,得a=1+5=6,再计算循环"条件"值,由于6>18为假,执行循环体,a=6+5=11,由于11>18为假,继续执行循环体,得a=11+5=16,由于16>18为假,继续执行循环体,得a=16+5=21,21>18为真,结束循环。故本题正确答案为D。
转载请注明原文地址:https://jikaoti.com/ti/nt60FFFM
0

最新回复(0)