你可能感興趣的試題

在窗體上畫一個名稱為Text1的文本框和一個名稱為Command1的命令按鈕，然后編寫如下事件過程：
Private Sub Command1_Click（）
Dim c As Integer，n As Integer
For c=0 To 50
c=c+3
n=n+1
Ifc＞10Then Exit For
Next c
Text1.Text=Str（n）
End Sub
程序運行后，單擊命令按鈕，在文本框中顯示的值是（）

在窗體上畫兩個名稱分別為Text1、Texte2的文本框和一個名稱為Command1的命令按鈕，然后編寫如下事件過程：
Private Sub Command1_Click（）
Dim x As Integer，n As Integer
x=1
n=0
DoWhilex＜20
x=x*3
n=n+1
Loop
Text1.Text=Str（x）
Text2.Text=Str（n）
End Sub
程序運行后，單擊命令按鈕，在兩個文本框中顯示的值分別是（）