文档介绍：一、单项选择题：（每小题2分，共24分）
）属性可以绘制多种形状的图形。
1、通过设置Shape控件的（
匚 A、Shape
匚 B、Borderstyle
匚 C、Fillstyle
匚 D、Style
2、
通过设置Line控件的（
）属性可以绘制虚线、点划线等多种样式的直线。
A、
Shape
B、
Style
C、
Fillsty 1(
D、
Borders
ty le
3、 通用过程可以通过执行“工具”菜单中的（ ）命令来建立。
匚A、添加过程
匚B、通用过程
C C、添加窗体
匚D、添加模块
4、 在窗体模块的通用声明段中声明变量时，不能使用（ ）关键字。
匚 A、 Dim
□ B、Public
匚 C、Private
D、 Static
5 ＞使用Public Const语句声明一个全局的符号常量时，该语句应放在（）。
匚A、过程中
匚B、窗体模块的通用声明段
C C、标准模块的通用声明段
匚d、窗体模块或标准模块的通用声明段
6、 可以在窗体模块的通用声明段中声明（ ）。
匚A、全局变量
口 B、全局常量
C C、全局数组
C D、全局用户自定义类型
7、 在Visual Basic中按文件的访问方式不同，可以将文件分为（ ）。
匚A、顺序文件、随机文件和二进制文件
匕B、文本文件和数据文件
匚C、数据文件和可执行文件
匚D、ASCII文件和二进制文件
8、在顺序文件中（ ）。
C A、每条记录的记录号接从小到大排序
口 B、每条记录的长度按从小到大排序
匚C、按记录的某个关键数据项的排序顺序组织文件
口 D、记录按写入的先后顺序存放，并按写入的先后顺序读出 9、在随机文件中（
A、记录号是通过随机数产生的
匚B、可以通过记录号随机读取记录
C C、记录的内容是随机产生的
匚D、记录的长度是任意的
10、 使用驱动器列表框的（）属性可以返回或设置磁盘驱动器的名称。
匚 A、ChDri ve
匕 B、Drive
匚 C、List
匸 D、Listindex
11、 改变驱动器列表框的Drive属性值将激活（）事件。
—A、
Change
匚B、
Scroll
□ C、
KeyDo wn
匚D、
KeyUP
12、下列（ ）组关键字是Select语句中不可缺少的。
匚 A、Select、
From
From > OlrB y
Select、 here
二、填空题：（每空1分，共26分）
1、GUI是指
2、传统的编程方法是面向
的,Visual Basic是一种面向
程序设计开发工具。
3、VB用于开发
环境下的应用程序。
三种版本。
4、 有
5、一个工程可包括多种类型的文件，其中，
文件；
文件；扩展名为上Bas
的文件表示
文件；包含ActiveX控件的文件扩展名为
6、对象是代码和数据的集合,例如，Visual Basic中的
都是对象。
7、
8、
9、
一个VB应用程序可以包括三种模块：1
、［
每一个过程都有一个使用范围，过程的使用范围称为
在过程中用
10、列表框中的
定义的变量都是局部变量。
属性是数组。列表框中项目的序号是
开始的。列表框Listl中最后一项的序号用
表 Zjs。
属性。要设置
11、要设置Data控件连接数据库的名称，需要设置其
Data控件连接的数据库类型，需要设置其
三、阅读程序，写出结果：（每小题5分，共25分）
1、下面程序是什么结构，功能是什么？
Public Function fn ( n As Integer ) As Integer
If n= 1 Then
Fn=l
Else
Fn=n*fn(n-1)
End if
2、下面程序运行后的输出结果是什么？
Private Sub Command l_Click()
X$=“A”
Y$=“B”
Z$=“C”
For 1=1 To 2
X$=Y$： Y$=Z$： Z$=X$
Next I
Print X$ + Y$ + Z$
End Sub
al
3、下面程序的功能是什么？
Private Sub Command l_Click()
Dim x As Integer, y As Integer
X= 1 :y = 0
Do wh订e x < 5
y=y+x