单选题 下列程序的功能是输出100到200间不能被3整除的数,程序空白处应填写的语句是 Private Sub Commmandl_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
【答案解析】解析:Do Until…Loop循环采用的是先判断条件后执行循环体的做法,如果条件表达式成立,不执行循环体,否则进入循环体。本题中,要输出100到200间不能被3整除的数,x初始值为1011,之后执行Do Until…Loop循环,若x超出200则不执行循环,否则利用If条件语句进行判断,若能被3整除则输出,之后x值加1进行下一次循环判断。因此Do Until语句空白处应填写>200。