VB期末试卷(A卷带答案)
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
高级语言程序设计（VB）试卷（A卷）
注意事项：1、本试卷共页，满分为100 分，考试时间为110 分钟。
2、标准答题卡使用2B铅笔涂写；文字题答题时请使用蓝、黑钢笔或圆珠笔，
不得使用红颜色墨水笔。
一、单项选择题（每空1分，共30分）
（请将答案按照题干上【】内的序号涂写“标准答题卡”，否则不得分）
1．在VB 6.0中，扩展名为.vbp的文件称为【1】。
A) 工程文件B) 窗体文件C) 类模块文件D) 标准模块文件
2．在VB 6.0集成开发环境的设计模式下，用鼠标双击窗体上的某个对象后，打开的窗口是【2】。
A) 代码窗口B) 窗体设计窗口
C) 属性窗口D) 工程资源管理器窗口
3．设有变量定义语句Dim a%，则变量a的数据类型是【3】。
A) 整型B) 单精度类型C) 双精度类型D) 字符串类型4．下列表达式中，值为False的是【4】。
A) "AB"<"abc" B) "ABC" = UCase("abc")
C) "ABCD"<"abc" D) Mid("ABCD",3,1)=Left("ABCD",3) 5．函数InStr("ABCDEF", "CD")的值是【5】。
A) 2 B) 3 C) True D) CDEF
6．下列程序运行后，单击窗体，输出结果是【6】。
Private Sub Form_Click()
Dim a As Integer, b As Integer
a = 3
b = 5
Print a + b; a & b
End Sub A) 8 8
B) 35 35
C) 8 35
D) 35 8
7．下列程序运行后，单击窗体，输出结果是 【7】 。 Private Sub Form_Click() a = 3: b = 7
a = a +
b : b = a – b : a = a - b Print a; b End Sub A) 4 3
B) 7 3
C) 3 7
D) 10 7
8．下面程序段所表示的数学关系式是 【8】 。 If (a < b) Then If d = c Then x = 1 Else x = 2 End If A) ⎩⎨
⎧≠≥=<=)
(2)
c (1
d c b a d b a x 且且
B) ⎩⎨
⎧≠<=<=)
(2)
c (1
d c b a d b a x 且且
C) ⎩⎨⎧≥=<=)(2)
c (1b a
d b a x 且
D) ⎩
⎨⎧≠=<=)(2)
c (1
d c d b a x 且
9．下列程序运行后，单击窗体，输出结果是 【9】 。 Private Sub Form_Click()
s = 0: k = 1 Do
s = s + k: k = k + 1 Loop Until k <= 5 Print s End Sub A) 15
B) 10
C) 1
D) 0
10．下列程序段的输出结果是 【10】 。 For k = 4 To 2 Step -2 m = k Next k Print m; k; A) 2 2
B) 2 0 C) 2 1 D) 0 0
11．用下面的语句定义数组，则数组中的元素个数是【11】个。
Option Base 1
Dim A(-1 To 2，5) As Integer
A) 5 B) 10 C) 15 D) 20
12．下面程序段的输出结果是【12】。
Dim a(4) As Integer, s As Integer
For k = 1 To 4
a(k) = 2 * k
Next k
For k = 1 To 4 Step 2
s = s + a(k)
Print s;
Next k
A) 8 B) 20 C) 2 8 D) 2 6 12 20 13．设有如下的用户自定义类型
Private Type Stu
name As String * 10
age As Integer
End Type
则以下正确引用该类型成员的代码是【13】。
A) ="zhang" B) Dim s As Stu
= "zhang"
C) Dim s As Type Stu
= "zhang" D) Dim s As Type
= "zhang"
14．用“【14】”关键字声明的变量称为全局变量。
A) Private B) Public C) Dim D) Static
15．在窗体上放置一个文本框，程序运行后，在文本框中输入abc，但显示的却是***，可能的原因是该文本框的【15】属性值已经被设置为"*"。
A) Font B) Text C) Name D) PasswordChar 16．在VB 6.0中，Print是对象的【16】。
A) 属性B) 方法C) 事件D) 名称
17．在VB 6.0中，要判断复选框是否为选中状态，使用的属性是【17】。
A) Caption B) Checked C) Selected D) Value