一、选择题
1．（B）操作是打开查询。
A. OpenForm B. OpenQuery
C. OpenTable D. OpenMoudle
2．SetValue可以设置的值是（A）。
A. 窗体文本框 B. 字段长度
C. 字段的有效性规则 D.当前系统日期
3．宏设计窗体中，条件是由（A）菜单来设置隐现的。
A. 视图 B. 文件 C. 编辑 D 格式
4．宏组中利用（A）指定宏。
A. 宏的名称 B. 宏 C.宏操作 D.名称和操作
5．对于一个触发事件的属性，应选择宏格式为（A）。
A. 宏组名称.宏 B. 宏 C.宏组 D.都不对
6．Msgbox是（A）的宏。
A. 显示消息框 B.编辑消息 C. 输入消息 D. 撤消消息
7．QUIT宏操作的作用是（A）
A. 关闭数据库 B. 运行的宏 C. 表 D. 窗体
8．Close不可以关闭（C）
A. 当前对象 B. 表 C. 数据库 D. 所有宏
二、判断题
1．通常运行宏的条件是由触发宏的事件发生（√）
2．宏和宏组的区别是使用单一和多种宏操作（×）
3．宏的名字可以写入表达式（×）
4．OpenQuery宏操作只能打开参数查询（×）
5．StopMacro操作可以停止宏的运行（√）
三、参见下图，完成指定任务
（1）解释MsgBox条件列的含义
答：仅当打开窗体中“已借阅数量”中的值不等于0时，显示消息框。
（2）OpenForm打开了哪个对象
答：打开了“撤消证件查询显示窗体”
（3）如果想在执行MsgBox操作时，显示消息“请还清图书再撤销证件”，该如何设置操作参数？
答：将消息参数设为“请还清图书再撤销证件”。
四、思考题
1．建立宏和宏组的主要步骤是什么？
答：
（1） 启动宏设计器
（2） 在宏设计视图中显示“宏名”列（若创建宏组）
（3） 设置“宏名”、“操作及参数”
（4） 保存宏
2．宏的主要作用是什么？
答：创建需连续执行的操作集合。
3．宏的操作中是否有关于表的操作？
答：有，如打开表。
4．执行宏的条件是什么？
答：触发相关事件。
5．在宏中增加操作的条件，如果条件是来自某个窗体的组合框的内容，应用该怎样书写条件？
答：[Forms]![窗体名]！[文本框名] 比较符 表达式。
回复 收起回复 35楼2008-01-06 14:27举报 |
我也说一句
三十六道烦恼风
我勒个去8第七章!
一、选择题
1．下列对象属于ACCESS的根对象的是（A，D）。
A. Debug B. Label
C. Click D. Application
2．下列符号中，不属于VBA的合法变量是（A，C）。
A. Integer B. a123 C. 123a D.x_12
3．使用Dim声明变量，若省略“As类型”，则所创建的变量默认为（C）。
A. Integer B. String C. Variant D 不合法变量
4．当一个表达式中有多种不同类型的运算时，运算符的优先次序为（C）。
A. 逻辑运算符>关系运算符>连
接运算符>算术运算符
B. 关系运算符>算术运算符>逻辑运算符>连接运算符
C.算术运算符>连接运算符>关系运算符>逻辑运算符
D.连接运算符>逻辑运算符>算术运算符>关系运算符
二、填空题
1．VBA是Micresoft Office系列软件的内置编程语言,其语法与独立运行的VB编程语言相互兼容。
2．在VBA的内置函数中，用于显示输出信息的为Msgbox，接收用户输入数据的为Inputbox。
3．一条语句可以分成若干行书写，但在要续行的行尾加上续行符：空格和下划线。
4．在FOR循环中，步长可以是正数，也可以是负数，默认为1。
5．自定义类型变量与数组的相同之处是，由若干个标准数据类型组成。
三、思考题
1．VBA与VB、ACCESS有什么联系？
答：
VBA是ACCESS中由VB派生的编程语言。
2．在ACCESS中，既然已经提供了宏操作，为什么还要使用VBA？
答：在ACCESS中宏提供的是常用的一些操作，但未包含所有。用户在表示一些自我需要的特定操作时，仍需使用VBA代码编写其操作。
3．什么是对象？对象的属性和方法有什么区别？
答：对象即被操作者，对象的属性表述的是其特征，而方法表述的对象的行为。
4．在VBE和ACCESS窗体环境中，对象的属性、事件的使用有何区别？
答：对象属性的使用是为了设置该对象应用时所具有的特征，而事件的使用是为了表述用户及系统对该对象发出某操作动作（如鼠标单击）时其响应的事件代码即操作是什么。
5．利用对象对数据库进行管理的操作时，应注意哪些事项？
答：数据库需事先建立；先启动后应用；内存中正在使用不得删除及移动等。
6．如何在窗体上运行VBA代码？
答：通过触发窗体中某对象的相关事件。
7．为什么要声明变量？未经声明而直接使用的变量是什么类型？
答：为提高内存的使用效率而声明变量。未声明变量的数据类型为“变体型”
8．利用IF语句求3个数X、Y、Z中的最大数，并将其放入MAX变量中。
答：请参看相关“教学管理”数据库窗体中的VBA代码。
Private Sub Command5_Click()
x = InputBox("请输入第一个数x的值", "请输入需比较的数")
max = x
y = InputBox("请输入第二个数y的值", "请输入需比较的数")
If y > max Then max = y
z = InputBox("请输入第三个数z的值", "请输入需比较的数")
If z > max Then max = z
Me.Text1.Value = Str(x) & "," & Str(y) & "," & Str(z)
Me.Text3.Value = max
End Sub
9.编写求解一元二次方程根的程序代码。
答：请参看相关“教学管理”数据库窗体中的VBA代码。
Private Sub Command5_Click()
Dim a%, b%, c%
Dim x1 As Single, x2 As Single, p As Single
a = InputBox("请输入二次项系数的值", "输入一元二次
方程各系数，注意：只可为整数")
b = InputBox("请输入一次项系数的值", "输入一元二次方程各系数，注意：只可为整数")
c = InputBox("请输入常数项的值", "输入一元二次方程各系数，注意：只可为整数")
p = b ^ 2 - 4 * a * c
Select Case p
Case Is < 0 '无实根
Me.Text1.Value = "无实根"
Me.Text3.Value = "无实根"
Case Is = 0 '有相同的二个实根
If a = 0 Then
Me.Text1.Value = -c / b
Me.Text3.Value = Me.Text1.Value
Else
Me.Text1.Value = -b / (2 * a)
Me.Text3.Value = Me.Text1.Value
回复 收起回复 36楼2008-01-06 14:28举报 |
我也说一句
三十六道烦恼风
我勒个去8 End If
Case Is > 0 '有不同的二个实根
If a = 0 Then
Me.Text1.Value = -c / b
Me.Text3.Value = Me.Text1.Value
Else
Me.Text1.Value = (-b + Sqr(p)) / (2 * a)
Me.Text3.Value = (-b - Sqr(p)) / (2 * a)
End If
End Select
End Sub
10.使用select case结构将一年中的12个月份，分成4个季节输出。
答：请参看相关“教学管理”数据库窗体中的VBA代码。
Private Sub Form_Load()
Me.Text1.Value = ""
End Sub
Private Sub Command5_Click()
Me.Text1.Value = ""
m% = InputBox("请输入欲判断季节的月份的值", "注意：只可为1-12之间的整数")
Select Case m
Case 2 To 4 ' 春季
https://www.doczj.com/doc/f05012864.html,bel2.Caption = Trim(Str(m)) & "月份的季节为"
Me.Text1.Value = "春季"
Case 5 To 7 '夏季
https://www.doczj.com/doc/f05012864.html,bel2.Caption = Trim(Str(m)) & "月份的季节为"
Me.Text1.Value = "夏季"
Case 8 To 10 '秋季
https://www.doczj.com/doc/f05012864.html,bel2.Caption = Trim(Str(m)) & "月份的季节为"
Me.Text1.Value = "秋季"
Case 11 To 12, 1
https://www.doczj.com/doc/f05012864.html,bel2.Caption = Trim(Str(m)) & "月份的季节为"
Me.Text1.Value = "冬季"
Case Else '无效的月份
Me.Text1.Value = "输入的是无效的月份"
End Select
End Sub
11.如果事先不知道循环次数，如何用FOR结构实现？
答：可通过两方面实现，其一将循环终值设为足够大；其二通过条件语句和EXIT FOR语句的配合。
12．求100以内的素数。
答：
分析：100以内的素数必然为2以及大于3的奇数，因此可在大于3的奇数中挑选。请参看相关“教学管理”数据库窗体中的VBA代码。
Private Sub Command5_Click()
Dim m As String
Me.Text1.Value = ""
m = "2"
For i% = 3 To 99 Step 2
For j% = 2 To i - 1
Lx% = i Mod j
If Lx = 0 Then
Exit For
End If
Next
If j > i - 1 Then
m = m + " ," + Trim(Str(i))
End If
Next
Me.Text1.Value = m
End Sub
13．能否在一个数组中同时存储几种不同类型的变量？如果能，请举例说明；如果不能，请说明原因。
答：不能在一个数组中同时存储几种步同类型的变量。因为所谓数组是指一组相同类型变量的集合。
14．编写实现学生登记的程序，要求如下：
（1）使用“用户自定义数据类
型”声明一个“学生”变量，其中包括学生的“学号”、“姓名”、“性别”、“出生年月”和“入学成绩”
（2）输入5 个学生的情况，求全体学生“入学成绩”的平均值，并输出每个学生的“学号”和“入学成绩”以及全体学生的平均成绩。
答：可通过设计一个窗体实现，程序代码如下：
Option Compare Database
Private Type stu
xh As String
xm As String
xb As String
csny As Date
rxcj As Integer
End Type
Private Sub Command5_Click()
Dim 学生 As stu, tv As String '定义学生变量及保存向文本框1中添入值的中间变量tv
s% = 0
tv = ""
For i% = 1 To 5
With 学生
.xh = InputBox("请输入第" + Str(i) + "名学生的学号", "", , 1024, 80)
.xm = InputBox("请输入第" & Str(i) & "名学生的姓名", "", , 2024, 80)
.xb = InputBox("请输入第" & Str(i) & "名学生的性别", "", , 3024, 80)
.csny = InputBox("请输入第" & Str(i) & "名学生的出生年月", "", , 4024, 80)
.rxcj = InputBox("请输入第" & Str(i) & "名学生的入学成绩", "", , 5024, 80)
End With
tv = tv + "第" & LTrim(Str(i)) & "名：" + Trim(学生.xh) & Space(1) & Trim(Str(学生.rxcj)) + "；"
s = s + 学生.rxcj
Next
s = s / 5
Me.Text1.Value = tv
Me.Text2.Value = Trim(Str(s))
End Sub
Private Sub Form_Load()
Me.Text1.Value = ""
Me.Text2.Value = ""
End Sub
回复 收起回复 37楼2008-01-06 14:28举报 |
我也说一句
三十六道烦恼风
我勒个去8第八章
一、选择题
1．模块是是存储代码有容器，其中窗体就是一种（A）。
A. 类模块 B. 标准模块 C. 子过程 D. 函数过程
2．在过程内用DIM语句声明的变量为（A）。
A. 局部变量 B. 模块级变量 C. 全局变量 D.静态变量
3．有关对象变量的声明与赋值，下列说法正确的是（D）。
A. 使用DIM声明 B. 使用PUBLIC声明
C. 使用PRIVATE D 使用SET赋值
4．程序调试的目的在于（D）。
A. 验证程序代码的正确性 B. 执行程序代码
C.查看程序代码的变量 D.查找和解决程序代码错误
二、填空题
1．过程是包含VBA代码的基本单位，由一系列可以完成某项指定的操作或计算的语句和方法组成，通常分为SUB过程、FUNCTION过程、PROPERTY过程。
2．在调用过程时，将主调过程的实参传递给被调过程的形参，完成二者的结合。
3．在引用DBENGINE根对象的子对象时，必须添加Microsoft DAO对象库。
4．使用ADO的CONNECTION对象，就可以建立与数据库的连接。
5．可以把错误分成4种类型：语法错误、编译错误、运行错误和逻辑错误。
三、思考题
1．什么是模块？模块分叫几类？
答：
所谓模块是指将 Visual Basic 声明和过程作为一个单元进行存储的集合。通常模块被分成两类即“类模块
”和“标准模块”
2．简述VBA的过程。
答：过程是由 Microsoft Visual Basic 代码组成的单元。它包含一系列执行操作或计算值的语句和方法。
过程分两种类型：Sub 过程和 Function 过程。
Sub 过程
Sub 过程执行一项操作或一系列操作，但是不返回值。可以自行创建 Sub 过程，也可以使用 Microsoft Access 所创建的事件过程模板。
Function 过程
Function 过程（通常只称为函数）将返回一个值，例如计算结果。Microsoft Visual Basic 包含许多内置函数，例如，Now 函数可返回当前的日期与时间。除了这些内置函数外，也可以自行创建自定义函数。因为函数有返回值，所以可以在表达式中使用。
3． Sub 过程和Function 过程有什么不同，调用的方法有什么区别？
答：
主要不同点为Function 过程中必须表述函数的返回值，即需对函数名赋值，而Sub 过程则勿需。
Sub 过程的调用需用调用语句实施，其格式如下：
CALL 过程名（实参表）
或 过程名 实参表
Function 过程通常是作为操作数在表达式中调用，其格式如下：
函数名（实参表）
4．什么是形参？什么是实参？
答：
形参是指过程定义时所表述的形式变量。
实参是指调用过程时，向过程形参所传递的表达式。
5．Public、Private和Static各有什么作用？
答：三者共同点为声明程序体中变量的作用域即有效范围。
Public：声明变量的作用域为应用程序中的所有模块。
Private：声明变量的作用域为本模块中。
Static：声明变量为静态变量，即这些变量在程序运行过程中可保持变量的值，也就是说每次调用过程时，静态变量会保持原来的值。
6．在窗体1通用声明部分声明的变量，可否在窗体2中的过程被访问？
答：若采用Public声明，则可在窗体2中的过程被访问，否则不可。
7．能否直接使用DBengine数据库对象？如果不能，应进行哪些操作？
答： DBengine数据库对象主要包括DAP对象库中的Workspace、Dataspace、Recordset、Field等。在应用程序中这些对象不可直接使用，需事先定义即声明。
8．在引用DAO和ADO对象库后，如何区分ADO与DAO的Recordset对象？
答：DAO是通过openrecordset属性设置调用Recordset对象，
而ADO是通过调用OPEN方法调用Recordset对象。
9.对数据库进行增、改操作后，必须使用什么方法确认？
答：可使用refresh方法确认。
10.简述使用ADO对象操作数据库的基本过程。
答：第一步：创建与数据库连接
第二步：创建记录集
第三步：访问记录集中的记录。
11.为什么要进行程序调试，常用的调试工具有哪些？
答：为找出程序中的错误所在，需进行程序调试。
常用的调试工具有：调试工具栏、
各类查看变量值的窗口（本地窗口；立即窗口；监视窗口；调用堆栈窗口）
12．调试窗体事件代码与标准模块中的代码有无区别？如何调试它们。
答：
无区别，可利用调试工具栏及各类变量查看窗口。
13．如何编写错误处理程序？举例说明。
答：可在程序的开始处放置捕获错误语句，其格式如下
On Error GoTo 标号名。
在程序结束处放置由标号名所标识的错误处理程序体。（注意：标号名需加冒号）
回复 收起回复 38楼2008-01-06 14:29举报 |
我也说一句
三十六道烦恼风
我勒个去8第九章
一、选择题
1．如果想制作选项标签，利用（B）向导进行较为迅速。
A. 图表 B. 标签 C. 报表 D. 表格式报表
2．以下说法不正确的是（C）。（书中为选择正确的）
A. 报表页眉中的任何内容都必须只能在报表的开始处打印一次
B. 如果想在每一页上都必须打印出标题，可以将标题移动到页面页眉中
C. 在设计报表时，页眉和页脚只能同时添加
D. 使用报表可以打印各种标签、发票、订单和信封等
3．根据字段的特性将同性质的数据记录集合在一起，称为（B）数据。
A. 排序 B. 分组 C. 筛选 D 小计
4．查看HTML源文件时，可使用Microsoft（D）编辑器。
A. Word B. Excel C. Access D.脚本
二、填空题
1．报表的种类分为四种：纵栏式报表、表格式报表、图表报表和标签报表。
2．每个报表都有三种视图，使用设计视图可以创建报表或更改已有报表的结构，使用打印预览视图可以查看报表的每一页上显示的数据，使用版面预览视图可以查看报表的版面设置。
3．按文本型字段分组记录时，可将分组形式属性设置为“每一个值”或“前缀字符”。
4．排序是让数据以某种规则依次排列，分组是按照数据的特性将同类数据集合在一起，从而便于报表的综合或统计。
5．数据访问页是一种独立于Access数据库外的HTML文件，也就是说数据访问页是一个网页。
三、思考题
1．简述并比较窗体与报表的形式和用途。
答：
形式的比较：从显示数据方式上分窗体的形式有纵栏式窗体、表格式窗体、数据表式窗体、图表式窗体、数据透视表窗体等；报表的形式有纵栏式报表、表格式报表、图表式报表和标签式报表等。
用途的比较：窗体主要用于表述在显示设备上数据的显示和处理，以实现人机交互；报表主要用于表述在打印设备上数据的输出形式以及对数据的分析和汇总。
2．作为查阅和打印数据的一种方法，与表和查询相比，报表具有哪些优点？
答：主要优点为便于数据的分类汇总。
3．创建报表的方式有吧几种？各有哪些优点？
答：创建报表的方式有自动创建方式、向导方式和设计视图方式。
自动创建方式：简单、快捷。
向导方式：形象、直观、易行。
设计视图方式：自由、灵活。
4．除了报表的设计布局外，报表预览的结果还与什么因素有关？
答：页面设置。
5．使用报表向导创建一个“学生成绩管理”数据库中的“成绩查询”查询的报表，并在成绩查询报表上进行如下操作……。
答：略。
6．如何为报表指定记录源？
答：通过报表对象的“记录源”属性。
7．要实现报表的分组分页打印，应如何设置？
答： 通过“排序与分组”对话框中“保持同页”选择项。
8．略
9.报表与数据访问页的数据输出功能有什么不同？
答：报表的数据输出功能主要为打印而设置；而数据访问页的数据输出功能主要为网页浏览而设置。
10.数据访问页的存储与其他数据库对象有什么区别？。
答：数据访问页对象不象其它数据库对象存储在数据库文件（.mdb）中，而是单独存储于一个HTML文件中。
11.如何预览数据访问页？
答：通过浏览器程序