问题
单项选择题
在窗体有两个名为text1、text2的文本框和一个名为Command1的命令按钮，事件过程：
Private sub command1_dick()
Dim x as Integer,n as Integer
x=1
n=0
Do While x＜20
x=x*3
n=n+1
Loop
text1=str(x)text2=str(n)
End Sub
程序运行后，单击命令按钮，在两个文本框text1和text2中显示的值分别是______。
A．15和1
B．27和3
C．195和3
D．600和4
答案
参考答案：B
解析： Do While…Loop语句是在条件式结果为真时，执行循环体，并持续到条件式结果为假或执行到选择性Exit Do语句而退出循环。在程序中，该循环语句的执行过程为，当x小于20时，执行循环体，每循环一次，x的值变为原有值的3倍，n的值加1。str函数的作用是将数值表达式的值转化为字符串。最后将x的值转化为字符串在text1文本框中显示，n的值在text2文本框中显示。因此x初始值为1，n初始值为0，x满足循环条件，进入Do循环，x=1*3=3，n=0+1=1；第二次循环，x=3，满足循环条件，x=3*3=9，n=1+1=2；第三次循环，x=9，满足循环条件，x=9*3=27，n=2+1=3。此时x＞20不再满足循环条件，跳出循环，text1显示27，text2显示3。