2023年11月23日发(作者:)

第一套

一、操作题

在考生文件夹下打开一个Access数据库,完成下列操作。

1)在其中创建一个名为Employee的表,表结构如下:

雇员编号(文本,5,主键)、姓名(文本,8、性别(文本,1、出生日期(日期/

时间)、职务(文本,10、简历(备注)、联系电话(文本,8,并输入以下记录:

雇员编号 姓名 性别 出生日期 职务 简历

20001 李宁 1980-1-1 经理 2002年参加工作

20002 郭靖 1984-5-1 职员 曾获“优秀员工”称号

20003 张文 1988-9-9 职员

2)库中的三个表“工程项目”“设备说明”“项目使用设备”已按同名字段建立了表

间的关联。要求创建名为“设备使用情况”的多表选择查询,列出:“工程名”“设

备名”“型号”“数量”“产地”,按工程名排序,建议用SQL查询语句实现。

3)利用库中的“销售记录”表,创建名为“销售金额统计”的计算查询。要求统计每

个销售员在各个销售地区的销售金额总和(列标题为“个人销售金额小计”,建议

SQL查询语句实现。

4)创建一个条件宏,名为conditionMAC,作用是弹出一个对话框,提示“打开学生表

吗?”,单击“确定”,显示stu表的内容;如果单击“取消”,则弹出显示“任务结

束”的对话框。

二、编程题

1、程序真空

打开考生文件夹下的Access数据库。要求补充窗体Judge上的按钮“判

断”的单击事件处理代码,实现下述功能:

判断文本框Text1

中输入的字符是否是

Label1中显示判断结

果。

注:1)不得增、

删窗体上的控件,不得

更改控件的名称;

2)不得删改模块bas0101中的代码;

3)不得删改两行“’#####################”之间的代码;

4)完成后注意保存,且需打开窗体和运行程序,并在运行后关闭程序窗口。

2、程序改错

打开考生文件夹下的Access数据库窗体Compare中有命令按钮“比较”

的单击事件处理代码的功能是:比较Text1Text2中两个数的大小,将比较结果(a>ba=b

a)显示在标签Label1中。

要求更正程序代码中的错误。

注:1)不得增、删窗体上的控件,不得更改控件的名称;

2)不得删改模块*.bas中的代码;

3)不得删改两行“’#####################”之间的代码;

4)完成后注意保存,且需打开窗体和运行程序,并在运行后关闭程序窗口。

3、简单编程

打开考生文件夹下的Access数据库。要求编写窗体CalcExp中的命令按

钮“计算”的单击事件处理代码,实现计算等差数列123,„„,N各项的和,数列的

最后一项N由文本框Text1中输入,计算结果显示在标签Label1中。

注:1)不得增、删窗体上的控件,不得更改控件的名称;

2)不得删改模块bas0301中的代码;

3)不得删改两行“’#####################”之间的代码;

4)完成后注意保存,且需打开窗体和运行程序,并在运行后关闭程序窗口。

4ADO编程

打开考生文件夹下的Access数据库其中含有“课程”表和窗体Course

编写命令按钮“添加”的单击事件处理代码,实现下述功能:

窗体运行时,在4个文本框中输入课程编号、课程名称、学时和学分,单击“添加”

按钮,判断文本框Text1中的课程编号在“课程”表中是否存在。如果不存在,则向“课程”

表中添加记录;否则,不添加记录。

注:1)不得增、删窗体上的控件,不得更改控件的名称;

2)不得删改模块bas0401中的代码;

3)不得删改两行“’#####################”之间的代码;

4)完成后注意保存,且需打开窗体和运行程序,并在运行后关闭程序窗口。

第二套

一、操作题

在考生文件夹下打开一个Access数据库,完成下列操作。

1)使用表视计视图修改“专业”表的结构,增加一个字段为:所属院系(文本,10

并按下列内容修改“专业”表中的记录。

专业编号 专业名称 专业负责人 所属院系

P01

P02

P03

P04

P05

工商管理 余志利 经管学院

金融 钱程 经管学院

机械工程 李志刚 机电学院

会计学 黄欣茹 经管学院

艺术设计 王艺琛 艺术学院

公共基础教学 郑志强 公共基础部

P06

在“关系”窗口中,编辑“教师”表和“课程”表之间的关系为“实施参照完整性”

2)从“课程”“教师”和“专业”三个表中,创建名为“课程基本信息”的多表查询,

查询结果依次列出“课程名称”“学时”“学分”“学期”“教师姓名”“专业名

称”“所属院系”,按学期升序排序,要求用SQL查询语句实现。

3)利用报表向导创建名为“学生课程成绩及平均分”的报表,查看数据方式为“通过

学生”,输出信息包括:学号、姓名、专业名称、课程名称、成绩和每个学生成绩平

均值汇总项(格式为固定、小数位数为2,并以课程名称为升序排序,其他选项默

认。

4)创建一名为“CdMAC1”的条件宏,实现弹出一个对话框,标题为“询问”,信息为

“显示教师信息表吗?”单击“确定”按钮则打开并显示“教师”表内容;单击“取

消”则弹出一个对话框,标题为“提示”,信息为“取消显示”的单按钮对话框。

二、编程题

1、窗体设计

打开考生文件夹下的Access数据库,设计一窗体,各对象的大小、布局

大致如图所示,利用属性窗口设置各对象属性,要求如下:

1)窗体标题为“标签与图形”

2)窗体记录选择器、导航按钮、分隔线为“否”;边框样式为“细边框”;窗体运行

时自动居中;

3)标签控件Label1标题为“矩形与直线”,宋体、12号、加粗、倾斜,前景蓝色即

RGU00255

4矩形控件Box12cm1cm特殊效果为凸起,背景红色即RGU25500

5)直线控件Line13cm,边框样式为点划线、颜色绿色即RGU02550、宽

6磅;

6)矩形控件Box1和直线控件Line1为靠左对齐;

7)窗体保存命名为“Boxline

2、程序改错(填空)题

打开考生文件夹下的Access数据库。更正窗体“Arithmetic”中“运算结

果”按钮的Click事件代码,使其实现:

根据运算符的选取情况,对文本框Text1Text2中的两个数进行相应的“加”“减”

或“乘”运算,并将运算结果显示在标签Label6中。

注:1)不得增、删窗体上的控件,不得更改控件的名称;

2)不得删改模块*.Bas中的代码;

3)只能修改后缀有“ '本行代码有错,需要修改 ”的本行代码;

4)完成后注意保存,且需打开窗体和运行程序,并在运行后关闭程序窗口。

3、简单编程

打开考生文件夹下的Access数据库。调用VBE窗口(热键:Alt+F11

编写其中的函数过程fun3( ),使窗体“Calculation”中“计算”按钮的Click事件实现:

将文本框Text1Text2Text3的值分别赋予abc,求表达式

3a5a23b5b23c5c2

a6b6c6

222

的结果,并将运算结果显示在标签Label3中。

注:1)不得增、删窗体上的控件,不得更改控件的名称;

2)不得删改模块*.Bas中的代码;

3)只能在“ ' *** Code Begin *** ”和 ' *** Code End ***”两行之间

编写代码;

4)完成后注意保存,且需打开窗体和运行程序,并在运行后关闭程序窗口。

4ADO编程

打开考生文件夹下的Access数据库其中含有“学生”表和Turn_Grade

窗体,要求补充窗体“Turn_Grade”中“等级评定”按钮的Click事件代码,实现下述功能:

打开“学生”表,根据每条记录的“综合分”字段值情况进行等级评定,等级结果存放

在当前记录的“等级”字段中。

(注:等级评定规则:综合分≤90,等级为“优秀”80<综合分≤90,等级为“良好”

70<综合分≤80等级为“中等”60<综合分≤70等级为“及格”综合分<60等级为“不

及格”

注:1)不得增、删窗体上的控件,不得更改控件的名称;

2)不得删改模块*.Bas中的代码;

3)只能在“ ' *** User Code Begin *** ”和 ' *** User Code End ***”两行

之间进行代码编写或补充;

4)完成后注意保存,且需打开窗体和运行程序,并在运行后关闭程序窗口。

第三套

一、操作题

在考生文件夹下打开一个Access数据库,完成下列操作。

1)创建一名为“供应商”的表,表结构如下:

供应商编号(文本、4、主键)、公司名称(文本,30、负责人(文本,8、联系电

话(文本,8,输入掩码:99999999、通信地址(文本,30,并输入以下记录:

供应商编号 公司名称 负责人 联系电话 通信地址

G101 86375652

G105 87369628

日盛电器贸易公司 陈日明 中山市城北工业区

启迪电器有限公司 方迪 北海市创业大厦126信箱

龙威电子有限公司 严启开 深圳市智飞大厦73

G106 85686229

“关系”窗口中,添加“供应商”表,创建表“供应商”“入库表”的关系为“实

施参照完整性”、类型“一对多”后保存。

2)以“商品表”“入库表”“供应商”为数据源,创建一名为“入库商品统计”的查

询,使用“总计”统计各商品的总入库数量,查询结果依次列出“商品名”“规格”

“数量”“公司名称”,要求用SQL查询语句实现。

3

以“商品表”和“销售表”为数据源,利用报表向导创建一名

为“商品销售报表”的报表,输出信息包括:商品名、单位、

数量、零售价、销售日期,查看数据方式为“通过销售表”,分

组级别为“商品名”,以“数量”为升序排序,汇总选项以“数

量”为汇总,其他选项默认。

4

创建一名为“FrMAC1”的宏,实现弹出一个提示对话框,信

息为“显示商品表并定位第3条记录”,标题为“提示”,点击

“确定”按钮后,将以只读方式打开“商品表”,并将记录指针

定位在第3条记录。

二、编程题

1、窗体设计

打开考生文件夹下的Access数据库,使用向导创建一窗体,窗体中显示

来自“学生”表中的学号、姓名、性别,且带有子窗体(布局为数据表),子窗体中显示来

自“课程名与成绩查询”中的对应的课程名称和成绩,查看数据方式为“通过学生”表,窗

体名保存为“学生成绩”,子窗体名保存为“课程名称与成绩子窗体”

2、程序改错(填空)题

打开考生文件夹下的Access数据库更正窗体Count_Times“计数”

按钮的Click事件代码,使其实现:

将文本框Text1Text2的值分别赋予ab且要求0a<1000b<100a若条

件符合则在Text3中显示ab之间所有能被3整除的数,并将统计个数显示在标签Label3

中。

注:1)不得增、删窗体上的控件,不得更改控件的名称;

2)不得删改模块*.Bas中的代码;

3)只能修改后缀有“ '本行代码有错,需要修改 ”的本行代码;

4)完成后注意保存,且需打开窗体和运行程序,并在运行后关闭程序窗口。

3、简单编程

打开考生文件夹下的Access数据库。编写窗体“Cal_No2”中 “计算”

按钮的Click事件代码,实现下述功能:

将文本框Text1的值赋予x,按下列分段函数求y,并将y值显示在标签Label3中。

x5(x0)

2

yx1(0x5)

3x2(x5)

注:1)不得增、删窗体上的控件,不得更改控件的名称;

2)不得删改模块*.Bas中的代码;

3)只能在“ ' *** Code Begin *** ”和 ' *** Code End ***”两行之间编写

代码;

4)完成后注意保存,且需打开窗体和运行程序,并在运行后关闭程序窗口。

4ADO编程

打开考生文件夹下的Access数据库,其中含有“教师”表、“专业”表和

Searcher”窗体,要求补充窗体“Searcher”中“查阅”按钮的Click事件代码,实现下述

功能:

在“教师”表中按文本框Text1指定的姓名查找相应教师的信息,若未找到则弹出信息

框显示“查无此人!;若找到,则在窗体相应文本框中显示教师的姓名、性别、出生日期、

“专业”表中对应的专业名称、并在选项组控件Frame1的相应选项按钮处标示教师的职称

情况。

注:1)不得增、删窗体上的控件,不得更改控件的名称;

2)不得删改模块*.Bas中的代码;

3)只能在“ ' *** User Code Begin *** ”和 ' *** User Code End ***”两行

之间进行代码编写或补充;

4)完成后注意保存,且需打开窗体和运行程序,并在运行后关闭程序窗口。

第四套

一、操作题

在考生文件夹下打开一个Access数据库,完成下列操作。

1)打开名为“借阅者信息”的表,修改表结构:设置该表“性别”字段的有效性规则

为:"" Or "",有效性文本为:性别只能输入男或女!并添加如下两条记录:

用户名 姓名 性别 单位 类别 已借数量 借书额度

ly623 0 20

yxp001 0 10

李阳 中文系 教师

姚小萍 电信系 学生

2)以“图书信息”和“图书类别”为数据源,创建一名为“2005年出版图书”的查询,

查询出版日期在2005-01-012005-12-31之间的所有图书,查询结果依次列出“书

名”“作者”“类别名称”“出版单位”“库存总量”“出版日期”,要求用SQL

查询语句实现。

3)以“借阅者信息”“图书信息”和“借书信息”为数据源,利用报表向导创建一名

为“借阅信息报表”的报表,输出信息包括:姓名、单位、书名、作者、出版单位、

借阅日期,查看数据方式为“通过借阅者信息”,以“借阅日期”为升序排序,其他

选项默认。

4)创建一名为“FdMAC1”的宏,以只读方式打开“图书信息”表,利用FindRecord

在记录的所有字段中查找“高等教育”,找到后弹出一个提示对话框,信息为“按确

定继续”,标题为“提示”,点击“确定”按钮后,则继续查找并将记录指针指向下

一条符合条件的记录。

二、编程题

1、窗体设计

打开考生文件夹下的Access数据库,以设计视图形式打开窗体“选项按

钮与复选钮”,利用选项组向导创建性别的选项按钮控件对象,再利用标签和复选框创建兴

趣与爱好的复选框对象,各对象的大小、布局大致如图所示,要求如下:

1)选项按钮控件标题为“性别”,两个子选项的标签、布局大致如图所示,样式为凸

起;

2)标签控件Label1标题为“兴趣与爱好”,其他选项默认;

3)五个复选框控件Check及其相应标签的大小、布局大致如图所示;

4)矩形控件Box1的大小、布局大致如图所示。

5)保存该窗体文件。

2、程序改错(填空)题

打开考生文件夹下的Access数据库。要求补充窗体“F_To_C”中 “转

换”按钮的Click事件代码,实现下述功能:

判断文本框Text1中的数据是否为数值型,若是则赋予f并按公式

c(f32)

5

9

f表示的华氏度转换成对应的摄氏度c,并将c显示在标签Label3中(要求保留3位小数,

4位小数四舍五入)

注:1)不得增、删窗体上的控件,不得更改控件的名称;

2)不得删改模块*.Bas中的代码;

3)只能填充后缀有“ '本行需要补充代码 ”的本行代码;

4)完成后注意保存,且需打开窗体和运行程序,并在运行后关闭程序窗口。

3、简单编程

打开考生文件夹下的Access数据库。编写窗体“Char_Change”中 “转

换”按钮的Click事件代码,实现下述功能:

将文本框Text1中所有字符构成的字符串的所有小写字母转换为大写字母,且其他字符

保持不变,转换后的字符串显示在在标签Label2中。

Dim str1 As String, str2 As String, char As String

Dim n As Integer

str1 = Text1.Value

n = Len(str1)

For i = 1 To n

char = Mid(str1, i, 1)

If Asc(char) >= Asc("a") And Asc(char) <= Asc("z") Then

str2 = str2 + Chr(Asc(char) - 32)

Else

str2 = str2 + char

End If

Next i

n = str2

注:1)不得增、删窗体上的控件,不得更改控件的名称;

2)不得删改模块*.Bas中的代码;

3)只能在“ ' *** Code Begin *** ”和 ' *** Code End ***”两行之间编写

代码;

4)完成后注意保存,且需打开窗体和运行程序,并在运行后关闭程序窗口。

4ADO编程

打开考生文件夹下的Access数据库其中含有“学生”表、“符合条件学

生”表和Sifter窗体,要求补充窗体Sifter“计算平均身高并进行筛选”按钮的Click

事件代码,实现下述功能:

1)计算“学生”表中所有同学的平均身高,并将计算结果显示在文本框Text1中;

2)将“学生”表中所有身高大于等于平均身高的记录添加到“符合条件学生”表中,

并在文本框Text2中显示符合条件的学生数。

注:1)不得增、删窗体上的控件,不得更改控件的名称;

2)不得删改模块*.Bas中的代码;

3)只能在“ ' *** User Code Begin *** ”和 ' *** User Code End ***”两行

之间进行代码编写或补充;

4)完成后注意保存,且需打开窗体和运行程序,并在运行后关闭程序窗口。

第五套

一、操作题

在考生文件夹下打开一个Access数据库,完成下列操作。

1)创建一名为“考生信息”的表,表结构如下:

考生ID(文本、3、主键)、考生姓名(文本,8、性别(文本,2、出生日期(日

期,格式:短日期)、第一学历(查阅向导,其内容来自“学历”表中的“学历”字

段内容)、简历(备注),并输入以下记录:

考生ID 考生姓名 性别 出生日期 第一学历 简历

801 1985-12-05

802 1986-03-12

803 1986-05-16

李梅 本科

许捷刚 专科

吴明星 本科

2)以“考生信息”“考试科目”和“考试成绩”为数据源,创建一名为“考生成绩信

息”的查询,查询结果依次列出“考生ID“考生姓名”“性别”“科目名称”“科

目权重”“成绩”和“权重分”(注:权重分=[科目权重]*[成绩],且按“考生ID

升序排列,要求用SQL查询语句实现。

3)以上述已建立的查询“考生成绩信息”为数据源,利用报表向导创建一名为“考生

平均成绩”的报表,输出信息包括:考生姓名、性别、科目名称、科目权重、成绩,

查看数据方式为“通过考生信息”,以“成绩”为升序排序,汇总选项求“成绩”的

平均值(格式为固定、小数位数为2,其他选项默认。

4)创建一名为“CdfMAC1”的条件宏,以只读方式打开“考生信息”,实现弹出一对

话框,标题为“询问”,信息为“记录指针是否定位在末记录?”,单击“确定”按

钮则记录指针定位到“考生信息”表的末记录;而单击“取消”则记录指针定位在

“考生信息”表的首记录。

二、编程题

1、窗体设计

打开考生文件夹下的Access数据库,以设计视图形式打开窗体“用户登

录”,各对象的大小、布局大致如图所示,要求如下:

1)两个标签Label1Label2的标题分别为:“用户名:”和“密码:,两个文本框

控件Text1Text2的字号均为10,宽3cm,高0.7cm

2“密码”输入文本框控件Text2的“输入掩码”属性为“密码”

3按钮控件Command1标题为“登录”宋体,11号,加粗,前景浅绿色即RGU58

20055

4)保存该窗体文件。

2、程序改错(填空)题

打开考生文件夹下的Access数据库。要求补充窗体“Avg”中 “显示与

计算”按钮的Click事件代码,实现下述功能:

将随机产生的8100200之间的整数显示在文本框Text1中,并在标签Label3中显

示其中最大数与最小数和的平均值。

注:1)不得增、删窗体上的控件,不得更改控件的名称;

2)不得删改模块*.Bas中的代码;

3)只能填充后缀有“ '本行需要补充代码 ”的本行代码;

4)完成后注意保存,且需打开窗体和运行程序,并在运行后关闭程序窗口。

3、简单编程

打开考生文件夹下的Access数据库。编写窗体“Cal_No4”中 “计算”

按钮的Click事件代码,实现下述功能:

根据文本框Text1中输入的n值,按公式

并将计算结果 计算f

f1(12)(123)(1234)(123n)

显示在标签Label2中。

注:1)不得增、删窗体上的控件,不得更改控件的名称;

2)不得删改模块*.Bas中的代码;

3)只能在“ ' *** Code Begin *** ”和 ' *** Code End ***”两行之间编写

代码;

4)完成后注意保存,且需打开窗体和运行程序,并在运行后关闭程序窗口。

4ADO编程

打开考生文件夹下的Access数据库其中含有“商品表”表和Shopping

窗体,要求补充窗体“Shopping”中“确定”按钮的Click事件代码,实现下述功能:

根据文本框Text5中输入的销售数量与组合框Combo1中选取商品编号对应的商品库存

量之间的关系,按下列几种情况进行相应操作并在弹出的信息框中显示相应信息。

1)拟销售数量>库存量 信息框提示“商品拟销售数量超过库存量,无法完成销售!

2)拟销售数量=库存量 删除“商品表”中当前记录,信息框提示“该商品销售后

无库存,请注意进货!

3)库存量-拟销售数量<10 商品表”中当前记录“库存量”字段值更新为最新库存量

(即:库存量=原库存量-拟销售数量)信息框提示“该商品销售后库存量不多,请注意进货!

4)库存量-拟销售数量>=10 商品表”中当前记录“库存量”字段值更新为最新库存

量(即:库存量=原库存量-拟销售数量),信息框提示“商品销售成功!

注:1)不得增、删窗体上的控件,不得更改控件的名称;

2)不得删改模块*.Bas中的代码;

3)只能在“ ' *** User Code Begin *** ”和 ' *** User Code End ***”两行

之间进行代码编写或补充;

4)完成后注意保存,且需打开窗体和运行程序,并在运行后关闭程序窗口。

第六套

一、操作题

在考生文件夹下打开一个Access数据库,完成下列操作。

1)打开名为customer的表,修改表结构:将“客户”字段名改为“客户ID,字段类

型改为(文本,5,主键),并添加以下记录:

客户ID 公司名称 联系人姓名 地址 城市 邮政编码

5004 光明杂志 谢秋丽 黄古路5 深圳 760908

6000 文成公司 唐克斯 临江街32 常州 820097

2)利用库中的“销售记录”表,创建名为“销售业绩分布”的交叉表查询,要求采用

销售员姓名作为行标题,销售地区为列标题,行和列交叉点的内容为该销售员在该

销售地区签订的合同总数。

3)利用库中的“职员”表,创建名为“资深工程师”的条件查询。要求查询雇用日期

1990年之前的工程师,列出其姓名、年龄、职务,建议用SQL查询语句实现。

4)库中的三个表“工程项目”“设备说明”“项目使用设备”已按同名字段建立了表

间的关联。要求创建名为“设备使用情况”的报表,显示:“设备名”“型号”“工

程名” “数量”,还要求按设备名及型号分组,在各组中合计该型号设备的使用数

量并显示之(标题为“小计”

二、编程题

1、程序真空

打开考生文件夹下的Access数据库。要求补充窗体AreaOrGirth上的组

合框的“Change”事件处理代码,实现下述功能:

依据在组合框Combo1中选择(“计算面积”或“计算周长”,计算圆的面积或周长,

圆的半径由文本框Text1输入,计算结果显示在文本框Text2中。

注:1)不得增、删窗体上的控件,不得更改控件的名称;

2)不得删改模块bas0106中的代码;

3)不得删改两行“’#####################”之间的代码;

4)完成后注意保存,且需打开窗体和运行程序,并在运行后关闭程序窗口。

2、程序改错

打开考生文件夹下的Access数据库。窗体Section中有命令按钮“Y=

的单击事件处理代码的功能是:实现对下列分段函数的计算,x的值由Text1中输入,Y

显示在标签Label1中。

x1x10

2

Y

x1x10

要求更正程序代码中的错误。

注:1)不得增、删窗体上的控件,不得更改控件的名称;

2)不得删改模块bas0206中的代码;

3)不得删改两行“’#####################”之间的代码;

4)完成后注意保存,且需打开窗体和运行程序,并在运行后关闭程序窗口。

3、简单编程

打开考生文件夹下的Access数据库要求编写窗体SumNum中的命令按

钮“求和”的单击事件处理代码,实现计算区间[MN]中所有整数的和,MN的值分别

由文本框Text1Text2中输入,计算结果显示在标签Label1中。

注:1)不得增、删窗体上的控件,不得更改控件的名称;

2)不得删改模块bas0301中的代码;

3)不得删改两行“’#####################”之间的代码;

4)完成后注意保存,且需打开窗体和运行程序,并在运行后关闭程序窗口。

4ADO编程

打开考生文件夹下的Access数据库。其中含有“图书”表和窗体Book

编写Book上的组合框Combo1的“Change”事件处理代码,实现下述功能:

1)组合框Combo1中选择某一书号后,查询并显示书名、单价、数量于相应文本框;

2)在文本框Text4中显示该图书的总价(单价*数量)

要求补充,实现窗体的功能。

注:1)不得增、删窗体上的控件,不得更改控件的名称;

2)不得删改模块bas0406中的代码;

3)不得删改两行“’#####################”之间的代码;

4)完成后注意保存,且需打开窗体和运行程序,并在运行后关闭程序窗口。