2007-2010山西财经大学VB试题

2009—2010学年第二学期期末

1.属性：程序：事件：数据：窗体：

二、单项选择题（共15 小题，每题1分，共15分）

1.在窗体中添加一个命令按钮，名称为Command1,两个文本框名称分别为Text1、Text2,然后编

写如下程序：Private Sub Command1_Click()

a=Ucase(Text1.text)

b=Lcase(Text2.text)

Print a+space(1)+b

End Sub

程序运行后，单击命令按钮,在文本框Text1、Text2中分别输入 user 和 NAME，结果是（）

A)user NAME B）user name

C）USER NAME D）USER name

2.确定一个控件在窗体上的位置的属性是（）。

A） Width和Height B) Width或Height

C） Top和 Left D) Top或Left

3.在程序运行期间，如果拖动滚动条上的滚动块，则触发的滚动事件是（）。

A）Move B）Change C）Scroll D）GetFocus

4.逻辑运算符And、Or 和Not 的优先顺序，从高到低是（）

A) Or→And→Not B) And→Not→Or

C) Not→Or→And D) Not→And→Or

5.下列（）语句可以将变量A，B的值互换

A) A=B:B=A B) A=C:C=B:B=A

C) A=A+B：B=A-B：A=A-B D）A=（A+B）/2：B=（A+B）/2

6.在窗体上画一个命令按钮Command1，再画两个分别为Label1、 Label2的标签，然后编写如

下程序代码： Private Sub Command1_Click()

X=5:y=3

Call proc(x,y)

Label1.Caption=x

Label2.Caption=y

End sub

Private Sub proc(Byref a as Integer, Byval b as Integer)

x=a*a

y=b+b

End Sub

程序运行后，单击命令按钮，两个标签中显示的内容是（）

A) 5和6 B) 25和3 C) 25和6 D) 5和3

7.当Visual Basic 执行下面语句后，a的值为（）

a=2：b=-1

if a>0 then a=a-b

if b<0 then a=a+b

A) 1 B）2 C） 3 D）4

8.扩展名为MDB的文件是（）

A）窗体文件 B）工程文件 C）Access数据库文件 D）报表文件

9.在窗体中添加一个命令按钮，名称为Command1,两个文本框名称分别为Text1、Text2,然后编

写如下程序：

Private Sub Command1_Click()

C=Ucase(Text1.text)

D=Lcase(Text2.text)

Print C+space(1)+D

End Sub

程序运行后，单击命令按钮,在文本框Text1、Text2中分别输入 visual 和 BASIC，结果是（）

A)visual BASIC B）VISUAL basic

C）VISUAL BASIC D）visual basic

10.在Msgbox函数中哪一个参数是必须的（）。

A) Buttom B) Title C) context D)Prompt

11.函数right(“VISUAL BASIC”,Len(“abcdef”)的值是（）。

A) VISUAL B) BASIC C) 6 D) abcdef

12.在程序运行期间，如果拖动滚动条上的滚动块，则触发的滚动条事件是（）。

A）Move B）Change C）Scroll D）GetFocus

13.Sub过程与Function过程最根本的区别是（）

A)后者可以有参数，前者不可以

B)两者过程参数的传递方式不同

C)前者无返回值，但后者有

D)前者是语句级调用，可以使用Call调用，后者是在表达式中调用

14.如果要向工具箱中加入控件的部件，可以利用工具菜单中的（）命令。

A)工程属性 B)窗体 C)部件 D)引用

15.一种产品可以同时由多家公司代理，一家公司也可以同时代理多种产品，则产品和公司之间的

联系为（）。 A)一对一 B) 一对多 C) 多对一 D) 多对多

三、填空题（共8小题，每空2分，共计20分）

1.变量应该先定义、后使用，在定义时需要说明________________。

2.在选择控制语句中，作为判断依据的是条件表达式，其取值为________________。

3.此刻执行day(now())命令，它的结果是________________。

4.如果要将某个菜单项设计为分隔线，则该菜单项的标题应设置为________________。

5.执行下列程序后，I的值为________、该程序用于计算________________。

Dim s As single

S=0

For I=1 to 100 step 2

S=s+I

Next I

Print s

6.Visual Basic中的注释语句采用________________。

7.程序设计中的三种结构是顺序结构、________________和分支结构。

8.Access数据库由7种对象组成，它们是宏、模块、页、报表、窗体__________、____________。

四、简答题（共2小题，每题5分，共10分）

1. 写出VB下访问ACCESS数据库的步骤。

2．写出你用过的5个控件，分别说明它们的作用是什么？

五、程序设计题（共4小题，每题10 分，共40 分）

1、产生20个3到16之间的随机整数，用Function方法计算这些随机数的阶乘并把它们的结果累加起来。

2、设计一个vb窗体，将输入的学生学号、姓名及年龄数据保存到E盘的顺序文件（xs.txt）中。

3、设计一程序，当输入月份时显示月份所在的季度。

（要求用select case 结构）

4．现有数据库“student.mdb” ,其中有表名为”学生”的数据库表，该表的内容如下：

写出完成以下查询的SQL语句。

(1)查询英语成绩在67到85之间的学生。（2分）

(2)查询籍贯中含有”京”的学生。（2分）

(3)按班级计算英语、数学的平均成绩。（2分）

(4)按出生日期降序排序。（2分）

(5)查询只有班级、姓名及籍贯字段的信息。（2分）

————五.4答案：

(1)Select * from 学生Where 英语between 67 and 85

(2)Select * from 学生Where 籍贯like “京*”

(3)Select avg(英语)，avg(数学) from学生group by 班级

(4)Select * from 学生Order by 出生日期desc （注：desc是降序，asc是升序）

(5)Select 班级，姓名，籍贯from 学生

——————————————————————————————————————————2007—2008学年第二学期期末

一、名词解释题（共 5 小题，每题3分，共计15 分）

对象、属性、方法：程序设计：过程：数据库：窗体：

二、单项选择题（共15 小题，每题1分，共15分）

16.Access数据库所用的数据模型是（）

A）层次数据模型B）关系数据模型

C）网状数据模型D）树状数据模型

17.将内存变量定义为全局变量的命令是（）

A） Static B） Private C） Public D） Dim

18.逻辑运算符And、Or 和Not 的优先顺序，从高到低是（）

A) Or→And→Not B) And→Not→Or

C) Not→Or→And D) Not→And→Or

19.Sub过程与Function过程最根本的区别是（）

E)后者可以有参数，前者不可以

F)两者过程参数的传递方式不同

G)前者无返回值，但后者有

H)前者是语句级调用，可以使用Call调用，后者是在表达式中调用

20.下面（）不是VB的文件类控件

A) DriveListBox B)DirListBox

C) FileListBox D) MsgBox

21.下列（）语句可以将变量A，B的值互换

A) A=B:B=A B) A=C:C=B:B=A

C) A=A+B：B=A-B：A=A-B D）A=（A+B）/2：B=（A+B）/2

22.在窗体上画一个命令按钮Command1，再画两个分别为Label1、 Label2的标签，然后编写如

下程序代码：

Private y as Integer

Private Sub Command1_Click()

X=5:y=3

Call proc(x,y)

Label1.Caption=x

Label2.Caption=y

End sub

Private Sub proc(Byval a as Integer, Byval b as Integer)

x=a*a

y=b+b

End Sub

程序运行后，单击命令按钮，两个标签中显示的内容是（）

A) 5和6 B) 25和3 C) 25和6 D) 5和3

23.当Visual Basic 执行下面语句后，a的值为（）

a=2：b=-1

if a>0 then a=a-b

if b<0 then a=a+b

B) 1 B）2 C） 3 D）4

24.用户自己可以将某个直接常量定义为一个符号（称为符号常量），所用的语句是（）

A） Dim B） Const C） Public D） Private

25.在窗体中添加一个命令按钮，名称为Command1,两个文本框名称分别为Text1、Text2,然后编

写如下程序：

Private Sub Command1_Click()

C=Ucase(Text1.text)

D=Lcase(Text2.text)

Print C+space(1)+D

End Sub

程序运行后，单击命令按钮,在文本框Text1、Text2中分别输入 visual 和 BASIC，结果是（）

B)visual BASIC B）VISUAL basic

C）VISUAL BASIC D）visual basic

26.在Msgbox函数中哪一个参数是必须的（）。

A) Buttom B) Title C) context D)Prompt

27.函数String(5,”VISUAL BASIC”)的值是（）。

A) VISUA B) BASIC C) 5 D)vvvvv

28.下面关于索引的说法中错误的是（）。

A）索引可以加快查找和排序记录的速度

B）如果字段中的许多数据值是相同的，索引将大大加快查询速度

C）索引可能会减慢一些操作查询的执行速度

D）在ACCESS中可以基于单个字段或多个字段来创建记录的索引

29.在程序运行期间，如果拖动滚动条上的滚动块，则触发的滚动条事件是（）。

A）Move B）Change C）Scroll D）GetFocus

30.表示复选框（ChechBox）选中时，Value的值是（）。

A）1 B）0 C）Ture D） Flase

三、填空题（共9小题，每空1分，共计15分）

9.变量应该先定义、后使用，在定义时需要说明________________。

10.在选择控制语句中，作为判断依据的是条件表达式，其取值为________________。

11.当前执行Month(now())命令，它的结果是________________。

12.如果要将某个菜单项设计为分隔线，则该菜单项的标题应设置为________________。

13.一个数据库系统通常由___________、___________、___________、_________、_________成。

14.Visual Basic中的注释语句采用________________。

15.程序设计中的三种结构是顺序结构、________________和循环结构。

16.Access数据库由7种对象组成，它们是宏、模块、页、报表______、________、________。

17.定义语句Dim A（-3 TO 4）AS Integer，定义数组的元素个数是________________。

四、判断题（共5小题，每题1分，共5分）

1.运行查询时，每次都要生成新的表。（）

2.VBA比VB6.0功能更强。（）

3.数据库系统的核心是数据库管理系统。（）

4.在VB程序中可以用命令改变控件的NAME属性。（）

5.父窗体是所谓的MDI窗体，而子窗体就是MDIChild属性设置为True的普通窗体。

五、简答题（共2小题，每题5分，共10分）

1.一个典型的ADO应用过程有哪些？

2．写出你用过的5个控件，分别说明它们的作用是什么？

六、程序设计题（共4小题，每题10 分，共40 分）

1.用Function方法，编程计算S=1/1+1/(1+2)+1/(1+2+3)+……1/(1+2+3+…..+n)。(要求：n从键盘输入)

2．设计一个vb窗体，当输入圆的半径时，计算出圆的面积及周长。

（要求：画出设计的窗体，半径在文本框中输入，单击命令按钮时，面积及周长分别在两个标签中

显示）

3．运输部门的货物运费与里程有关，距离越远，每吨货物的单价就越低。假定每吨单价P元与距离S（公里）之间的关系如下：

P=32 , s<100

P=28 , s>=100并且s<=200

P=25 , s>=201并且s<=300

P=22.5 , s>=301并且s<=400

P=20 , s>=401并且s<=1000

P=15 , s>1000

编写程序从键盘输入要托运的货物重量，然后计算并输出总运费。（要求用select case 结构）

写出完成以下查询的SQL语句。

(6)查询数学成绩在89到93之间的学生。

(7)查询籍贯中含有”京”的学生。

(8)按班级计算英语、数学的平均成绩。

(9)按出生日期降序排序