在窗体上添加一个命令按钮（名为Command1）和一个文本框（名为Text1），并在命令按钮中编写如下事件代码：Private Sub Command1_Click（）m＝2.17n＝Len（Str$（m）＋Space（5））Me!Text1=nEnd Sub打开窗体运行后，单击命令按钮，在文本框中显示________。

试卷相关题目

• 1在窗体中添加一个名称为Command1 的命令按钮，然后编写如下事件代码：Private Sub Command1_Click（）Dim a（10，10）For m＝2 To 4For n＝4 To 5a（m，n）=m*nNext nNext mMsgBox a（2，5）＋a（3，4）＋a（4，5）End Sub窗体打开运行后，单击命令按钮，则消息框的输出结果是________。

  A.22

  B.32

  C.42

  D.52

  开始考试点击查看答案
• 2在窗体中添加一个命令按钮（名称为Command1），然后编写如下代码：Private Sub Command1_Click（）a＝0：b＝0：c＝6MsgBox a＝b＋cEnd Sub窗体打开运行后，如果单击命令按钮，则消息框的输出结果为________。

  A.11

  B.a＝11

  C.0D.False

  开始考试点击查看答案
• 3Sub 过程与Function 过程最根本的区别是________。

  A.Sub 过程的过程名不能返回值，而Function 过程能通过过程名返回值

  B.Sub 过程可以使用Call 语句或直接使用过程名调用，而Function 过程不可以

  C.两种过程参数的传递方式不同

  D.Function 过程可以有参数，Sub 过程不可以

  开始考试点击查看答案
• 4在窗体中添加了一个文本框和一个命令按钮（名称分别为tText 和bCommand），并编编写了相应的事件过程。运行此窗体后，在文本框中输入一个字符，则命令按钮上的标题变为“计算机等级考试”。以下能实现上述操作的事件过程是

  A.Private Sub bCommand_Click（） Caption＝＂计算机等级考试＂ End Sub

  B.Private Sub tText_Click（） bCommand.Caption＝＂计算机等级考试＂ End Sub

  C.Private Sub bCommand_Change（） Caption＝＂计算机等级考试＂ End Sub

  D.Private Sub tText_ Change（） bCommand.Caption＝＂计算机等级考试＂ End Sub

  开始考试点击查看答案
• 5以下是宏m 的操作序列设计：条件 操作序列 操作参数MsgBox 消息为“AA”[tt]>1 MsgBox 消息为“BB”、 MsgBox 消息为“CC”现设置宏m 为窗体“fTest”上名为“bTest”命令按钮的单击事件属性，打开窗体“fTest”运行后，在窗体上名为“tt”的文本框内输入数字1，然后单击命令按钮bTest，则________。

  A.屏幕会先后弹出三个消息框，分别显示消息“AA”、“BB”、“CC”

  B.屏幕会弹出一个消息框，显示消息“AA”

  C.屏幕会先后弹出两个消息框，分别显示消息“AA”、“BB”

  D.屏幕会先后弹出两个消息框，分别显示消息“AA”、“CC”

  开始考试点击查看答案
• 6在窗体中添加一个名称为Command1 的命令按钮，然后编写如下事件代码：Private Sub Command1_Click（）A＝75if A>60 Then i＝1if A>70 Then i＝2if A>80 Then i＝3if A>90 Then i＝4MsgBox iEnd Sub窗体打开运行后，单击命令按钮，则消息框的输出结果是________。

  A.1

  B.2

  C.3

  D.4

  开始考试点击查看答案
• 7在窗体中添加一个名称为Command1 的命令按钮，然后编写如下事件代码：Private Sub Command1_Click（）s＝＂ABBACDDCAB＂For i＝6 To 2 Step －2x＝Mid（s，i，i）y＝Left（s，i）z＝Right（s，i）z＝x&y＆zNext iMsgBox zEnd Sub窗体打开运行后，单击命令按钮，则消息框的输出结果是________。

  A.AABAAB

  B.ABBABA

  C.BABBA

  D.BBABBA

  开始考试点击查看答案
• 8在窗体中添加一个名称为Command1 的命令按钮，然后编写如下程序：Public x As integerPrivate Sub Command1_Click（）x＝10Call s1Call s2MsgBox xEnd SubPrivate Sub s1（）x＝x＋20End SubPrivate Sub s2（）Dim x As integerx＝x+20End Sub窗体打开运行后，单击命令按钮，则消息框的输出结果为________。

  A.10

  B.30

  C.40

  D.50

  开始考试点击查看答案