单选题下列程序的功能是输出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、＞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。