单项选择题

在窗体上有一个命令按钮Command1和一个文本框Text1，编写事件代码如下。
Private Sub Command1_Click()
Dim i，j，x
For i=1 To 20 Step 2
x=0
For i=i To 20 Step 3
x=x+1
Next j
Next i
Text1.Value=Str(x)
End Sub
打开窗体运行后，单击命令按钮，文本框中显示的结果是( )。

A) 1
B) 7
C) 17
D) 400
<上一题 目录 下一题>
热门 试题

单项选择题
设有如下过程： x=1 Do x=x+2 Loop Until ______ 运行程序，要求循环体执行3次后结束循环，空白处应填入的语句是( )。
A) x＜=7
B) x＜7
C) x＞=7
D) x＞7
单项选择题
在窗体中有一个文本框Text1，编写事件代码如下。 Private Sub Form_Click() X=val(Inputbox( 输入x的值 )) Y=1 If X＜＞0 Then Y=2 Text1.Value=Y End Sub 打开窗体运行后，在输入框中输入整数12，文本框Text1中输出的结果是( )。
A) 1
B) 2
C) 3
D) 4
相关试题