下列程序的功能是输出 100 到 200 间不能被 3 整除的数,程序空白处应填写的语句是 Private Sub Commmand1_Click() Dim x As Integer x = 100 Do Until x _________

admin2015-07-10  28

问题 下列程序的功能是输出 100 到 200 间不能被 3 整除的数,程序空白处应填写的语句是
Private Sub Commmand1_Click()
  Dim x As Integer
  x = 100
  Do Until x _________
     If x Mod 3 <> 0 Then
         Debug.Print x
      End If
      x = x + 1
  Loop
End Sub

选项 A、> 200
B、> 100
C、< 100
D、< 200

答案A

解析 Do Until…Loop循环采用的是先判断条件后执行循环体的做法,如果条件为True,不执行循环体,否则进入循环体。本题中,要输出 100 到 200 间不能被 3 整除的数,x初始值为100,之后执行Do Until…Loop循环,若x超出200则不执行循环,否则利用If条件语句进行判断,若能被3整除则输出,之后x值加1进行下一次循环判断。因此Do Until语句空白处应填写> 200。
转载请注明原文地址:https://jikaoti.com/ti/Xy20FFFM
0

最新回复(0)