问题
单项选择题
在窗体上画两个名称为Text1、Text2的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1 Click()
Dim x As Integer， n As Integer
x=1
n=0
Do While x＜20
x=x*3
n=n+1
Loop
Text1.Text=Str(x)
Text2.Text=Str(n)
End Sub
程序运行后，单击命令按钮，在两个文本框中显示的值分别是( )。
A．9和2
B．27．和3
C．195和3
D．600和4
答案
参考答案：B
解析： 本题考查While循环的处理过程。循环第1次x=l，执行循环，n=l；循环第2次， x=3，仍然执行循环，n二2；依次类推，当执行完第3次循环后，x=27＞20，n=3，不再满足条件，跳出循环，由此可知本题答案为选项B。