武连职业中学高2015级信息专业月考试4

武连职业中学高2015级信息专业期末试题
________成绩_______
(考试内容为ACCESS2003窗口、宏、数据库安全性 VBA模块)
一、选择题(每题只有一个正确答案，将答案填写在括号内，每题3分，共计105分)
1、以下关于宏的说法中，错误的选项是〔〕。

C.宏操作不能自定义
D.宏通常与窗体、报表中的命令按钮结合使用
2．宏由假设干个宏操作组成，宏组由〔〕组成。

3．关于宏和宏组的说话中，错误的选项是〔〕。

C.运行复杂宏组时，只运行该宏组中的第一个宏
4．创建宏至少要定义一个“操作”，并设置相应的〔〕。

5、多个操作，在运行宏时将按〔〕顺序来运行这些操作。

6．单步执行宏时，“单步执行宏”对话框中显示的内容有〔〕信息。

A.宏名参数
B.宏名、操作名称
C.宏名、参数、操作名称
D.宏名、条件、操作名称、参数
7．在宏设计视图中，〔〕列可以隐藏不显示。

8．如果不指定参数，Close将关闭〔〕。

9．宏可以单独运行，但大多数情况下都与〔〕控件绑定在一起使用。

A.命令按钮
B.文本框
C.组合框
D.列表框
10．使用宏打开表有3种模式，分别是增加、编辑和〔〕。

11、在Access2003中，〔〕不能对数据进行录入和编辑。

A.数据访问页
B. 窗体
C. 报表
D. 表
12、标签控件通常通过〔〕向报表中添加。

A．工具栏 B．属性表 C．工具箱 D．字段列表
13、决定窗体外观的是〔〕。

A．控件 B．标签 C．属性 D．按钮
14、主窗体和子窗体通常用于显示多个表或查询中的数据，这些表或查询中的数据一般应该具有〔〕关系。

A．一对一 B．一对多 C．多对多 D．关联
15、每次只看到一个记录的窗体是( )
A、表格式窗体
B、数据表窗体
C、图表窗体
D、纵栏式窗体
16、以下不是窗体的功能是( )
A、数据的输出
B、数据的输入
C、应用程序的控制
D、数据的显示和编辑
17、利用向导创建窗体时，默认的布局是( )
A、表格
B、纵栏式
C、数据透视表
D、两端对齐
18、不是窗体所可确定的样式是( )
A、标准
B、工业
C、沙岩
D、天气
19、在ACCESS2003中，如果窗体上的数据总是取自某一个表或查询中的记录，或者取自某固定内容中的数据，可以使用控件( )来完成。

A、列表框或组合框
B、选项组擦控件
C、文本框控件
D、复选框控件模块对象
19、一个宏中要打开一个表，应该执行的操作是( )
A、OpenForm B 、OpenReport C、 OpenTable D 、 OpenQuery
20、不是常用的宏工具按钮是( )
A、宏名
B、插入列
C、运行
D、条件
21、报表类型不包括( )
A)纵栏式 B)表格式 C)数据表 D)图表式
22、下面表达正确的选项是( )
A、报表仅仅是将数据输出，在报表中无法完成计算
B、报表中的主页眉、组页脚必须成对出现
C、主报表中可以包含无数个子报表
D、地报表中页眉的页脚只能成对填加
23、在inputbox()中显示对话框提示信息的是( )
A、title
B、prompt
C、caption
D、buttons
24、以下不能输出"Program"的语句是______。

A：Print Left("VBProgram",7)
B：Print Right("VBProgram",7)
C：Print Mid("VBProgram",3)
D：Print Mid("VBProgram",3,7)
25、VBA中定义符号常量可以用关键字
A)Const B)Dim C)Public D)Static
26、VBA程序的多条语句可以写在一行中，其分隔符必须使用符号。

( )
A)： B)’ C)； D)，
27、在窗体上画一个命令按钮和一个文本框，名称分别为Command1和Text1，然后编写如下程序：Private Sub Command1_Click()
a=InputBox("请输入日期〔1～31〕")
t="旅游景点：" _
& IIf ( a > 0 And a <= 10,"长城","") _
& IIf ( a >10 And a <= 20,"故宫","") _
& IIf ( a > 20 And a <= 31,"颐和园","")
Text1.Text = t
End Sub
程序运行后，如果从键盘上输入16，则在文本框显示的内容是______。

A：旅游景点：长城颐和园
B：旅游景点：长城故宫
C：旅游景点：颐和园
D：旅游景点：故宫
28、在窗体中添加一个名称为Command 1的命令按钮，然后编写如下事件代码：Private Sub Commandl_Click()
a=75
If a>60 Then
k=l
ElseIf a>70 Then
k=2
ElseIf a>80 Then
k=3
ElseIf a>90 Then
k=4
End If
MsgBox k
End Sub 打开窗体运行后，单击命令按钮，则消息框的输出结果是( )
A)1 B)2 C)3 D)4
29、定有以下循环结构 Do Until条件
循环体
Loop
则正确的表达是( )
A)如果“条件”值为0，则一次循环体也不执行
B)如果“条件”值为0，则至少执行一次循环体
C)如果“条件”值不为0，则至少执行一次循环体
D)不管“条件”是否为“真”，至少要执行一次循环体
30、在窗体上添加一个命令按钮(名为Commandl)，然后编写如下事件过程：
Private Sub Commandl_Click( )
For i=1 To 4
x=4
Forj=1 To 3
x=3
For k=1 T0 2
x=x+6
Next k
Nextj
Next i
MsgBox x
End Sub
打开窗体后，单击命令按钮，消息框的输出结果是。

A)7 B)15 C)157 D)538
31、在过程中可以用________语句定义变量。

A．Dim、Private B．Dim、Static
C．Dim、Public D．Dim、Static、Private
32. 以下关于方法的表达中，错误的选项是__________。

A．方法是构成对象实体的一个部分 B．方法是一种特殊的过程或函数
C．调用方法的一般格式是：对象名称．方法名称 [参数]
D．在调用方法时，对象名称是不可缺少的
33、．以下变量名中哪个是合法的?
A．_aform B．3frm C．f_1 D．frm 4
34、产生[10，40]之间的随机整数的VB表达式是________。

A．Int(Rnd * 30) + 10 B．Int(Rnd * 31) + 10
C．Int(Rnd * 30) + 11 D．Int(Rnd * 30) + 12
35、在VB中最基本的对象是_________，它是应用程序的基石，也是其他控件的容器。

A．文本框B．命令按钮C．窗体D．标签
二、多项选择(每题4分，共计60分)
1、以下属于Access2003的控件是〔〕。

A．列表框 B．分页符 C．换行符 D．矩形
2、用来作为表或查询中“是”/“否”值的控件是〔〕。

A．复选框 B．切换按钮 C．选项按钮 D．命令按钮
3、窗体的数据源是( )
A、报表
B、查询
C、表
D、宏
4、在ACCESS2003中，可以对数据进行重新排序( )
A、数据表
B、查询
C、窗体
D、报表
5、窗体中常用的视图是( )
A、设计视图
B、窗体视图
C、数据透视表视图
D、数据表视图
6、不是数据库实用工具栏下的命令是( )
A、设置数据库密码
B、备份数据库
C、转换数据库
D、设置工作组权限
7、数字签名主要功能是( )
A、保证信息传输过程中的完整性
B、保证信息传输过程中的安全性
C、发送者的身份认证
D、接收者的身份认证
8、VBA 中程序语句主要有( )
A声明语句 B、赋值语句 C、执行语句 D、毒性
9、VBA中常见的窗口类型有( )
A、代码窗口
B、工程窗口
C、属性窗口
D、本地窗口
10、VBA中的运算符有( )
A、算术运算符
B、逻辑运算符 C 字符串运算符 D、布尔运算符
11、算法的特点是( )
A、有穷性
B、确定性
C、安全性高
D、可读性
12、Access 报表中，每页都会显示或打印的不包括13、用Print 方法可以在对象上输出数据，这些对象包括______。

(A) 窗体 Form 命令按钮 CommandButton (C) 图形框 PictureBox (D) 标签 Label
14、运行工程的正确的操作是〔〕
A：执行“运行”菜单中的“启动”命令 B：单击工具栏中的“启动”按钮
C：按功能键F5 D：按组合键“alt+f5”
15、VBA数组按维数可分为( )
A、一维数组
B、二维数组
C、三维数组
D、多维数组
三、填空题(共计40分)
1、创建窗体的方法是_______、___________、____________
2、一个完整的窗体有_______________、_________、___________、_________
3、控件是______的重要组成部分，可以通过_______设置控件的属性。

4、ACCESS2003的两种编程工具是______、________
5、新建宏后默认的列是______、_________
6、为检查一个宏组是否正确，通常可以运行菜单中“运行”中的________，或者宏工具栏中的
_______
7、对数据库进行管理，主要指_________、___________、__________三个方面
8、在Visual Basic 中，变量从它的作用范围来看，可分为__________、________和_______ 三种。

9、在报表中将数据分组后，可以利用_____功能有，计算出同一分组的总计、平均值等
10、ACCESS2003中内置了___________和________两种自动产生报表的功能；
11、要使宏自动运行，必须将宏名设置为_________、宏执行嵌套，须要________操作
12、VBA中创建程序模块的类型是________、__________
13、在窗体上画一个文本框和一个图片框,然后编写如下两个事件过程:
Private Sub Form_Click()
Text1.Text = "VB程序设计"
End Sub
Private Sub Text1_Change()
Picture1.Print "VBProgramming"
End Sub
程序运行后,单击窗体,在文本框中显示的内容是_________,而在图片框中显示的内容是
_________。

14、以下程序段执行后y的值是。

x=8．6
y=int(x+0.5)
print y
15、数组默认的下标为0，如果将下标改为1，则需要在模块前面的公共区域中用________声明
四、填程题( 40分)
1、以下程序段是计算1+3+5+…+99，请填空。

Private Sub Command1_Click( )
S=0
For _____________________________
__________________
Next k
Print “1+3+5+…+99=”; s
End Sub
2、下述程序段的功能是找出所有三位整数中的“水仙花数”。

水仙花数的特征是：其各位数字的立方和等于该数本身。

[算法一]
For I=_________________________
B1=_________________
B2=_________________
B3=_________________
S=____________________
If S=I then Print I；“是水仙花数”
Next i
3、输入某同学的各科考试成绩，求该生的平均成绩，当从键盘输入的值为-1时，结束成绩输入。

Private Sub Form_Click( )
Dim x as Single
N=0
sum=0
X=InputBox(“请输入第1科成绩：”)
Do While ________________
Sum=_________________
N=_________________
Msg=“请输入第” & ___________ & “科成绩”
X=InputBox(msg)
Loop
If n<>0 Then pj=sum/n : Print “平均成绩是”; pj
4、该程序接受10个数并输出其中的正数,同时计算输出正数之和及负数之和Private Sub Form_Click
Dim n as integer
Nsum=0 : Psum = ________
For i=1 to ______
n = InputBox(“n=”)
If ________Then
Print n;
________________________
Else
Nsum = Nsum + n
End If
__________
Print “正数之和为:”;Psum
Print “负数之和为:”;Nsum
End Sub
5、程序说明: 已知自然对数的底数e的级数表示如下:
e=1+1/1!+1/2!+1/3!+......+1/n!+.....
本程序利用函数过程fact()求e，其中绝对值小于1E-8的项被忽略。

程序代码如下:
Private Function fact(m As Integer) As Single ' 求Ｍ！的函数Dim x As Single, i As Integer
x = 1
for i=1 to m
x=________
Next i
fact = x
End Function
Private Sub Form_Click()
Dim e As Single, item As Single Dim n As Integer
e=1
n=_____
Do
n = n + 1
item=_________
e = e + item
Loop
Form1.Print "e="; e
End Sub
五、判断题(正确的用A表示，错误的用B表示，每题2分，计20分)
1、在进行数据库管理和安全设置时，数据库可以和他人共享( )
2、、有两种基本类型：类模块和标准模块。

〔〕
3、一个窗体的数据源只能从一个表中选取( )
4、要看到设计窗体的结果，可以使用的快捷键是F5 ( )
5.、一个模块包含一个声明区域，可以只包含一个子过程，或函数( )
7、在宏运行过程中，可以按ctrl+break执行暂停操作
8、面向对象概念主要包括对象、属性、方法、事件等，也可以说对象是代码和数据的结合( ) 9变量名前面不能加缩写的前缀( )
9、在 VBA中所有的标点符号全部在英文下输入( )
10、逻辑运算的优先顺序是and or
not光纤( )
五、操作题 (80分)
1、按右图答复以下问题
1)、在窗体中运用了哪些控件？
2)、取消窗体中分隔线和记录按键如何
进行操作
3)、设计一个宏组，打开和关闭窗体，在打开时给出消息“窗体已经打开”，该如何操作2、利用键盘输入一个字符串，倒序输出，如遇到空格停止输出；
3、编程实现；随机产生20个100-1000之间的整数，并分别求出其奇数和偶数的和，并统计偶数的个数
4、元旦和春节期间，某商场促销，对购物者实现打折促销，一次购物在500元间的享受九折，1000元以上享受八五折，2000元到4000元享受8八折，4000元以上享受七折，分别用ELSEIF 语句和select case 语句编写程序，实现购物金额输入，并计算显示输出购物金额。