一、单项选择题（本大题共16小题，每小题1分，共16分）在每小题列出的四个备选项中 只有一个是符合题目要求的，请将其选出并将“答题卡”的相应代码涂黑。错涂、多涂或未涂均无分。
1.对象是具有特殊属性和行为方式的（D）
A、控件
B、组件
C、工具
D、实体
2.下列语句中正确的注释语句是（D）
A、z=x+y/*求z的值*/
B、y=200%给y赋值
C、z=100//给z赋值
D、X=200’给x赋值
3.设a=5,b=2,c=9,d=0,表达式（3>2*b or a=c and b◇c or c>d）的值是（C）
A、NULL
B、2
C、true
D、false
4.执行下列程序后输出的是（A）
Private Sub Commandl_Click()
Dim Ch$
Ch="1234567abc"
Print Len Mid(Ch,3,3))
End Sub
A、3
B、9
C、10
D、13
5.下列关键字中，不能定义变量的是（B）
A、Dim
B、Declare
C、Redim
D、Public
6.用八进制表示Visual Basic的整型常数时，前面加上的符号是（B）
A、&H
B、&O
C、&B
D、&D
7.表达式Int(3.9)的结果是（B）
A、4
B、3
C、0
D、-1
8.语句Debug.Print'”Print Hello”的功能是（B）
A、将“Print Hello”在当前窗体上显示
B、将“Print Hello”在立即窗体上显示
C、将“Hello”在打印机上显示
D、将“Hello”在当前窗体中显示
9.设在窗体上有1个名称为Combo1的组合框，含有4个项目，要删除最后一项，正确的语句是（A）
A、Combol.RemoveItem 3
B、Combol.Removeltem Caption
C、Combol.RemoveItem 4
D、Combol.RemoveItem Text
10.要限制在文本框内输入的最大字符数，应该设置的属性是（C）
A、Text
B、Multiline
C、MaxLength
D、PassWordChar
11.计时器控件Timer的计时间隔是由（B）属性来设置的。
A、Value
B、Interval
C、Time
D、Text
12.下列数组定义中，元素个数最多的是（C）
A、Dim A(3,3)
B、Dim A(2,3)
C、Dim A(-1 To 2,4)
D、Dim A(1 To 2,3)
13.下列哪条语句用于清除名为“Test”的数组？（D）
A、Reset Test
B、Delete Test
C、Del Test
D、Erase Test
14.过程定义Sub MySub(ByVal x As Integer,ByVal y As Integer),下列说法正确的是（C）
A、x是传地址参数，y是传值参数
B、x是传值参数，y是传地址参数
C、x和y都是传值参数
D、x和y都是传地址参数
15.键盘事件不包括（D）
A、KeyPress
B、KeyUp
C、KeyDown
D、KeyCode
16.打开一个随机文件，下列语句正确的是（B）
A、Open "abc.txt" As #1
B、Open "abc.txt" For Random As #1
C、Read "abc.txt" For Random As #1 Len=31
D、Open "abc.txt" As #1 For Random
二、判断改错题（本大题共10小题，每小题2分，共20分）判断下列每小题的正误。正确 的在题后括号内打“√” ；错误的打“×”，并改正划线部分。
17.启动Visual Basic后，主窗口位于集成环境顶部，由标题栏、菜单栏和工具栏组成。
正确。
18.Form1.Print Formats$(3.18,"0.0")会在Form1上显示3.2。
正确。
19.MsgBox函数的返回值是英文字母。
错误。改正：整数。
20.滚动条的Value属性表示滚动框在滚动条上的当前位置。
正确。
21.While循环语句先对条件进行测试，然后才决定是否执行循环体，只有条件为False时，才执行循环体。
错误。改正：True。
22.在同一模块中，允许多个Sub过程和多个Function过程同名。
错误。改正：不允许/不能/不可以。
23.在Visual Basic中，按下鼠标按钮可以触发MouseDown事件。
正确。
24.为使该菜单项被标记，应该设置菜单项属性Visible为True。
错误。改正：Checked。
25.通用对话框Common Dialog控件，不能用于选择文件夹。
正确。
26.二进制文件存取每次只能移到一个记录的边界上，读取固定个数的字节。
错误。改正：随机文件存取/随机存取。
三、简答题（本大题共2小题，每小题8分，共16分）
27.简述动态数组的定义过程。
答：
（1）动态数组以变量作为下标值，在程序运行过程中完成定义；
（2）通常分为两步：首先在窗体层、标准模块或过程中用 Dim 或 Public 声明一个没有下标的数组（括号不能省略）；
（3）然后在过程中用 ReDim 语句定义带下标的数组。
28.简述闲置循环的含义的特点，并阐述闲置循环与DoEvents语句的关系。
答：
（1）含义：闲置循环是在闲置状态下执行的循环，即当应用程序处理闲置状态时，用一个循环来执行其他操作。
（2）特点：当执行闲置循环时，将占用全部 CPU 时间，不允许执行其他事件过程，使系统处于无限循环中，没有任何反应。因此，Visual Basic 提供 DoEvents 语句，当执行闲置循环时，可以用它把控制权交给周围环境使用，然后回到原来程序继续执行。
四、解读程序题（本大题共2小题，每小题6分，共12分）解读程序，根据题目对程序的说明，在程序中空格处填写正确代码。填错、未填均无分。
29.编写程序，建立“打开Excel文件”的对话框。具体实现：在窗体上画一个通用对话框，其Name属性为CommonDialogl;再画一个命令按钮，其Name属性为Command1;然后编写事件过程，代码如下：

答：
（1）Filter ；
（2）ShowOpen 或 Action=1 ；
（3）FileName 。
30.下列程序的功能是：把文件text.txt的内容以顺序输入方式读入内存，并在文本框Textl中显示出来。

答：
（1）input ；
（2）#2 ；
（3）Str1 。
五、程序阅读题（本大题共4小题，每小题4分，共16分）阅读程序，在题后的空格处填写 程序运行的结果。填错、未填均无分。
31.窗体画一个命令按钮(Command1)、两个文本框(Text1和Text2),然后编写如下两个事件过程。程序运行后，单击命令按钮，将显示一个输入对话框，如果在该对话框中输入字符串“Visual Basic”,则另外一个文本框中显示的内容是（）。

答：L BASI
32.

程序运行后，单击命令按钮，如果在输入对话框中输入字符串"ab",则单击"确定"按钮后在窗体上的输出结果为（）。
答：VBVB
33.

答：20
34.在窗体上有一个命令按钮(Command1)和两个文本框(Text1和Text2),编写如下程序代码，当运行程序后，单击命令按钮，文本框Textl的值显示为（），Text2的值显示为（）。

答：225 ； 285
六、编程题（本大题共2小题，每小题10分，共20分）编写程序实现题目所给要求。
35.编写程序，求200以内所有素数的和并输出结果。
答：

36.编写程序，实现在窗体上单击命令按钮Command1时，在输入对话框（用InputBox函数实现)中输入学生分数并调用一个Function过程（名为ScoreOut)判断该学生的分数等级并输出结果。分数等级如下：优秀(90-100分)、良好(80-89分)、中等(70-79分)、及格(60-69分)和不及格(59分以下)。
答：

加入学习交流群，与万千考友一起备考

一键加群

• 浙江湖州市2023上半年自考毕业证书领取通告
• 西藏2023年10月自考各专业开考课程考试时间安排表


• 江西师范大学关于申请2023年9月自学考试学士学位的通知
• 川外成都学院关于2023年下半年（234次）自学考试省考...