VB期末试卷(A卷带答案)

高级语言程序设计（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) 2B) 3C) 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 2B) 2 0C) 2 1D) 0 0

11．用下面的语句定义数组，则数组中的元素个数是【11】个。

Option Base 1

Dim A(-1 To 2，5) As Integer

A) 5B) 10C) 15D) 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) 8B) 20C) 2 8D) 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

18．设列表框List1中共有3个列表项，如右图所示。则下列语句中，

能够删除最后一个列表项的是【18】。

A) List1.RemoveItem 2

B) List1.RemoveItem "项目C"

C) List1.RemoveItem List1. Listcount

D) List1.RemoveItem List1. ListIndex

19．组合框分为下拉式组合框、简单组合框和下拉式列表框，在“属性”窗口中这三种类型是由【19】属性设置的。

A) Style B) FillStyle C) BackStyle D) BorderStyle

20．用户单击滚动条的空白处（滑块与两端滚动箭头之间的区域）时，Value属性所增加或减少的值，是由【20】属性决定的。

A) Min B) Max C) SmallChange D) LargeChange

21．将图片文件“b.jpg”作为背景图片，装入当前窗体，正确的语句是【21】。

A) Me.Picture=b.jpg B) Me.Picture= LoadPicture(b.jpg)

C) Me.Picture="b.jpg"D) Me.Picture= LoadPicture("b.jpg")

22．要将两个单选按钮放置在同一个框架内，使它们成为一组，正确的操作是【22】。

A) 先放置一个框架，然后在框架中放置两个单选按钮

B) 先放置两个单选按钮，再放置一个框架，放置框架时覆盖在单选按钮上

C) 先放置两个单选按钮，再放置一个框架，然后将两个单选按钮拖动到框架内

D) 以上三种方法都正确

23．计时器控件能够响应的事件是【23】。

A) Load B) Click C) Change D) Timer

24．要使命令按钮处于无效状态，可以设置按钮的【24】属性值为False。

A) Caption B) Enabled C) Style D) Visible

25．如果在一个工程中有多个窗体和模块，则VB默认的启动对象是【25】。

A) 第一个标准模块B) 最后一个被添加的窗体

C) 设计时的第一个窗体D) 最后一个被添加的标准模块

26．在窗体上放置一个图像框，名称为Image1。程序运行时，要保持图像框大小不变，使框中的图片能够自动适应图像框的大小，可以执行语句【26】。