、
Private Sub bCommand_Click（）
Caption＝＂计算机等级考试＂
End Sub
、
Private Sub tText_Click（）
bCommand.Caption＝＂计算机等级考试＂
End Sub
、
Private Sub bCommand_Change（）
Caption＝＂计算机等级考试＂
End Sub
、
Private Sub tText_ Change（）
bCommand.Caption＝＂计算机等级考试＂
End Sub
答案：
29、【
单选题
】 Sub 过程与Function 过程最根本的区别是________。
[2分]
、
Sub 过程的过程名不能返回值，而Function 过程能通过过程名返回值
、
Sub 过程可以使用Call 语句或直接使用过程名调用，而Function 过程不可以
、
两种过程参数的传递方式不同
、
Function 过程可以有参数，Sub 过程不可以
答案：
30、【
单选题
】 在窗体中添加一个命令按钮（名称为Command1），然后编写如下代码：
Private Sub Command1_Click（）
a＝0：b＝0：c＝6
MsgBox a＝b＋c
End Sub
窗体打开运行后，如果单击命令按钮，则消息框的输出结果为________。
[2分]
、
11
、
a＝11
、
0
、
False
答案：
31、【
单选题
】 在窗体中添加一个名称为Command1 的命令按钮，然后编写如下事件代码：
Private Sub Command1_Click（）
Dim a（10，10）
For m＝2 To 4
For n＝4 To 5
a（m，n）=m*n
Next n
Next m
MsgBox a（2，5）＋a（3，4）＋a（4，5）
End Sub
窗体打开运行后，单击命令按钮，则消息框的输出结果是________。
[2分]
、
22
、
32
、
42
、
52
答案：
32、【
单选题
】 在窗体上添加一个命令按钮（名为Command1）和一个文本框（名为Text1），并在命
令按钮中编写如下事件代码：
Private Sub Command1_Click（）
m＝2.17
n＝Len（Str$（m）＋Space（5））
Me!Text1=n
End Sub
打开窗体运行后，单击命令按钮，在文本框中显示________。
[2分]
、
5
、
8
、
9
、
10
答案：
33、【
单选题
】 在窗体中添加一个名称为Command1 的命令按钮，然后编写如下事件代码：
Private Sub Command1_Click（）
A＝75
if A>60 Then i＝1
if A>70 Then i＝2
if A>80 Then i＝3
if A>90 Then i＝4
MsgBox i
End Sub
窗体打开运行后，单击命令按钮，则消息框的输出结果是________。
[2分]
、
1
、
2
、
3
、
4
答案：
34、【
单选题
】 在窗体中添加一个名称为Command1 的命令按钮，然后编写如下事件代码：
Private Sub Command1_Click（）
s＝＂ABBACDDCAB＂
For i＝6 To 2 Step －2
x＝Mid（s，i，i）
y＝Left（s，i）
z＝Right（s，i）
z＝x&y＆z
Next i
MsgBox z
End Sub
窗体打开运行后，单击命令按钮，则消息框的输出结果是________。
[2分]
、
AABAAB
、
ABBABA
、
BABBA
、
BBABBA
答案：
35、【
单选题
】 在窗体中添加一个名称为Command1 的命令按钮，然后编写如下程序：
Public x As integer
Private Sub Command1_Click（）
x＝10
Call s1
Call s2
MsgBox x
End Sub
Private Sub s1（）
x＝x＋20
End Sub
Private Sub s2（）
Dim x As integer
x＝x+20
End Sub
窗体打开运行后，单击命令按钮，则消息框的输出结果为________。
[2分]
线下考试期中/期末考试、集中培训考试
招聘考试在线笔试、大型校招、社招
认证考试岗位认证、职业资格认证、技能考核认证
考试测验学生测验、员工考核、培训考试
新员工培训搭建新员工入职培训体系
岗位培训岗位学习地图、人才培养
知识店铺搭建专属知识店铺、实现知识变现
刷题练习题库刷题、每日一练、打卡练习
知识竞赛党建活动、安全生产活动、协会竟赛
期末考试在线考试考核提高考试管理效率
网课教育直播打卡学习等功能让网课教育更灵活
企业年会组织企业年会闯关答题赢红包活动
学校高校大规模在线考试解决方案
制造行业员工培训体系解决方案
零售行业岗位人才培养解决方案
金融行业专业技能培训解决方案
客服热线:400-886-8169 | 周一至周日 8:00-22:00