二级ACCESS分类模拟题176Word下载.docx

上传人:b****2 文档编号:1445374 上传时间:2023-04-30 格式:DOCX 页数:29 大小:29.18KB
下载 相关 举报
二级ACCESS分类模拟题176Word下载.docx_第1页
第1页 / 共29页
二级ACCESS分类模拟题176Word下载.docx_第2页
第2页 / 共29页
二级ACCESS分类模拟题176Word下载.docx_第3页
第3页 / 共29页
二级ACCESS分类模拟题176Word下载.docx_第4页
第4页 / 共29页
二级ACCESS分类模拟题176Word下载.docx_第5页
第5页 / 共29页
二级ACCESS分类模拟题176Word下载.docx_第6页
第6页 / 共29页
二级ACCESS分类模拟题176Word下载.docx_第7页
第7页 / 共29页
二级ACCESS分类模拟题176Word下载.docx_第8页
第8页 / 共29页
二级ACCESS分类模拟题176Word下载.docx_第9页
第9页 / 共29页
二级ACCESS分类模拟题176Word下载.docx_第10页
第10页 / 共29页
二级ACCESS分类模拟题176Word下载.docx_第11页
第11页 / 共29页
二级ACCESS分类模拟题176Word下载.docx_第12页
第12页 / 共29页
二级ACCESS分类模拟题176Word下载.docx_第13页
第13页 / 共29页
二级ACCESS分类模拟题176Word下载.docx_第14页
第14页 / 共29页
二级ACCESS分类模拟题176Word下载.docx_第15页
第15页 / 共29页
二级ACCESS分类模拟题176Word下载.docx_第16页
第16页 / 共29页
二级ACCESS分类模拟题176Word下载.docx_第17页
第17页 / 共29页
二级ACCESS分类模拟题176Word下载.docx_第18页
第18页 / 共29页
二级ACCESS分类模拟题176Word下载.docx_第19页
第19页 / 共29页
二级ACCESS分类模拟题176Word下载.docx_第20页
第20页 / 共29页
亲,该文档总共29页,到这儿已超出免费预览范围,如果喜欢就下载吧!
下载资源
资源描述

二级ACCESS分类模拟题176Word下载.docx

《二级ACCESS分类模拟题176Word下载.docx》由会员分享,可在线阅读,更多相关《二级ACCESS分类模拟题176Word下载.docx(29页珍藏版)》请在冰点文库上搜索。

二级ACCESS分类模拟题176Word下载.docx

B.are

C.you

D.ho

8、VBA中去除字符串前面空格的函数是______。

A.LTrim

B.RTrim

C.Trim

D.Ucase

9、VBA中求字符串长度的函数是______。

A.Len()

B.Length()

C.StrLen()

D.StrLength()

10、在“职工”表中有姓名、性别和生日三个字段,要查询女职工中年龄最小的记录,并显示最小的年龄,正确的SQL命令是______。

A.SELECTMin(Year(Date())-Year([生日]))AS年龄FROM职工WHERE[性别]="

女"

;

B.SELECTMin(Year(Date())-Year(生日))AS年龄FROM职工WHERE性别=女;

C.SELECT年龄FROM职工WHEREMin(Year(Date())-Year([生日]))AND[性别]="

D.SELECT年龄FROM职工WHEREMin(Year(Date())-Year(生日))AND性别=女;

11、能够检索子字符串的函数是______。

A.InStr()

B.Find()

C.LookUp()

D.Seek()

12、“职工”表中有三个字段:

姓名、性别和生日。

要查询男职工中年龄最小的记录,并显示该最小年龄,正确的SQL命令是______。

A.SELECTMin(Year(Date())-Year(生日))AS年龄FROM职工WHERE性别=男;

B.SELECTMin(Year(Date())-Year([生日]))AS年龄FROM职工WHERE[性别]="

男"

C.SELECT年龄FROM职工WHEREMin(Year(Date())-Year(生日))AND性别=男;

D.SELECT年龄FROM职工WHEREMin(Year(Date())-Year([生日]))AND[性别]="

13、下列选项中,不是Access内置函数的是______。

A.Choose()

B.IIf()

C.Switch()

D.If()

14、VBA中如果一行中要写多条语句,则语句之间应使用的分隔符是______。

A.分号

B.逗号

C.冒号

D.空格

15、以下程序的功能是求“x^3-5”表达式的值,其中x的值由文本框Text0输入,运算的结果由文本框Text3输出。

PrivateSubCommand0_Click()

DimxAsInteger

DimyAsLong

Me.Text0=x

y=x^3-5

Me.Text3=y

EndSub

上述程序有错误,错误的语句是______。

A.DimxAsInteger

B.Me.Text0=x

C.Me.Text3=y

D.DimyAsLong

16、执行下列程序段后,变量S的值是______。

DimSAsInteger,nAsInteger

S=0:

n=1

DoWhilen<100

S=S+n

n=n+1

Loop

A.5050

B.4950

C.3000

D.4000

17、执行下列程序段后,变量x的值是______。

x=2:

y=5

DoUntily>5

x=x*y

y=y+1

A.2

B.5

C.10

D.20

18、下列循环结构中,循环体被执行的次数是______。

DimiAsInteger,tAsInteger

Fori=9to0

t=t+1

Nexti

A.0次

B.1次

C.4次

D.5次

19、在VBA中,要打开一个文本文件,应使用的语句是______。

A.Open

B.DoCmd.Open

C.OpenFile

D.DoCmd.OpenFile

20、若有语句:

str1=inputbox("

输入"

"

"

练习"

);

从键盘上输入字符串“示例”后,str1的值是______。

A."

B."

C."

D."

示例"

21、ADO对象模型中有5个主要对象,它们是Connection、Command、RecordSet、Field和______。

A.Database

B.Workspace

C.Error

D.DBEngine

22、下列程序的功能是返回当前窗体的记录集:

SubGetRecNum()

DimrsAsObject

Setrs=______

MsgBoxrs.RecordCount

为保证程序输出记录集(窗体记录源)的记录数,______处应填入的语句是______。

A.Me.Recordset

B.Me.RecordLocks

C.Me.RecordSource

D.Me.RecordSelectors

23、ADO的含义是______。

A.开放数据库互联应用编程窗口

B.数据库访问对象

C.动态链接库

D.ActiveX数据对象

24、在使用ADO访问数据源时,从数据源获得的数据以行的形式存放一个对象中,该对象应是______。

A.Command

B.Recordset

C.Connection

D.Parameters

25、子过程Plus完成对当前库中“教师表”的年龄字段都加1的操作。

SubPlus()

DimcnAsNewADODB.Connection

DimrsAsNewADODB.Recordset

DimfdASADODB.Field

DimstrConnectAsString

DimstrSQLAsString

Setcn=CurrentProject.Connection

strSQL="

Select年龄from教师表"

rs.OpenstrSQL,cn,adOpenDynamic,adLoekOptimistic,adCmdText

Setfd=rs.Fields("

年龄"

DoWhileNotrs.EOF

fd=fd+1

rs.Update

______

rs.Close

cn.Close

Setrs=Nothing

Setcn=Nothing

程序中______处应该填写的语句是______。

A.rs.MoveNext

B.rs.MovePrevious

C.rs.MoveFirst

D.rs.MoveLast

26、子过程Plus完成对当前库中“教师表”的工龄字段都加1的操作。

DimWSAsDAO.Workspace

DimdbAsDAO.Database

DimrsASDAO.Recordset

DimfdAsDA0.Field

Setdb=CurrentDb()

Setrs=db.OpenRecordset("

教师表"

工龄"

DoWhile______

rs.Edit

rs.MoveNext

db.Close

Setdb=Nothing

A.Notrs.EOF

B.rs.EOF

C.Notdb.EOF

D.db.EOF

27、子过程Plus完成对当前库中“教师表”的工龄字段都加1的操作。

DimwsAsDAO.Workspace

DimrsAsDAO.Reeordset

DimfdAsDAO.Field

A.rs.Update

B.ws.Update

C.fd.Update

D.db.Update

28、已知在“用户表”中包含4个字段:

用户名(文本,主关键字),密码(文本),登录次数(数字),最近登录时间(日期/时间)。

在“登录界面”的窗体中有两个名为tUser和tPassword的文本框,一个登录按钮Command0。

进入登录界而后,用户输入用户名和密码,单击“登录”按钮后,程序查找“用户表”。

如果用户名和密码全部正确,则登录次数加1,显示上次的登录时间,并记录本次登录的当前日期和时间;

否则,显示出错提示信息。

为完成上述功能,程序中______处应填写的语句是______。

Dim1.SAsNewADODB.Recordset

Dimfd1AsADODB.Field

Dimfd2AsADODB.Field

Setcn=CurrentProjeet.Connection

Select登录次数,最近登录时间From用户表Where用户名='

&

Me!

tUser&

'

And密码='

tPassword&

rs.OpenstrSQL,cn,adOpenDynamie,adLockOptimistic,adCmdText

Setfd1=rs.Fields("

登录次数"

Setfd2=rs.Fields("

最近登录时间"

IfNotrs.EOFThen

fd1=fd1+1

MsgBox"

用户已经登录:

fd1&

次"

Chr(13)&

上次登录时间:

fd2

fd2=______

Else

用户名或密码错误。

EndIf

A.Now()

B.Date()

C.Time()

D.Day()

29、下列代码实现的功能是:

窗体中一个名为tNum的文本框,运行时在其中输入课程编号,程序在“课程表”中查询,找到对应的“课程名称”显示在另一个名为tName文本框中。

PrivateSubtNum_AfterUpdate()

tName=______

要使程序可以正确运行,______处应该填写的是______。

A.DLookUp("

课程名称"

课程表"

课程编号='

tNum&

B.DLookUp("

C.DLookUp("

D.DLookUp("

30、要从记录集中得到符合条件的特定字段的值,应使用的内置函数是______。

A.DlookUp()

B.DCount()

C.DFirst()

D.DLast()

31、数据库中有“Emp”,包括“Eno”“Ename”“Eage”“Esex”“Edate”“Epany”等字段。

下面程序段的功能是:

在窗体文本框“tValue”内输入年龄条件,单击“删除”按钮完成对该年龄职工记录信息的删除操作。

PrivateSubbtnDelete_Click() 

单击"

删除"

按钮

DimstrSQL 

AsString 

定义变量

deletefromEmp"

'

赋值SQL基本操作字符串

判断窗体年龄条件值无效(空值或非数值)处理

IfIsNull(Me!

tValue)=TrueOrIsNumeric(Me!

tValue)=False 

Then

年龄值为空或非有效数值!

vbCritical,"

Error"

窗体输入焦点移回年龄输入的文本框"

tValue"

控件内

tValue.SetFocus

构造条件删除查询表达式

strSQL=strSQL&

whereEage="

tValue

消息框提示"

确认删除?

(Yes/No)"

选择"

Yes"

实施删除操作

IfMsgBox("

vbQuestion+vhYesNo,"

确认"

)=vbYesThen

执行删除查询

DoCmd.______strSQL

completed!

vbInformation,"

Msg"

按照功能要求,下画线处应填写的是______。

A.Execute

B.RunSQL

C.Run

D.SQL

32、采用DAO完成对“教学管理.accdb”文件中“学生表”的学生年龄都加1的操作,程序下画线处应填写的语句是______。

SubSetAgePlus()

DimrsAsDAO.Recordset

学生表"

DoWbileNotrs.EOF

A.rs.Fields.Edit

B.rs.Edit

C.Fields.Edit

D.Edit

33、假设数据库中有学生信息表stud(sno,sname,ssex)。

其中,性别ssex字段已建索引,要在调试窗口中显示第一个男同学的信息,程序下画线处应填写的语句是______。

PrivateSubForm_Load()

DimrsAsADODB.Recordset

Setrs=NewADODB.Reeordset

rs.ActiveConnection="

Provider=Microsoft.Jet.OLEDB.4.0;

DataSource=e:

\考试中心教程\教学管理.accdb;

rs.CursorType=adOpenKeyset

rs.LockType=adLockOptimistie

rs.Index="

ssex"

rs.Open"

stud"

,,,adCmdTableDirect

Debug.Printrs("

sno"

),rs("

sname"

A.rs.Find"

adSeekFirstEQ

B.rs.Seek"

C.rs.Find"

adSeekLastEQ

D.rs.Seek"

34、在VBA代码调试过程中,能够显示出所有在当前过程中的变量声明及变量值信息的是______。

A.快速监视窗口

B.监视窗口

C.立即窗口

D.本地窗口

35、能够实现从指定记录集里检索特定字段值的函数是______。

A.Nz()

D.DLookUp()

36、子过程Plus完成对当前库中“学生表”的年龄字段都加1的操作。

DimrsAsNewADODB.Reeordset

DimfdAsADODB.Field

Select年龄from学生表"

rs.OpenstrSQL,cn,adOpenDynamic,adLockOptimistic,adCmdText'

B.cn.MoveNext

C.rs.Next

D.cn.Next

37、教师管理数据库有数据表“teacher”,包括“编号”“姓名”“性别”和“职称”4个字段。

下面程序的功能是:

通过窗体向“teacher”表中添加教师记录。

对应“编号”“姓名”“性别”和“职称”的4个文本框的名称分别为:

tNo、tName、tSex和tTitles。

当单击窗体上的“增加”命令按钮(名称为Command1)时,首先判断编号是否重复,如果不重复,则向“teacher”表中添加教师记录;

如果编号重复,则给出提示信息。

PrivateADOcn 

AsNewADODB.Connection

打开窗口时,连接Access本地数据库

SetADOcn=CurrentProject.Connection

追加教师记录

DimADOcmd 

AsNewADODB.Command

DimADOrs 

ASNewADODB.Recordset

SetADOrs.ActiveConnection=ADOcn

ADOrs.Open"

Select编号

展开阅读全文
相关资源
猜你喜欢
相关搜索
资源标签

当前位置:首页 > 总结汇报 > 学习总结

copyright@ 2008-2023 冰点文库 网站版权所有

经营许可证编号:鄂ICP备19020893号-2