1、【
单选题
】
在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Co mmand1＿Click（）
Di mI ，Num
Rando mize
Do
For I ＝1To 1000
Num＝Int（Rnd＊100）
Print Num；
Select Case Num
Case 12
Exit For
Case 58
Exit DO
Case 65，68，92
End
End Select
Next I
Loop
End Sub
上述事件过程执行后，下列描述中正确的是（ ）。
[1分]
、
Do 循环执行的次数为1000次
、
在For 循环中产生的随机数小于或等于100
、
当所产生的随机数为12时结束所有循环
、
当所产生的随机数为65、68或92时窗体关闭、程序结束
答案：
2、【
单选题
】
下列叙述中正确的是（ ）。
[1分]
、
一个算法的空间复杂度大，则其时间复杂度必定大
、
一个算法的空间复杂度大，则其时间复杂度必定小
、
一个算法的时间复杂度大，则其空间复杂度必定小
、
上述3种说法都不对
答案：
3、【
单选题
】
窗体上有文本框Text1和一个菜单，菜单标题、名称见表，结构见图。要求程序执行时单击"保存"菜单项，则把其标题显示在Text1文本框中。下面可实现此功能的事件过程是（ ）。
标题 名称
文件 file
新建 new
保存 save
[1分]
、
Private Sub save＿Click（）
Text1 ． Text ＝file ． save ． Caption
End Sub
、
Private Sub save＿Click（）
Text1 ． Text ＝save ． Caption
End Sub
、
Private Sub file＿Click（）
Text1 ． Text ＝file ． save ． Caption
End Sub
、
Private Sub file＿Click（）
Text1 ． Text ＝save ． Caption
End Sub
答案：
4、【
单选题
】
Function 过程与Sub 过程的最主要区别是（ ）。
[1分]
、
Function 过程一定要有形参，而Sub 过程可以没有形参
、
Function 过程的终端语句是End Function ，而Sub 过程的终端语句是End Sub
、
Function 过程是用于计算函数值的，而Sub 过程是用于改变属性值的
、
Function 过程有返回函数值，而Sub 过程没有返回值
答案：
5、【
单选题
】
假定建立一个名为Co mmand1的命令按钮数组，则以下说法中错误的是（ ）。
[1分]
、
数组中每个命令按钮的名称（Name 属性）均为Co mmand1
、
数组中每个命令按钮的标题（Caption 属性）都一样
、
数组中所有命令按钮可以使用同一个事件过程
、
用名称Co mmand1（下标）可以访问数组中的每个命令按钮
答案：
6、【
单选题
】
在窗体上面1个名称为Co mmand1的命令按钮，然后编写下列事件过程
Option Base 1
Private Sub Co mmand1＿Click（）
Di ma（5，5）As Integer
For i ＝1To 5 For j＝1To 5
a（i ，j）＝（i ＋j ）＊5＼10
Next j
Next i
s ＝0
For i ＝1To 5
s ＝s ＋a（i ，i）
Next i
Print s
End Sub
程序运行后，单击命令按钮，输出结果是（ ）。
[1分]
答案：
7、【
单选题
】
当在滚动条内拖动滚动块时触发（ ）。
[1分]
、
KeyUp 事件
、
KeyPress 事件
、
Scroll 事件
、
Change 事件
答案：
8、【
单选题
】
下列各种形式的循环中，输出"＊"的个数最少的循环是（ ）。
[1分]
、
a＝5：b ＝8
Do
Print ＂＊＂
a＝a＋1
Loop While a＜b
、
a＝5：b ＝8
Do
Print ＂＊＂
a＝a＋1
Loop Until a＜b
、
a＝5：b ＝8
Do
Until a－b
Print ＂＊＂
b ＝b ＋1
Loop
、
a＝5：b ＝8
Do
Until a＞b
Print ＂＊＂
a＝a＋1
Loop
答案：
9、【
单选题
】
下列叙述中正确的是（ ）。
[1分]
、
软件测试应该由程序开发者来完成
、
程序经调试后一般不需要再测试
、
软件维护只包括对程序代码的维护
、
以上三种说法都不对
答案：
10、【
单选题
】
下列程序的执行结果为（ ）。
Private Sub Co mmand1＿Click（）
Di mx As Integer ，y As Integer
x＝12：y ＝20
Call Value（x，y）
Print x；y
End Sub
Private Sub Value（ByVal m As Integer ，ByVal n AsInteger）
m＝m＊2：n ＝n －5
Print m；n
End Sub
[1分]
、
20 12
20 15
、
12 20
12 25
、
24 15
12 20
、
24 12
12 15
答案：
11、【
单选题
】
下列程序执行后，变量X 的值为（ ）。
Di mfl ，b ，c ，d As Si ngle
Di m X As Si ngle
fl ＝10
b ＝30
c ＝400
If b ＞fl Then
d ＝fl ：fl ＝b ：b ＝d
End If
If b ＞c Then
X＝b
Else
If fl ＞c Then
X＝c
Else
X＝a
End If
[1分]
答案：
12、【
单选题
】
下列叙述中错误的是（ ）。
[1分]
、
菜单项的快捷键不可以任意设置
、
除了Click 事件之外，菜单项还能响应其他的事件过程，如DblClick 等
、
每个菜单项都是一个控件，与其他控件一样都有自己的属性和事件
、
在程序执行时，如果菜单项的Enabled 属性为False ，则该菜单项变成灰色
答案：
13、【
单选题
】
表达式5Mod 3＋3＼5＊2的值是（ ）。
[1分]
答案：
14、【
单选题
】
假定有下表所列的菜单结构：
要求程序运行后，如果单击菜单项"大图标"，则在该菜单项前添加一个"√"。以下正确的事件过程是（ ）。
[1分]
、
Private Sub bigicon＿Click（）
bigicon ．Checked ＝False
End Sub
、
Private Sub bigicon＿Click（）
Me ．appear ．bigicon ．Checked ＝True
End Sub
、
Private Sub bigicon＿Click（）
bigicon ．Checked ＝True
End Sub
、
Private Sub bigicon＿Click（）
appear ．bigicon ．Checked ＝True
End Sub
答案：
15、【
单选题
】
下列关于关系运算的叙述中正确的是（ ）。
[1分]
、
投影、选择、连接从二维表的行的方向来进行运算
、
并、交、差从二维表的列的方向来进行运算
、
投影、选择、连接从二维表的列的方向来进行运算
、
以上三种说法都不对
答案：
16、【
单选题
】
窗体上有一个名称为Picture1的图片框控件，一个名称为Label1的标签控件。如图所示。
现有如下程序：
Public Sub display （x As Control）
If TypeOf xis Label Then
x．Caption ＝＂计算机等级考试＂
Else
x．Picture ＝Loadpicture（＂pic ．jpg＂）
EndIf
End Sub
Private Sub Label1＿Click（）
Call display（Label1）
End Sub
Private Sub Picture1＿Click（）
Call display（Picture1）
End Sub
对以上程序，下列叙述中错误的是（ ）。
[1分]
、
程序运行时会出错
、
单击图片框，在图片框中显示一幅图片
、
过程中的X 是控件变量
、
单击标签，在标签中显示一串文字
答案：
17、【
单选题
】
将文本框的（ ）属性设置为True 时，文本框可以输入或显示多行文本，且会自动换行。
[1分]
、
Text
、
ScrollBars
、
Multi Li ne
、
Enabled
答案：
18、【
单选题
】
下列有关数据库的叙述，正确的是（ ）。
[1分]
、
数据处理是将信息转化为数据的过程
、
数据的物理独立性是指当数据的逻辑结构改变时，数据的存储结构不变
、
关系中的每一列称为元组，一个元组就是一个字段
、
如果一个关系中的属性或属性组并非该关系的关键字，但它是另一个关系的关键字，则称其为本关系的外关键字
答案：
19、【
单选题
】
过程语句中，使用的＜参数表＞可以是（ ）。
[1分]
、
常量或变量名
、
表达式或变量名
、
数组元素或变量名
、
变量名或数组名
答案：
20、【
单选题
】
下列不能输出"Program"的语句是（ ）。
[1分]
、
Print Mid（＂VBProgram＂，3，7）
、
Print Right（＂VBProgram＂，7）
、
Print Mid（＂VBProgram＂，3）
、
Print Left（＂VBProgram＂，7）
答案：
21、【
单选题
】
下列对于软件测试的描述正确的是（ ）。
[1分]
、
软件测试的目的是证明程序是否正确
、
软件测试的目的是使程序运行结果正确
、
软件测试的目的是尽可能多地发现程序中的错误
、
软件测试的目的是使程序符合结构化原则
答案：
22、【
单选题
】
在窗体上画一个命令按钮，其名称为Co mmand1，然后编写下列代码：
Option Base 1
Private Sub Co mmand1＿Click（）
Di ma
a＝Array（1，2，3，4）
j＝1
For i ＝4To 1Step －1
s ＝s ＋a（i）＊j
j＝j＊10
Next i
Print S
End Sub
程序运行后，单击命令按钮，其输出结果是（ ）。
[1分]
答案：
23、【
单选题
】
设有如下三个关系表：
下列操作中正确的是（ ）。
[1分]
、
T＝R∩S
、
T＝R∪S
、
T＝R×S
、
T＝R／S
答案：
24、【
单选题
】
可以作为其他控件容器的控件是（ ）。
[1分]
、
窗体控件，列表框控件，图像框控件
、
窗体控件，文本框控件，框架控件
、
窗体控件，框架控件，图片框控件
、
窗体控件，标签控件，图片框控件
答案：
25、【
单选题
】
在通用对话框中打开"颜色对话框"的方法是（ ）。
[1分]
、
ShowOpen
、
MenuIte m．Enabled ＝True
、
MenuIte m．Visi ble ＝True
、
MenuIte m．Visi ble ＝Flase
答案：
26、【
单选题
】
一间宿舍可住多个学生，则实体宿舍和学生之间的联系是（ ）。
[1分]
答案：
27、【
单选题
】
在窗体上画一个名称为Co mmand1的命令按钮，然后编写如下事件过程：
Private Sub Co mmand1＿Click（）
Di ma As Integer ，s As Integer
a＝8
s ＝1
Do
s ＝s ＋a
a＝a－1
Loop While a ＜＝0
Print s ；a
End Sub
程序运行后，单击命令按钮，则窗体上显示的内容是（ ）。
[1分]
答案：
28、【
单选题
】
下列叙述中正确的是（ ）。
[1分]
、
在面向对象的程序设计中，各个对象之间具有密切的关系
、
在面向对象的程序设计中，各个对象都是公用的
、
在面向对象的程序设计中，各个对象之间相对独立，相互依赖性小
、
上述3种说法都不对
答案：
29、【
单选题
】
以下叙述中错误的是（ ）。
[1分]
、
在KeyPress 事件过程中不能识别键盘的按下与释放
、
在KeyPress 事件过程中不能识别回车键
、
在KeyDown 和KeyUp 事件过程中，将键盘输入的"A"和"a"视作相同的字母
、
在KeyDown 和KeyUp 事件过程中，从大键盘上输出的"1"和从右侧小键盘上输入的"1"被视作不同的字符
答案：
30、【
单选题
】
单击按钮时，以下程序运行后的输出结果是（ ）。
Private Sub proc1（x As Integer ，y As Integer ，z As Integer）
x＝3＊z
y ＝2＊z
z ＝x＋y
End Sub
Private Sub Co mmand1＿Click（）
Di mx As Integer ，y As Integer ，z As Integer
x＝1：y ＝2：z ＝3
Call proc1（x，x，z）
Print x；x；z Call proc1（x，y ，y）
Print x；y ；y
End Sub
[1分]
、
6 6 12
6 10 10
、
9 5 10
5 10 10
、
9 6 12
9 10 15
、
9 10 10
5 4 10
答案：
31、【
单选题
】
在窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Co mmand1的命令按钮，运行后的窗体外观如图所示：
设有如下的类型和变量声明：
Private Type Person
name As STRING＊8
major As Stri ng＊20
End Type
Di mp As Person
设文本框中的数据已正确地赋值给Person 类型的变量p ，当点击"保存"按钮时，能够正确地把变量中的数据写入随机文件Test2．dat 中的程序段是（ ）。
[1分]
、
Open ＂c ：＼Test2．dat＂For Output As ＃1
Put ＃1，1，p
Close ＃1
、
Open ＂c ：＼Test2．dat＂For Rando m As ＃1
Get ＃1，1，p
Close ＃1
、
Open ＂c ：＼Test2．dat＂For Rando m As ＃1Len ＝Len
（p）Put ＃1，1，p
Close ＃1
、
Open ＂c ：＼Test2．dat＂For Rando m As ＃1Len ＝Len
（p）Get ＃1，1，p
Close ＃1
答案：
32、【
单选题
】
设在工程文件中有一个标准模块，其中定义了下列记录类型：
Type Books
Name As Stri ng＊10
TelNum As Stri ng＊20
End Type
在窗体上画一个名为Co mmand1的命令按钮，要求当执行事件过程Co mmand1Click 时，在顺序文件Person ．txt中写入一条Books 类型的记录。下列能够完成该操作的事件过程是（ ）。
[1分]
、
Private Sub Co mmand1＿Click（）
Di m BASBooks
Open ＂Person txt＂For Output As ＃1
B .Name ＝InputBox （＂输入姓名＂）
B .TelNum＝lnputBox （＂输入电话号码＂）
Write ＃1BName ，BTelNum
Close ＃1
End Sub
、
Private Sub Co mmand1＿Click（）
Di m BAs Books
Open ＂Person txt＂For Input As ＃1
B .Name ＝InputBox（＂输入姓名＂）
B .TelNum＝InputBox（＂输入电话号码＂）
Print ＃1，B．Name ，B．TelNam
Close ＃1
End Sub
、
Private Sub Co mmand1＿Click（）
Di m BASBooks
Open ＂Person txt＂For Output As ＃1
B .Name ＝InputBox（＂输入姓名＂）
B .TelNum＝InputBox（＂输入电话号码＂）
Write ＃1，B
Close ＃1
End Sub
、
Private Sub Co mmand1＿Click（）
Open ＂Person txt＂For Input As ＃1
Name ＝lnputBox（＂输入姓名＂）
TelNum＝lnputBox（＂输入电话号码＂）
Pri m＃1Name TelNum
Close ＃1
End Sub
答案：
33、【
单选题
】
有如下函数：
Function fun（a As Integer ，n As Integer）As Integer
Di m m As Integer
While a ＞＝n
a＝a－n
m＝m＋1
Wend
fun ＝m
End Function
该函数的返回值是（ ）。
[1分]
、
a 乘以n 的乘积
、
a 加n 的和
、
a 减n 的差
、
a 除以n 的商（不含小数部分）
答案：
34、【
单选题
】
为了暂时关闭计时器，应把该计时器的某个属性设置为False ，这个属性是（ ）。
[1分]
、
Visi ble
、
Ti mer
、
Enabled
、
Interval
答案：
35、【
单选题
】
下列叙述中，不属于软件需求规格说明书的作用的是（ ）。
[1分]
、
便于用户、开发人员进行理解和交流
、
反映出用户问题的结构，可以作为软件开发工作的基础和依据
、
作为确认测试和验收的依据
、
便于开发人员进行需求分析
答案：
36、【
单选题
】
在窗体上画一个名称为File 的文件列表框，并编写如下程序：
Private Sub File1＿DblClick（）
x＝Shell（File1．File Name ，1）
End Sub
以下关于该程序的叙述中，错误的是（ ）。
[1分]
、
x 没有实际作用，因此可以将该语句写为：Call Shell（File ．File Name ，1）
、
双击文件列表框中的文件，将触发该事件过程
、
要执行的文件的名字通过File1．File Name 指定
、
File1中显示的是当前驱动器、当前目录下的文件
答案：
37、【
单选题
】
设A＝＂87654321＂，则表达式Val（Left（A，4）＋Mid（A，4，2））的值为（ ）。
[1分]
、
876543
、
876554
、
8
、
6
答案：
38、【
简答题】
在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm，该程序是不完整的，请在有"?"号的地方填入正确内容，然后删除"?"及代码前的所有注释符（即'号），但不能修改其他部分。存盘时不得改变文件名和文件夹。
本题描述如下：
在窗体上有一个文本框、两个单选按钮及两个命令按钮。文本框的名称为Text1，内空；两个命令按钮的名称分别为Command1与Command2、标题分别为"读取"与"加密"；单选按钮的名称分别为Option1和Option2，标题分别为3，5。单击"读取"，程序将读入考生文件夹下的文本文件in5.txt，单击"加密"，加密过的文本显示在Text1中。根据单选按钮中的不同的数字，加密的方法不同。例如选择Option1，则逐一把读入的字符串改为它前面的第3个字母。程序运行时效果如图37-5所示。
图37-5
[18分]
解析：单选按钮组常用于提供唯一选择，VAluE属性值决定每个单选按钮的选中状态：FAlsE表示未选、TruE表示选中，CAption属性用于设置或返回单选按钮的标题。Chr函数返回StrinG，其中包含有与指定的字符代码相关的字符。其语法格式为：Chr(ChArCoDE) 。ChArCoDE必要参数，是一个用来识别某字符的LonG型数。MiD$(字符串,起始位置[,个数])函数用于从字符串指定位置开始的含指定个数字符的字符串；StrinG(个数，字符)函数用于返回含指定个数字符的字符串；AsC(字符串)函数用于返回字符串首字符的ASCII码值。根据题意，将一个文本框控件、两个单选按钮控件和两个命令按钮添加到窗体中，文本框的名称为TExt1、TExt属性为空，单选按钮的名称分别为Option1和Option2，CAption属性分别为"3"和"5"，命令按钮的名称为CommAnD1和CommAnD2，CAption属性分别为"读取"和"加密"。双击CommAnD1进入代码窗口，编写如下代码：
线下考试期中/期末考试、集中培训考试
招聘考试在线笔试、大型校招、社招
认证考试岗位认证、职业资格认证、技能考核认证
考试测验学生测验、员工考核、培训考试
新员工培训搭建新员工入职培训体系
岗位培训岗位学习地图、人才培养
知识店铺搭建专属知识店铺、实现知识变现
刷题练习题库刷题、每日一练、打卡练习
知识竞赛党建活动、安全生产活动、协会竟赛
期末考试在线考试考核提高考试管理效率
网课教育直播打卡学习等功能让网课教育更灵活
企业年会组织企业年会闯关答题赢红包活动
学校高校大规模在线考试解决方案
制造行业员工培训体系解决方案
零售行业岗位人才培养解决方案
金融行业专业技能培训解决方案
客服热线:400-886-8169 | 周一至周日 8:00-22:00