问题
单项选择题
在窗体上画两个名称分别为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)
EndSub
程序运行后，单击命令按钮，在两个文本框中显示的值分别是 ______。
A．15和1
B．27和3
C．195和3
D．600和4
答案
参考答案：B
解析：[评析] 跟踪程序的运行：
第一次：x=1＜20，x=1*3=3，n=0+1=1
第二次：x=3＜20，x=3*3=9，n=1+1=2
第三次：x=9＜20，x=9*3=27，n=2+1=3
再循环时，x=27＞20，退出循环在Text1和Text2中，分别将x和n转换为字符串输出。