在窗体上有一个命令按钮Commandl和一个文本框Textl，编写事件代码如下： Private Sub Commandl一Click（ ）Dim i，j，X For i=1 TO 20 step 2 X=0 For j=i TO 20 step 3 X=X+1 Next j Next i．Textl．Value=Str(x) End Sub 打开窗体运行后，单击命令按钮，文本框中显示的结果是（ ）。
A.1
B.7
C.17
D.400
第1题：
在窗体中添加一个命令按钮(名为Commandl)和一个文本框(名为Textl)，然后编写如下事件过程：
第2题：
在窗体中添加一个命令按钮(名为Commandl)和一个文本框(名为textl)，编写如下事件过程：
打开窗体运行后，单击命令按钮，文本框中显示的内容是__________。
第3题：
在名为”Forml”的窗体上添加三个文本框和一个命令按钮，其名称分别为”Textl”、”Text2”、”Text3”和”Commandl”，然后编写如下两个事件过程：
第4题：
在窗体上画1个命令按钮(名称为Commandl)和1个文本框(名称为Textl)，然后编写如下事件过程：
程序运行后，在文本框中输入3，然后单击命令按钮，则Y的值变为__________。
其功能是根据“测试表达式”的值，从多个语句块中选择符合条件的一个语句块执行.如果测试表达式的值等于某一个表达式的值，则选择该语句块的语句执行，执行完毕后退出Case结构。本题中由于x的值为3，符合第一个Case语句的条件，所以执行y=x*x后退出Case结构，最后Y的值为9。
第5题：
在窗体上添加一个命令按钮(名为Commandl)和一个文本框(名为Textl)，并在命令按钮中编写如下事件代码：PrivateSubCommandlClick()m=17n=Len(Str$(m)+Sp2ace(5))Me!Text1=nEndSub打开窗体运行后，单击命令按钮，在文本框中显示______。
A．5
B．8
C．9
D．10
第6题：
在窗体中添加了一个文本框和一个命令按钮（名称分别为Textl和Commandl），并编写了相应的事件过程。运行此窗体后，在文本框中输入一个字符，则命令按钮上的标题变为"Access模拟”。以下能实现上述操作的事件过程是（ ）。
A.Private Sub Commandl．Click（ ） Caption=”Access模拟”Commandl．
B.Private Sub Textl click（ ） Caption=”Access模拟”EndSubEndSub
C.Private SUb Commandl Change（ ） Caption=”Access模拟”Commandl．
D.Private Sub Textl_Change（ ） Caption=”Access模拟”End SubEnd Sub
第7题：
在窗体上添加一个名称为Textl的文本框和一个名称为Commandl的命令按钮，然后编写如下事件过程：
程序运行后，单击命令按钮，在文本框中显示的值是__________。
第8题：
在窗体上有一个命令按钮Commandl和一个文本框Textl，编写事件代码如下：
Private SuB cormmandl_Click()
Dim i,j,x
For i=i To 20 step 2
x=0
For j=1 To 20 step 2
x=x+1
Next j
Next i
Text1.Value=Str(x)
End SuB
打开窗体运行后，单击命令按钮，文本框中显示的结果是
A．1
B．7
C．17
D．400
第9题：
（ 31 ）在窗体上有一个命令按钮 Commandl 和一个文本框 Textl ，编写事件代码如下：
Private Sub Command1_Click()
Dim i,j,x
For i = 1 To 20 step 2
x = 0
For j = To 20 step 3
x = x + 1
Next j
Next i
Textl.Value=Str(x)
End Sub
打开窗体运行后，单击命令按钮，文本框中显示的结果是
A ） 1
B ） 7
C ） 17
D ） 400
