一、选择题。
1.以下内容中不属vba提供的数据验证函数是。
a）isnull b）isdate
c）isnumeric d）istext
定时”操作中，需要设置窗体的“计时器间隔（timerinterval）”属性值。其计量单位是。
a）微秒 b）毫秒 c）秒 d）分钟。
3.能够实现从指定记录集里检索特点字段值的函数是。
a）nz b）dsum c）rnd d）dlookup
模型层次中处在最顶层的对象是。
a）dbengine b）workspace c）database d）recordset
对象模型中可以打开recordset对象的是。
a）只能是connection对象。
b）只能是command对象。
c）可以是connection对象和command对象。
d）不存在。
函数返回值的类型为。
a）数值b）字符串。
c）变体d）数值或字符串（视输入的数据而定）
的含义是。a）开放数据库互连应用编程接口。
b）数据库访问对象。
c）动态链接库。
d）active数据对象。
8.执行下面的语句后，所弹出的信息框外观样式为。
msgbox "aaaa",vbokcancel+vbquestion,"bbbb"
9.在msgbox(prompt,buttons,title,helpfile,context)函数调用形式中必须提供的参数是。
a）prompt b）buttons c）title d）context
二、填空题。
提供了多个用于数据验证的函数。其中isdate函数用于函数用于判定输入数据是否为数值。
语言中，函数inputbox的功能是函数的功能是显示消息信息。
的“定时”操作功能是通过窗体的___事件过程完成。
中打开窗体的命令语句是___
的窗体或报表事件可以有两种方法来响应：宏对象和___
6.窗体的计时器触发事件激发的时间间隔是通过___属性来设置。
7.窗体中有两个命令按钮：“显示”（控件名为cmddisplay）和“测试”（控件名cmdtest）。当单击“测试”按钮时，执行的事件功能是。
首先弹出消息框，若点击其中的“确定”按钮，则隐藏窗体上的“显示”按钮；否则直接返回到窗体中。请填空补充完整。
private sub cmdtest_click()
answer隐藏按钮？",vbokcancel+vbquestion,"msg"）
if answer = vbok then
me!end if
end sub
8.设计一个计时的access应用程序。该程序界面如下图所示，由一个文本框（名为text1）、一个标签及两个命令按钮（一个标题为start
命名为command1；另一个标题为stop，命名为commmand2）组成。程序功能为：打开窗体运行后，单击“start”按钮，则开始计时，文本框。
中显示秒数；单击“stop”按钮，则计时停止；双击“stop”按钮，则退出。请填空补充完整。
dim iprivate sub command1_click()
i=0end sub
private sub command2_click()
end sub
private sub command2_dblclick(cancel as integer)
docmd.__
end subprivate sub form_load()
me!text1=0
end sub
private sub form_timer()
i=i+1me!text1=__
end sub
9.要实现以下图示效果的消息框提示，vba**语句为___
中主要提供了3种数据库访问接口：odbc api、__和___
对象模型采用分层结构，其中位于最高层的对象是___
的vba编程操作本地数据库时，提供一种dao数据库打开的快捷方式是___而相应也提供一种ado的默认连接对象是。
模型中，主要的控制对象有querydef和error。
对象模型主要有和error5个对象。
15.已知一个为“学生”的access数据库，库中的表“stud”存储学生的基本情况信息，包括学号、姓名、性别和籍贯。下面程序的功能是。
通过窗体向stud表中添加学生记录。对应“学号”、“姓名”、“性别”和“籍贯”的4个文本框的名称分别为：tno、tname、tsex和tres。
当点击窗体上的“增加”命令按钮（名称为command1）时，首先判断学号是否重复，如果不重复则向“stud”表中添加学生记录；如果学号重。
复，则给出提示信息。当点击窗体上的“退出”命令按钮（名称为command2）时，关闭当前窗体。
依据要求功能，请将以下程序补充完整。
private sub form_load()
'打开窗口时，连接access数据库。
set adocn=
end sub
dim adocn as new
private sub command1_click()
'增加学生记录。
dim strsql as string
dim adors as new
set adors。open "select 学号 from stud where 学号='"tno+"'
if not adorsthen
msgbox "你输入的学号已存在，不能新增加！"
elsestrsql="insert into stud(学号，姓名，性别，籍贯)"
strsql=strsql+"values('"tno+"'tname+"'tsex+"'tres+"'
msgbox "添加成功，请继续！"
end if
set adors=nothing
end sub
16.已经设计出一个**式表单窗体，可以输出老师表的相关字段信息。请按照以下功能要求补充设计：
改变当前记录，消息框弹出提示“是否删除该记录？”，单击“是”，则直接删除该当前记录；单击“否”，则什么都不做。其效果图如。
下：'单击“退出”按钮，关闭窗体。
private sub btncancel_click()
end sub
'**式表单窗体当前记录变化时触发。
private sub
if msgbox("是否删除该记录：",vbquestion+vbyesno,"确认then
end if
end sub
17.已经完成一个窗体的部分设计。请按照以下功能要求补充设计：
（1）原始文体处的文本框只接受英文大小写字符和汉字，其他字符输入一律忽略；
（2）单击“复制”按钮，可将原始文本框的选择内容追加到目标文本框内；
（3）目标文本框内字符数超过50，则清空。
其效果图如下：
**如下：dim strtemp as string '存放原始文本框选择文本。
'单击“复制”按钮，实施复制操作。
private sub tcopy_click()
me!tdesttext=nz(me! tdesttext)+strtemp
strtemp=""
ifthen me! tdesttext=null
end sub
'原始文本框接受英文大小写字母和汉字输入。
private sub tsourcetext_keypress(keyascii as integer)
if (keyascii>=asc("a") and keyascii<=asc("z"))or (keyascii>=asc("a") and keyascii<=asc("z"))then
else'输入其他字符，忽略。
end if
end sub
'返回原始文本框选择文本。
private sub tsourcetext_lostfocus()
if me!>0 then
strtemp=__
elsestrtemp=""
end if
end sub
函数主要用于处理___值时的情况；dlookup函数的功用是___
一、选择题。
1．用二维表来表示实体及实体之间联系的数据模型是。
计算机二级access上机解析
1 基本操作题。在考生文件夹中有 学生。mdb 数据库。1 将 学生 表以。txt格式导出到考生文件夹下，第一行包含字段名称。2 为 选课成绩 表创建高级筛选，筛选出课程编号 k003的信息，按照成绩字段升序排列信息。3 在 学生 表中添加 生源 省份 字段，字段类型为 文本 字段大小为15，设置 ...
2023年计算机二级access模拟试题
1 在深度为5的满二 树中，叶子结点的个数为。a 32b 31 c 16d 15 参 b 2 若某二 树的前序遍历访问顺序是abdgcefh，中序遍历访问顺序是dgbaechf，则其后序遍历的结点访问顺序是。a bdgcefha b gdbecfha c bdgaechf d gdbehfca 参 ...
计算机二级access上机试题解析
1 基本操作题。在考生文件夹下有 数据库。1 将考生文件夹下的 个人信息。xls 表导入到数据库中，第一行包含列标题，设置id列为主键，将导入的表命名为 个人信息 2 按照下列要求修改 个人信息 表的设计。3 将 个人信息 表按照服务器id升序排列。1 解题步骤 步骤1 打开数据库后，在 数据库 窗...