xiexie
在窗体上画两个文本框和一个命令按扭,然后程序如下:
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)
End Sub
程序运行后,单击按扭,在两个文本框显示的值分别为27和3.希望有人告诉我为什么是这样,27不是大于20了吗?不符和原题中Do While x < 20的条件.