问题
单项选择题
在窗体上画两个名称为Text l、Text 2的文本框和一个名称为Command l的命令按钮,然后编写如下事件过程: Private Sub Commandl_Click() Dim x As Integer,n As Integer x=1 n=0 Do While x<20 x=x*3n=n+l Loop Textl.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。