在窗体有两个名为 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 = str(x) text2 = str(n) End Sub 程序运行后，单击命令按钮，在两个文本框 text1 和 text2 中显示的值分别是
- A.15和1
- B.27和3
- C.195和3
- D.600和4
热度🔥657
参考答案：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。
【解析】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。
复制题目向AI提问
