在窗体上画两个名称分别为Text1、Text2的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1 Click() Dim x As Integer, n As In

admin2009-02-13  39

问题 在窗体上画两个名称分别为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)       TextText = Str(n)    End  Sub    程序运行后,单击命令按钮,在两个文本框中显示的值分别是

选项 A、15和1
B、27和3
C、195和3
D、600和4

答案2

解析 Do While循环是先判断再执行循环。程序执行后x=1,首先判断x是否小于20,条件为真,则将x乘以3再赋给x,n加1赋给n,再次进入循环重复进行以上操作,当第3次循环以后x=27,n=3。此时x不符合循环条件x<20,退出循环。
转载请注明原文地址:https://kaotiyun.com/show/Cz1p777K
0

最新回复(0)