国家二级ACCESS机试选择题（VBA编程）模拟试卷1（共150题）

国家二级ACCESS机试选择题（VBA编程）模拟试卷1（共5套）（共150题）国家二级ACCESS机试选择题（VBA编程）模拟试卷第1套一、选择题(本题共30题，每题1.0分，共30分。)1、在VBA中，要引用“学生名单”窗体中的控件对象，正确的格式是A、Forms!学生名单!控件名称[．属性名称]B、Forms．学生名单．控件名称[．属性名称]C、Forms!学生名单!控件名称[!属性名称]D、Forms!学生名单．控件名称[．属性名称]标准答案：A知识点解析：VBA中引用Access窗体中的控件对象的格式为：Forms!窗体名称!控件名[．属性名]，所以选项A正确。2、在窗体中有一个名称为Command1的按钮，该模块内还有一个函数过程：PublicFunctionf(xAsInteger)AsIntegerDimyAsIntegerx=20：y=2：f=x*yEndFunctionPrivateSubCommand1_Click()DimyAsIntegerStaticxAsIntegerx=10y=5y=f(x)Debug．Printx；yEndSub打开窗体运行后，如果单击按钮，则在立即窗口上显示的内容是A、105B、1040C、205D、2040标准答案：D知识点解析：本题主要考查局部变量的使用和函数调用过程中的参数传递。参数传递的方式有传值和传址两种形式，其中默认的方式是传址。本题中Click事件和函数f都有变量y，但都是各自的局部变量，只是同名而已。同样Click事件和函数f中的x也是局部变量(形式参数也属于局部变量)，但此处的参数传递是传址，因此函数f对变量×的修改会带回到Click事件。在Click事件中，调用函数f的同时将参数×以传址的方式传给了函数f。在函数f中×被重新赋值为20，并与函数f的局部变量y相乘得结果40，并通过函数f传回了Click事件。在Click事件中该结果被赋值给该事件的局部变量y，所以调用的结果是Click事件中的局部变量x和y分别变成了20和40。所以此正确答案为选项D。3、若数据库中有表STUD，则下列函数实现的功能是FunctionDropPrimaryKey()DimstrSQLAsStringstrSQL="ALTERTABLESTUDDropCONSTRAINTPRIMARY_KEY"CurrentProject．Connection．ExecutestrSQLEndFunctionA、为关系STUD中设置主关键字B、取消关系STUD中的主关键字C、为关系STUD添加索引D、取消关系STUD的全部索引标准答案：B知识点解析：首先，函数内定义字符串变量strSQL；然后将SQL．语句赋值，该语句的功能是将表STUD中字段学号取消为关键字(ALTER修改、Drop删除、PRIMARYKEY关键字)：最后执行语句执行SQL。所以应选择选项B。4、下列子过程实现对“教师表”中的基本工资涨10％的操作。SubGongZi()DimcnAsNewADODB．ConnectionDimrsAsNewADODB．RecordsetDimfdAsADODB．FieldDimstrConnectAsStringDimstrSQLAsStringSetcn=CurrentProject．ConnectionstrSQL="Select基本工资from教师表"rs．OpenstrSQL，cn，adOpenDynamic，adLockOptimistic，adCmdText’Setfd=rs．Fields("基本工资")DoWhileNotrs．EOF【】rs．Updaters．MoveNextLooprs．Closecn．CloseSetrs=NothingSetcn=NothingEndSub程序空白处【】应该填写的语句是A、fd=fd*1．1B、rs=rs*1．1C、基本工资=基本工资*1．1D、rs．fd=rs．fd*1．1标准答案：A知识点解析：程序中“DoWhileNotrs．EOF”中“rs．EOF”表示文件记录是否是该查询结果集的最后一条记录，如果是，则返回真，如果不是，则返回假。“Setfd=rs．Fields(”基本工资”)”语句为设置“基本工资”字段的引用，本题中需要对“教师表”中的基本工资涨10％，所以程序空白处应该填上“fd=fd*1．1”。5、在计算控件的表达式中必须使用运算符是A、=B、!C、圆括号()D、方括号[]标准答案：A知识点解析：计算控件的表达式中必须以“=”开头，所以选项A正确。6、在窗体“学生信息”中，若要用宏操作GoToControl将焦点移到“学号”字段上，则该宏操作的参数“控件名称”应设置为A、[Forms]![学生信息]![学号]B、[学生信息]![学号]C、[学号]![学生信息]D、[学号]标准答案：D知识点解析：使用GoToControl操作，可以把焦点移到打开的窗体、窗体数据表、表数据表或查询数据表中当前记录的指定字段或控件上。要想将焦点移动到“学号”字段，必需先引用该字段。在Access中引用窗体对象上某一控件的语法格式为：Forms![窗体名称]![控件名称][属性名]，由上述语法格式可知，“控件名称”参数应设置为该控件的字段名称，所以选择选项D。7、下列关于宏操作MessageBox的叙述中，错误的是A、可以在消息框中给出提示或警告B、可以设置在显示消息框的同时扬声器发出嘟嘟声C、可以设置消息框中显示的按钮的数目D、可以设置消息框中显示的图标的类型标准答案：C知识点解析：宏操作MessageBox可以设置“消息”、“发嘟嘟声”、“类型”以及“标题”信息，不能设置消息框中显示的按钮的数目，所以选项C错误。8、内部计算函数Min的功能是A、计算所有指定字段值的最小值B、计算全部数值型字段的最小值C、计算一条记录中数值型字段的最小值D、计算一条记录中指定字段的最小值标准答案：A知识点解析：Min函数的功能是求指定字段值的最小值，所以选项A正确。9、打开报表的宏命令是A、DocmD．OpenTableB、DocmD．OpenReportC、OpenTableD、OpenReport标准答案：D知识点解析：Docmd对象是VBA中使用的，在宏中打开报表对象，直接使用宏命令“OpenReport”，所以选项D正确。10、在Hungarian命名法中使用约定的字首码代表特定的类型，代表复选框的字首码是A、ChkB、CboC、cmdD、opt标准答案：A知识点解析：Hungarian符号使用一组代表数据类型的码。用小写字母作为变量名的前缀，“Chk”代表复选框，“Cbo”代表组合框，“cmd”代表命令按钮，“opt”代表选项按钮，所以选项A正确。11、已知事件对应的程序代码如下：PrivateSubCommand0_Click()DimJAsIntegerJ=100CallGetData(J+5)MsgBoxJEndSubPrivateSubGetData(ByReffAsInteger)f=f+120EndSub运行程序，则输出结果是A、100B、120C、125D、225标准答案：A知识点解析：ByRef是指参数按地址传递，但是在这里面参数是一个表达式(J+5)，表达式的结果会赋给一个临时变量，然后把临时变量的地址传递给f，因此f的计算结果并不会影响J的值。12、下列选项中，与VBA语句：DimNew％，sum!等价的是A、DimNewAsDouble．sumAsSingleB、DimNewAsInteger，sumAsDoUbleC、DimNewAsInteger，sumAsSingleD、DimNewAsDouble，sumAsInteger标准答案：C知识点解析：整数型数据类型标识为Integer，用“％”表示；单精度数据类型标识为Single，用“!”表示，所以选项A正确。13、VBA中要进行读文件操作，应使用的命令是A、InputB、ReadC、GetD、Fgets标准答案：A知识点解析：语法：Input#filenumber，varname，其功能是从已打开的顺序文件中读出一行并将它分配给String变量，所以选择选项A。14、已知过程对应的代码如下：SubProc()f1=0：f2=1Forn=1to5f=f1+f2Debug．Printff1=f2f2=fNextnEndSub过程Proc在立即窗口中依次显示的数值是A、12358B、12345C、1261015D、12468标准答案：A知识点解析：程序执行过程如下：程序初始化f1=0；f2=1；当n=1时；Forn=1to5；执行第一次循环，条件为true；f=f1+f2=0+1=1输出f的值为1；f1=f2=1；f2=f=2；当n=2时；执行第二次循环，条件为true；f=f1+f2=1+1=2输出f的值为2；f1=f2=1；f2=f=2；当n=3时；执行第三次循环，条件为true；f=f1+f2=1+2=3输出f的值为3；f1=f2=2；f2=f=3；当n=4时；执行第四次循环，条件为true；f=f1+f2=2+3=5输出f的值为5；f1=f2：3；f2=f=5；当n=5时；执行第五次循环，条件为true；f=f1+f2=3+5=8输出f的值为8；f1=f2=5；f2=f=8；当n=6时；执行第六次循环，条件为faIse，结束循环。综上所述，程序输出结果依次为1，2，3，5，8，所以选项A正确。15、“用户表”中包含4个字段：用户名(文本，主关键字)，密码(文本)，登录次数(数字)，最近登录时间(日期／时间)。在“登录界面”的窗体中有两个名为tUser和tPassword的文本框，一个登录按钮CommandO。进入登录界面后，用户输入用户名和密码，点击登录按钮后，程序查找“用户表”。如果用户名和密码全部正确，则登录次数加1，显示上次的登录时间，并记录本次登录的当前日期和时间；否则，显示出错提示信息。为完成上述功能，请在程序中【】处填入适当语句。PrivateSubCommand0_Click()DimcnAsNewADoDB．ConnectionDimrsAsNewADODB．RecordsetDimfd1AsADODB．FieldDimfd2AsADODB．FieldDimstrSQLAsStringSetcn=CurrentProject．ConnectionstrSQL="Select登录次数，最近登录时间From用户表Where用户名=’"&Me!tUser&"’And密码=’"&Me!tPassword&"’"rs．OpenstrSQL，ca，adOpenDynamic，adLockOptimistic，adCmdTextSetfd11=rs．Fields("登录次数")Setfd2=rs．Fields("最近登录时间")IfNotrs．EOFThenfd1=fd1+1MsgBox”用户已经登录："&fd1&"次"&Chr(13)&Chr(13)&"上次登录时间："&fd2fd2=Now()【】ElseMsgBox"用户名或密码错误。"EndIfrs．Closecn．CloseSetrs=NothingSetcn=NothingEndSubA、rs．UpdateB、UpdateC、rs．ChangeD、Change标准答案：A知识点解析：本题中的if语句是是否到文件结尾，当执行更新操作fd1=fd1+1；fd2=Now()之后，都需要使用rS．update语句将所更新的记录数据存储到数据库中，所以选项A正确。16、以下程序的功能是求“x^3-5”表达式的值，其中x的值由文本框Text0输入，运算的结果由文本框Text3输出。PrivateSubCommand0_Click()DimxAsInteger，yAsLongMe．Text0=xy=x^3-5Me．Text3=yEndSub上述程序有错误。错误的语句是A、DimxAsIntegerB、Me．Text0=xC、Me．Text3gyD、DimyAsLong标准答案：B知识点解析：根据题意，程序功能是求“x^3*5”表达式的值，×的值由文本框Text0输入，则在程序中应该将Text0的值赋给变量×，而程序中Me．Text0=x的功能是将x的值赋给Text0，所以选择选项B。17、下列代码实现的功能是：若在文本框tNum中输入课程编号，则将在文本框tName显示“课表”中对应的“课程名称”。PrivateSubtNum_AflerUpdate()Me!tName=【】("课程名称"，"课表"，"课程编号=’"&Me!tNum&"’")EndSub则程序中【】处应该填写的是A、DLookupB、SwitchC、DFindD、Choose标准答案：A知识点解析：根据题意，【】处的代码应实现的功能是在“课程表”中查询出“课程编号”等于tNum文本框中数据的“课程名称”，此DLookup函数有此功能。DLookup函数的格式为：DLookup(表达式，记录集[，条件式])。其中表达式用来指定要查询的字段，即题中的“课程名称”。记录集用来指定要查询的范围，即题中的“课程表”。条件式用来指定查询条件，即题中的“课程编号=’”Me!tNum“’”，所以选择选项A。18、已知代码下：DimstrSQLAsStringstrSQL="CreateTableStudent("strSQL=strSQL+"SnoCHAR(10)PRIMARYKEY，"strSQL=strSQL+"SnameVARCHAR(15)NOTNULL，"strSQL=strSQL+"SphotolMAGE)；"DoCmd．RunSQLstrSQL以上代码实现的功能是A、创建表StudentB、删除Student表中指定的字段C、为Student表建立索引D、为Student表设置关键字标准答案：A知识点解析：在SQL语言中，可以使用CREATETABLE语句建立基本表，本题是将创建基本表student的ASQL语句，存放在strSQL变量中，然后使用Docmd．RunSQL命令，执行该SQL语句，所以本题是动态创建表对象Student，所以选项A正确。19、在VBA变量的Hungarian命名法中，代表复选框的字首码是A、ChkB、CboC、cmdD、opt标准答案：A知识点解析：Hungarian符号使用一组代表数据类型的码。用小写字母作为变量名的前缀，“Chk”代表复选框，“Cbo”代表组合框，“cmd”代表命令按钮，“opt”代表选项按钮，所以选项A正确。20、在窗体上有一个按钮，当单击该按钮时，若将窗体标题改为“欢迎”，则设计该宏时应选择的宏操作是A、AddMenuB、RepaintObjectC、SetMenultemD、SetProperty标准答案：D知识点解析：根据题意，单击按钮时调用宏，宏的功能是将窗体的标题改为"欢迎"，窗体的标题属于窗体的一个属性，则宏的功能是改变窗体的属性值，A选项中AddMenu的功能是增加菜单，不符合题意。B选项RepaintObject功能是重画窗体，不符合题。C选项SetMenultem功能是设置菜单元素，不符合题意D。21、有宏M1，依次包含Macro1和Macro2两个子宏，以下叙述中错误的是A、创建子宏的目的是方便对宏的管理B、可以用RunMacro宏操作调用子宏C、调用M1中Macro1的正确形式是M1．Macro1D、如果调用M1则顺序执行Macro1和Macro2两个子宏标准答案：D知识点解析：创建子宏的目的是方便对宏的管理，A选项正确；使用RunMacro宏操作命令可以调用子宏，调用的格式为：宏名．子宏名，B、C选项正确；如果调用M1则只会执行Macro1，不会执行Macro2，所以选项D叙述错误。22、内置计算函数Max的功能是A、计算所有指定字段值的最大值B、计算全部数值型字段的最大值C、计算一条记录中数值型字段的最大值D、计算一条记录中指定字段的最大值标准答案：A知识点解析：Max函数的功能是求指定字段值的最大值，所以选项A正确。23、打开数据表的是宏命令是A、DocmD．OpenTableB、DocmD．OpenReportC、OpenTableD、OpenReport标准答案：C知识点解析：Docmd对象是VBA中使用的，在宏中打开表对象，直接使用宏命令“OpenTable”，所以选顼C正确。24、与VBA语句DimVar％，sum!等价的是A、DimVarAsInteger，sumAsSingleB、DimVarAsInteger，sumAsDoubleC、DimVarAsSingle．sumAsDoubleD、DimVarAsDouble，sumAsSingle标准答案：A知识点解析：整数型数据类型标识为工nteger，用“％”表示；单精度数据类型标识为single，用“!”表示，所以选项A正确。25、VBA程序中，打开窗体应使用的命令是A、DoCmd．OpenFormB、Docmd．OpenReportC、OpenFormD、OpenReport标准答案：A知识点解析：Docmd对象是VBA中使用的，打开窗体对象，使用命令“Docmd．OpenForm”，所以选项A正确。26、与DateDiff("m"，#1893-12-26#，Date())等价的表达式是A、(Month(date())-Month(#1893-12-26#))B、(MonthName(date())-MonthName(#1893-12-26#))C、(year(date())-year(#1893-12-26#))*12-(month(date())-month(#1893-12-26#)D、(year(date())-year(#1893-12-26#))*12+(month(date())-month(#1893-12-26#)标准答案：D知识点解析：日期／时间函数DateDiff(间隔类型，日期1，日期2[W1][，W2])区回两个日期之间按照间隔类型指定的时间间隔数目。题目中的间隔类型为ilmll表示月，函数Date()获得当前系统日期，表达式的结果是当前系统日期与1893-12-26之间相差的月数，即为“(当前年份-1893)+12+(当前月份-12)”，所以选择选项D。27、要从记录集中得到符合条件的特定字段的值，应使用的内置函数是A、DLookupB、DCountC、DFirstD、DLast标准答案：A知识点解析：DLookup表示从记录集中检索特定字段的值；DCount函数用于返回指定记录集中的记录数；如果只需要表或查询中特定字段的任意值，则可以使用DFirst和DLast函数从该字段返回随机记录。可以在宏、模块、查询表达式或者窗体或报表上的计算控件中使用DFirst和DLast函数。所以选项A正确。28、调用下面子过程，消息框显示的结果是SubSFun()Dimx，y，mx=100：y=200Ifx＞yThenm=xElsem=yEndIfMsgBoxmEndSubA、300B、400C、100D、200标准答案：D知识点解析：本题的if～else语句功能是将变量x和v中的较大值赋给变量m，所以选项D正确。29、已知在“用户表”中包含4个字段：用户名(文本，主关键字)，密码(文本)，登录次数(数字)，最近登录时间(日期／时间)。在“登录界面”的窗体中有两个名为“tUser”和“tPassword”的文本框，一个登录按钮“CommandO”。进入登录界面后，用户输入用户名和密码，点击登录按钮后，程序查找“用户表”。如果用户名和密码全部正确，则登录次数加1，显示上次的登录时间，并记录本次登录的当前日期和时间；否则，显示出错提示信息。为完成上述功能，请在程序【】处填入适当语句。PrivateSubCommand0_Click()DimcnAsNewADODB．ConnectionDimrsAsNewADODB．RecordsetDimfd1AsADODB．FieldDimfd2AsADODB．FieldDimstrSQLAsStringSetcn=CurrentProject．ConnectionstrSQL="Select登录次数，最近登录时间From用户表Where用户名=’"&Me!tUser"’And密码=’"&Me!tPassword&"’"rs．OpenstrSQL，cn，adOpenDynamic，adLockOptimistic，adCmdTextSetfd1=rs．Fields("登录次数")Setfd2=rs．Fields("最近登录时间")IfNotrs．EOFThenfd1=fd1+1MsgBOX”用户已经登录："&fd1&"次"&Chr(13)&Chr(13)&"上次登录时间："&fd2fd2=【】rs．UpdateElseMsgBox"用户名或密码错误。"EndIfrs．Closecn．CloseSetrs=NothingSeton=NothingEndSubA、Now()B、Date()C、Time()D、Day()标准答案：A知识点解析：记录本次登录的当前日期和时间使用Now函数，所以选项A正确。30、以下程序的功能是求“x^3．5”表达式的值，其中x的值由文本框“Text0”输入，运算的结果由文本框“Text1”输出。PrivateSubCommand0_Click()DimxAsInteger，yAsLongMe．Text0=xy=x^3*5Me．Text1=yEndSub运行上述程序时，会有错误。错误的语句是A、DimxAsIntegerB、Me．Text0=xC、Me．Text1=yD、DimyAsLong标准答案：B知识点解析：根据题意，程序功能是求“x^3+5”表达式的值，×的值由文本框Text0输入，则在程序中应该将Text0的值赋给变量x，而程序中Me．Text0=x的功能是将x的值赋给Text0，所以选择选项B。国家二级ACCESS机试选择题（VBA编程）模拟试卷第2套一、选择题(本题共30题，每题1.0分，共30分。)1、VBA中一般采用Hungarian符号法命名变量，代表报表的字首码是A、ChkB、QryC、RptD、Cbo标准答案：C知识点解析：Hungarian符号使用一组代表数据类型的码。用小写字母作为变量名的前缀，“Chk”代表复选框，“Qry"代表查询，“Rpt”代表报表，“Cbo”代表组合框，所以选项C正确。2、在标准模块“模块1”声明区中定义了变量x和变量y，如下所示，则变量x和变量y的作用范围分别是DimxAsIntegerPublicyAsIntegerSubdemoVar()x=3y=5Debug．Printx&""&yEndSubA、模块级变量和过程级变量B、过程级变量和公共变量C、模块级变量和公共变量D、过程级变量和模块范围标准答案：C知识点解析：VBA的变量声明会指明变量的作用域和声明周期，Dim为局部变量，Public为全局变量，Static代表静态变量。在模块区定义的区域，通关Dim定义的变量时模块级变量，通过Public定义的变量是公共变量，所以应选择选项C。3、下列Access内置函数中，用于去掉字符串前后空格的函数是A、LtrimB、RtrimC、SpaceD、Trim标准答案：D知识点解析：LTrim(＜字符串表达式＞)：删除字符串的开始空格：RTrim(＜字符串表达式＞)：删除字符串的尾部空格；Trim(＜字符串表达式＞)：删除字符串的开始和尾部空格；Space(＜数值表达式＞)：返回数值表达式的值指定的空格字符数。本题选项D正确。4、下列程序的输出结果是DimxAsIntegerPrivateSubCommand4_Click()DimyAsIntegerx=1y=10Callfun(y，x)MsgBox"y="&yEndSubSubfun(ByRefyAsInteger，ByValzAsInteger)y=y+zz=y-zEndSubA、y=1B、y=10C、y=11D、y=9标准答案：C知识点解析：在函数参数传递中，包括按地址传递ByRef和按值传递ByVal两种方法。其中前者在函数体内改变变量值会影响参数外的变量，后者不会。本题y是按地址传递，调用fun()函数后，会将y的值改为fun()函数中y的值，所以应选择选项C。5、下列程序的输出结果是PrivateSubCommand3_Click()t=0m=1sum=00t=t+msum=sum+tm=m+1LoopWhilem＜=4MsgBox"Sum="&sumEndSubA、Sum=6B、Sum=10C、Sum=20D、Sum=35标准答案：C知识点解析：本题考查Do～LoopWhile循环的执行过程。Do～LoopWhile循环结构是先执行后判断，循环语句至少执行一次。While关键字用于指明条件为真时执行循环体内语句，当条件为假时，结束循环。该题的循环体要执行4次，第4次结束时m=5，不满足循环的条件，因此循环终止。根据代码执行的结果，最后sum=20，所以选择选项C。6、下列代码实现的功能是：若在窗体中一个名为tNum的文本框中输入课程编号，则程序自动将“课程表”中对应的“课程名称”显示在另一个名为tName文本框中。PrivateSub【】()Me!tName=DLookup("课程名称"，"课程表"，"课程编号=’"&MelTNum&"’")EndSub程序中【】处应填写的是A、tNum_AfterUpdateB、tNum_ChangeC、tNum_OpenD、tNum_Load标准答案：A知识点解析：本题考查的是变量标识符的命名规则。标识符的名字以一个或者多个小写字母开头作为前缀；之后接第一个单词的首字母大写或者多个单词的组合，且该单词要指明变量的用途。本题是根据输入Num然后(After)更新(Update)tName内容，所以选择选项A。7、子过程Plus完成对当前库中“学生表”的年龄字段都加1的操作。SubPlus()DimcnAsNewADODB．ConnectionDimrsAsNewADODB．RecordsetDimfdAsADODB．FieldDimstrConnectAsStringDimstrSQLAsStringSetcn=CurrentProject．ConnectionstrSQL="Select年龄from学生表"rs．OpenstrSQL，cn，adOpenDynamic，adLockOptimistic，adCmdText’Setfd=rs．Fields("年龄")DoWhileNotrs．EOFfd=fd+1rs．Updte【】Looprs．Closeca．CloseSetrs=NothingSetcn=NothingEndSub程序空白处【】应该填写的语句是A、rs．MoveNextB、cn．MoveNextC、rs．NextD、cn．Next标准答案：A知识点解析：本题考查的是如何使用ADO’数据库技术操作数据库。其中，RecordSet对象rs是用来表示来自基本表或命令执行结果的记录集。rs更新完一条记录之后，需要使指针往后移动下一个记录上(注：MoveNext，移动到下一个记录的位置)。因此本题应选择选项A。8、下列关于自动宏的叙述中，正确的是A、打开数据库时不需要执行自动宏，需同时按住Alt键B、打开数据库时不需要执行自动宏，需同时按住Shift键C、若设置了自动宏，则打开数据库时必须执行自动宏D、打开数据库时只有满足事先设定的条件才执行自动宏标准答案：B知识点解析：取消自动运行宏，打开数据库时按住Shift键即可，所以选项B正确。9、下列表达式中，与DateDiif("m"，#2013-11-25#，Date())等价的表达式是A、(Month(date())-Month(#2013-11-25#))B、(MonthName(date())-MonthName(#2013-11-25#))C、(year(date())-year(#2013-11-25#))*12-(month(date())-month(#2013-11-25#)D、(year(date())-year(#2013-11-25#))*12+(month(date0)-month(#2013-11-25#)标准答案：D知识点解析：日期／时间函数DateDiff(间隔类型，日期1，日期2[JW1][，W2])返回两个日期之间按照间隔类型指定的时间间隔数目。题目中的间隔类型为“m”表示月，函数Date()获得当前系统日期，表达式的结果是当前系统日期与2013-11-25之间相差的月数，即为“(当前年份-2013)*12+(当前月份-12)”，所以选择选项D。10、以下关于宏的叙述中，错误的是A、宏是Access的数据库对象之一B、可以将宏对象转换为VBA程序C、不能在VBA程序中调用宏D、宏比VBA程序更安全标准答案：C知识点解析：VBA中调用宏对象，可以使用Docmd．RunMicro"宏名"语句调用宏，所以选项C叙述错误。11、内置计算函数Sum的功能是A、计算所有指定字段值的累加和B、计算全部数值型字段的累加和C、计算一条记录中数值型字段的累加和D、计算一条记录中指定字段的累加和标准答案：A知识点解析：SUM函数的功能是求指定字段值的累加和，所以选项A正确。12、打开选择查询或交叉表查询的宏操作命令是A、Docmd．OpenFormB、Docmd．OpenQueryC、OpenFormD、OpenQuery标准答案：D知识点解析：Docmd对象是VBA中使用的，在宏中打开查询对象，直接使用宏命令“OpenQuerv”，所以选项D正确。13、若要使窗体上的控件“Command0”不可用，正确的设置是A、Command0．Enable=FalseB、Command0．Visible=FalseC、Command0．Enable=TrueD、Command0．Visible=True标准答案：A知识点解析：Enable属性为“可用性”，值设置为“true”表示可用，值设置为“false”表示可见：Visible属性为“可见性”，值设置为“true”表示可见，值设置为“false”表示不可见，所以选项A正确。14、当窗体的大小发生变化时，触发的事件是A、ResizeB、ChangeC、UnloadD、AfterUpdate标准答案：A知识点解析：Resize事件是在打开窗体后，当窗体的大小发生变化时触发的事件。Change事件是当文本框或其它控件中的文本或数据发生变化时触发的事件。Unload事件是加载窗体时激发的事件。AfterUpdate文本框内容更新后激发的事件，所以选择选项A。15、在使用ADO访问数据源时，从数据源获得的数据以行的形式存放一个对象中，该对象应是A、CommandB、RecordsetC、ConnectionD、Parameters标准答案：B知识点解析：ADO(ActiveXDataObjects)提供了编程语言和统一数据访问方式OLEDB的一个中间层，是一个用于存取数据源的COM组件。ADO包含一些顶层的对象：①Connection代表数据库的连接；②Recordset结果集，表示数据库中记录的一个集合；③Command对象主要作用是在VBA中用SQL语句访问、查询数据库中的数据，可以完成Recordset对象不能完成的操作，如创建表、修改表结构、删除表、将查询结果保存为新表等；④Error依赖于Connection对象的使用，代表访问数据库的过程中产生的错误；⑤Field依赖于Recordset对象的使用，代表记录集中的字段数据信息。Parameters依赖于Command对象的使用，代表SQL语句中传递的参数。16、下列关于VBA数据库数据访问的内置域聚合函数的叙述中，错误的是A、域聚合函数可以直接从一个表中取得符合条件的值赋给变量B、域聚合函数可以直接从一个查询中取得符合条件的值赋给变量C、使用域聚合函数之前要完成数据库连接和打开操作D、使用域聚合函数之后无需进行关闭数据库操作标准答案：C知识点解析：域聚合函数和SQL聚合函数，两者提供相似的功能，但用于不同的场合。SQL聚合函数可以在SQL语句中使用，但不能直接从VisualBasic中调用。与之不同的是，域聚合函数不仅可以直接从VisualBasic代码中调用，也可以在SQL语句中使用，不过SQL聚合函数通常更为有效。由于域聚合函数可以直接从VisualBasic代码中调用，因此使用之前不必先进行数据库连接和打开操作，所以选择选项C。17、在VBA中，要引用“学生”窗体中的控件对象，错误的格式是A、Forms!学生!控件名称[．属性名称]B、Forms．学生．控件名称[．属性名称]C、Forms!学生!控件名称[!属性名称]D、Forms!学生．控件名称[．属性名称]标准答案：C知识点解析：VBA中引用Access窗体中的控件对象的格式为：Forms!窗体名称!控件名[．属性名]。注意：引用控件属性时，只能使用“．”不能使用“!”所以选项C错误。18、在窗体中有一个名为“Command1”的按钮，该模块内还有一个函数过程：PublicFunctionf(xAsInteger)AsIntegerDimyAsIntegerx=30y=3f=x*yEndFunctionPrivateSubCommand1_Click()DimyAsIntegerStaticxAsIntegerx=10y=5y=f(x)Debug．Printx；yEndSub打开窗体运行后，如果单击按钮，则在立即窗口上显示的内容是A、105B、1090C、305D、3090标准答案：D知识点解析：本题主要考查局部变量的使用和函数调用过程中的参数传递。参数传递的方式有传值和传址两种形式，其中默认的方式是传址。本题中cIick事件和函数f都有变量y，但都是各自的局部变量，只是同名而已。同样Click事件和函数f中的x也是局部变量(形式参数也属于局部变量)，但此处的参数传递是传址，因此函数f对变量×的修改会带回到Click事件。在Click事件中，调用函数f的同时将参数x以传址的方式传给了函数f。在函数f中x被重新赋值为30，并与函数f的局部变量y相乘得结果90，并通过函数f传回了Click事件。在Click事件中该结果被赋值给该事件的局部变量y，所以调用的结果是Click事件中的局部变量x和y分别变成了30和90，所以正确答案为选项D。19、下列代码实现的功能是：在窗体中一个文本框“tNum”，运行时若在其中输入课程编号，则会自动在“课程表”中找出对应的“课名”显示在另一个名为“tName”文本框中。PrivateSub【】()Me!tName=DLookup("课名"，"课程表"，"课程编号=’"&Me!tNum&"’")EndSub则程序中【】处应该填写的是A、tNurn_AflerUpdateB、tNum_ClickC、tName_AtterUpdateD、tName_Click标准答案：A知识点解析：本题考查的是变量标识符的命名规则。标识符的名字以一个或者多个小写字母开头作为前缀；之后接第一个单词的首字母大写或者多个单词的组合，且该单词要指明变量的用途。本题是根据输入Num然后(After)更新(Update)tName内容，所以选择选项A。20、以下程序的功能是计算并输出两个整数的最大公约数。PrivateSuba1()DimxAsInteger，yAsInteger，tAsIntegerx=InputBox("请输入x的值")y=InputBox("请输入y的值")Do【】x=yy=tLoopWhile(t＜＞0)Debug．Print【】EndSub有如下语句：①t=x②t=y③t=x＼y④t=xMody⑤x⑥y⑦t⑧x／y程序中有两个【】，将程序补充完整的正确语句是A、①⑦B、②⑥C、③⑧D、④⑤标准答案：D知识点解析：求两个整数×和y的最大公约数的算法是：令t等于x除以y的余数，若t=0，则y为x和y的最大公约数。若t不为0，则可以肯定最大公约数必为小于y的数，则可令x=y，y=t，再返回开始状态，执行t=xmody。直到t=0时，x为最大公约数。因此程序中Do和Loop之间为循环体，第一个空应填t=xmody，第二个空为输出语句，应该输出x，所以选择选项D。21、打开名为“学生信息”的窗体时，首先发生的事件是A、打开(Open)B、加载(Load)C、激活(Activate)D、成为当前(Current)标准答案：A知识点解析：打开窗体时，发生的事件依次为：打开(Open)→加载(Load)→调整大小(Resize)→激活(Activate)→成为当前(Current)，所以选项A正确。22、下列表达式中，与DateDiff("m"，#1893-12-26#，Date())等价的表达式是A、(Month(date())-Month(#1893-12-26#))B、(MonthName(date())-MonthName(#1893-12-26#))C、(year(date())-year(#1893-12-26#))*12-(month(date())-month(#1893-12-26#)D、(year(date())-year(#1893-12-26#))*12+(month(date())-month(#1893-12-26#)标准答案：D知识点解析：日期／时间函数DateDiff(间隔类型，日期1，日期2[，W1][，W2])返回两个日期之间按照间隔类型指定的时间间隔数目。题目中的间隔类型为"m"表示月，函数Date()获得当前系统日期，表达式的结果是当前系统日期与1893-12-26之间相差的月数；即为“(当前年份-1893)*12+(当前月份-12)”。23、要在一个窗体的某个按钮的单击事件上添加动作，可以创建的宏是A、只能是独立宏B、只能是嵌入宏C、独立宏或数据宏D、独立宏或嵌入宏标准答案：D知识点解析：独立宏是独立的对象，它独立于窗体、报表等对象之外。在导航窗格中可见。因此可以创建独立宏响应按钮的单击事件，不受其他对象约束。嵌入宏是嵌入在窗体、报表或控件对象的事件中。是他们所嵌入的对象或控件的一部分。在导航窗格中不可见，因此也可以创建嵌入宏，直接嵌入按钮的单击事件中，所以选择选项D。24、内置计算函数Avg的功能是A、计算所有指定字段值的平均值B、计算全部数值型字段的平均值C、计算一条记录中数值型字段的平均值D、计算一条记录中指定字段的平均值标准答案：A知识点解析：Avg函数的功能是求指定字段值的平均值，所以选项A正确。25、打开指定窗体的宏操作命令是A、Docmd．OpenFormB、Docmd．OpenQueryC、OpenFormD、OpenQuery标准答案：C知识点解析：Docmd对象是VBA中使用的，在宏中打开窗体对象，直接使用宏命令“OpenForm”，所以选项C正确。26、若要使窗体上的标签控件Lab1可显示，则在VBA中正确的设置是A、Lab1．Enable=FalseB、Lab1．Visible=FalseC、Lab1．Enable=TrueD、Lab1．Visible=True标准答案：D知识点解析：窗体上的标签控件用于显示说明性的文本，没有数据源，不显示字段或表达式的值，显示的内容是固定不变的。标签控件的属性Visible的功能是设置标签内容的可见性。如Visible属性设为True，则标签控件上的文本可以显示；若设为False，则标签控件的文本不可显示，所以选择D选项。27、在VBA中要定义一个100元素的个整型数组，正确的语句是A、DimNewArray(100)AsIntegerB、DimNewArray(2To101)AsIntegerC、DimNewArray(2To101)D、DimNewArray(100)标准答案：B知识点解析：VBA中定义数组格式为；Dim数组名([下标下限to]下标上限)As数据类型缺省情况下，下标下限为0，数组元素从“数组名(0)”至“数组名(下标上限)”；如果使用to选项，则可以安排非0开始的下标下限。本题中C、D选项没有指定数据类型，默认为变体型，不符合题意；A选项中数组下标默认从0开始，0到100共101个元素，不符合题意；所以只有选项B正确。28、下列关于Access内置函数的分类中，错误的是A、表函数B、转换函数C、文本函数D、程序流程函数标准答案：A知识点解析：在Access中常用的内置函数有财务函数、日期函数、算术函数、文本函数、转换函数、检查函数，没有表函数。所以选择选项A。29、己知过程对应的代码如下：SubProc()n=1f1=0f2=1DoMlilen＜=8f=f1+f2Debug．Printff1=f2f2=fn=n+1LoopEndSub过程Proc在立即窗口中显示的结果是A、斐波那契序列中2到9对应的序列值B、斐波那契序列中2到8对应的序列值C、整数1到n(n＜9)对应的累加和D、整数1到n(n＜8)对应的累加和标准答案：A知识点解析：程序执行过程如下：程序初始化f1=0：f2=1；当n=1时；Forn=1to8：执行第一次循环，条件为true；f=f1+f2=0+1=1输出f的值为1；f1=f2=1；f2=f=2；当n=2时；执行第二次循环，条件为true：f=f1+f2=1+1=2输出f的值为2；f1=f2=1；f2=f=2；当n=3时；执行第三次循环，条件为true；f=f1+f2=1+2=3输出f的值为3；f1=f2=2；f2=f=3；当n=4时；执行第四次循环，条件为true；f=f1+f2=2+3=5输出f的值为5；f1=f2=3；f2=f=5；当n=5时；执行第五次循环，条件为true；f=f1+f2=34-5=8输出f的值为8；f1=f2=5；f2=f=8；当n=6时；执行第六次循环，条件为true；f=f1+f2=5+8=13输出f的值为13；f1=f2=8；f2=f=13；当n=7时；执行第七次循环，条件为true；f=f1+f2=8+13=21．输出f的值为21；f1=f2=13；f2=f=21；当n=8时；执行第八次循环，条件为true；f=f1+f2=113+21=34输出f的值为34；f1=f2=21；f2：f=34；当n=9时；执行第九次循环，条件为false；循环结束。综上所述，输出结果依次为1，2，3，5，8，13，21，34，该数据列是斐波那契序列中2到9对应的序列值(注：第1项为0，第2项为1)，所以选项A正确。30、属于Access域聚合函数的是A、CountB、DMaxC、CDateD、Max标准答案：B知识点解析：Access内置函数中域聚合函数包括DAvg、DCount、DFirst、DLookup、DMax、Dmin等，所以选择选项B。国家二级ACCESS机试选择题（VBA编程）模拟试卷第3套一、选择题(本题共30题，每题1.0分，共30分。)1、打开一个窗体，要通过选择窗体的数据输入与窗体方式，限制窗体所显示的记录，应使用的宏操作命令是A、OpenReportB、OpenTableC、OpenFormD、OpenQuery标准答案：C知识点解析：OpenReport为打开报表，OpenTable为打开表，OpenForm为打开窗体，OpenQuery为打开查询，所以选项C正确。2、在窗体中有一个命令按钮Command1，两个文本框Text0和Text1，按钮Command1对应的代码过程如下：PrivateSubCommand1_Click()Dimm，kAsIntegerDimflagAsBooleanm=Val(Me!Text0)’输入一个整数DoWhile1k=2flag=TrueDo、Whilek＜=m／2AndflagIfmModk=0Thenflag=FalseElsek=k+1EndIfLoopIfflagThenMe!Textl=m’输出计算结果ExitDoElsem=m+1EndIfLoopEndSub运行程序，输入12，单击按钮，程序的输出结果是A、13B、12C、11D、其他整数标准答案：A知识点解析：根据题目要求，输入一个整数赋值给m；外层D0wMe循环条件设置为“1”，表示循环条件永远为“真”，第一次执行循环语句时：k=2；flag=true；内层DoWhilek＜=m／2Andflag循环条件为true，进入内层循环的循环体语句，ifmmodk=0条件为真，执行flag=false语句，内层循环体语句执行结束，然后判断第二次执行的循环条件DoWhilek＜=m／2Andflag循环条件为false，内层循环结束，进入外层循环语句ifflag判断条件为fafse，执行语句m=m+1，m的值为13；继续进行外层循环，第二次执行循环语句时：k=2；flag=false；内层DoWhilek＜=m／2Andflag循环条件为false，内层循环不执行，进入外层循环语句ifflag判断条件为true，执行语句Me!Text1=m，文本框Text1中显示的内容为13，然后执行exitdo语句，结束整个循环，所以最终程序输出的结果为13，选项A正确。3、在窗体中有一个命令按钮Command1，三个文本框Text0、Text1个Text2，命令按钮对应代码过程如下：PrivateSubCommand1_Click()Dimi，f1，f2AsInteger：DimflagAsBooleanf1=Val(Me!Text0)f2=Val(Me!Text1)Iff1＞t2Theni=f2Elsei=f1EndIfflag=TrueDoWhilei＞1AndflagIff1Modi=0And12Modi=0Thenflag=FalseElsei=i-1EndIfLoopMe!Text2=iEndSub运行程序，在文本框Text0和Text1中分别输入15和25，单击按钮后文本框Text2中显示的结果是A、5B、10C、15D、25标准答案：A知识点解析：程序开始时，f1和f2的值分别是从文本框Text0和Text1中输入的值15和25，然后利用if语句判断f1和f2两个数的大小，变量i中存放f1和f2中较小者的值，flag初始值为true，程序进入DoWhile循环语句，首先判断循环条件“i＞1Andflag”，结果为true，循环体中的if语句，只有当f1和f2同时能被i整除，flag才会被赋值为false，否则将变量i减1，继续进行DoWhile循环的条件判断，一旦f1和f2同时能被i整除，变量flag被赋值为false，则整个循环结束，将变量I的值输出到文本框。Text2中，所以只有当变量i为5时，才能同时被f1(15)和f2(25)整除，本题程序的功能是求两个数的最大公约数，故选项A正确。4、在VBA中要定义一个由10个整型数构成的数组，正确的语句是A、DimNewArray(10)AsIntegerB、DimNewArray(2To11)AsIntegerC、DimNewArray(2To11)D、DimNewArray(10)标准答案：B知识点解析：VBA中数组定义的格式为：Dim数组名([下标下界to]下标上界)As数据类型下标下界的默认值为0，本题中要定义一个由10个整型数构成的数组，A选项定义了11个元素，C、D选项未指定数据类型，默认是变体型，B选项定义了10个整型数的数组，所以选项B正确。5、VBA中一般采用Hungarian符号法命名变量，代表命令列表框的字首码是A、lstB、txtC、ChkD、sub标准答案：A知识点解析：Hungarian符号使用一组代表数据类型的码。用小写字母作为变量名的前缀，命令列表框的字首码是“lst”，“txt”代表文本框，“Chk”代表复选框，“sub”代表子窗体／子报表，所以选项A正确。6、VBA中，将字符串的首字母转换为对应的字符代码的函数是A、AscB、StrC、StringD、Chr标准答案：A知识点解析：Asc函数为字符串转换字符ASCII码函数，该函数返回字符串首字符的ASCII码值；str函数为数字转换成字符串函数，该函数将数值表达式的值转换成字符串；Chr。函数为字符ASCII码值转换为字符函数，该函数返回与字符代码相关的字符，String不是类型转换函数，String是返回一个由字符表达式的首字符重复组成的指定长度为数值表达式的字符串，所以选项A正确。7、下列关于内置函数分类的选项中，不是Access内置函数分类的是A、表B、数据库C、数组D、程序流程标准答案：A知识点解析：在Access中常用的内置函数有财务函数、日期函数、算术函数、文本函数、转换函数、检查函数，没有表函数。表是Access的对象，不是函数，所以应选择选项A。8、如果在北京时间12点00分运行以下代码，程序的输出是SubProcedure()IfHour(Time())＞=8AndHour(Time())＜=12ThenDebug．Print"上午好!"ElseIfHour(Time())＞12AndHour(Time())＜=18ThenDebug．Print"下午好!"ElseDebug．Print"欢迎下次光临!"EndIfEndSubA、欢迎下次光临!B、上午好!C、下午好!D、无输出标准答案：B知识点解析：Time()函数可以返回系统当前时间，Hour(Time())可以返回系统当前时间的小时，本程序中的if～elseif多分支判断语句，判断系统当前时间的小时值，如果在8到12点之间(含8点和12点)，则输出“上午好”，如果在12点到18点之间(含18点)，则输出“下午好”，除此之外输出“晚上好”，因为当前系统时间为12点，所以输出“上午好”，所以选项B正确。9、已知过程对应的代码如下：SubProc()f1=0：f2=1Forn=1to8f=f1+f2Debug．Printff1=12：12=fNextnEndSub过程Proc在立即窗口中显示的结果是A、斐波那契序列中2到9对应的序列值B、斐波那契序列中2到8对应的序列值C、整数1到n(n＜9)对应的累加和D、整数1到n(n＜8)对应的累加和标准答案：A知识点解析：本题中程序执行过程：程序初始化f1=0；f2=1；当n=1时：Forn=1to8：执行第一次循环，条件为。true；f=f1+f2=0+1=1输出f的值为1；f1=f2=1；f2=f=2；第一次循环结束；当n=2时；执行第二次循环，条件为true；f=f1+f2=1+1=2，输出f的值为2；f1=f2=1；f2=f=2；当n=3时；执行第三次循环，条件为true；f=f1+f2=1+2=3，输出f的值为3；f1=f2=2；f2=f=3；当n=4时；执行第四次循环，条件为true：f=f1+f2=2+3=5，输出f的值为5；f1=f2=3；f2=f=5；当n=5时；执行第五次循环，条件为true；f=f1+f2=3+5=8，输出f的值为8；f1=f2：5；f2=f=8；当n=6时；执行第六次循环，条件为true：f=f1+f2=5+8=13，输出f的值为13；f1：f2=8；f2=f=13；当n=7时；执行第七次循环，条件为true；f=f1+f2=8+13=21，输出f的值为21；f1=f2=13；f2=f=21；当n=8时；执行第八次循环，条件为true；f=f1+f2=13+21=34，输出f的值为34；f1=f2=21；f2=f=34；当n=9时；执行第九次循环，条件为false；循环结束。综上所述，输出结果依次为1，2，3，5，8，13，21，34，该数据列是斐波那契序列中2到9对应的序列值(注：第1项为0，第2项为1)，所以选项A正确。10、下列Access内置函数中，属于域聚合函数的是A、CountB、DMaxC、CDateD、Max标准答案：B知识点解析：数据库数据访问中常用的域聚合函数有：Nz函数、DCount函数、DAvg函数和DSum函数、DMax函数和DMin函数及DLookup函数，所以选项B正确。11、VBA中读文件的语句是A、Input#B、Read#C、Get#D、Fgets#标准答案：A知识点解析：VBA的输入／输出过程中，使用Open函数打开文件，Input函数提取文件内容，Write函数向文件写入内容，Print函数将一系列值写入打开的文件；Input#语句的功能是从打开的文件中提取数据并向变量赋值，所以选项A正确。12、在窗体中抬起鼠标按钮，触发的事件是A、Form_MouseDownB、Form_MouseUpC、Form_MouseOverD、Form_MouseLeave标准答案：B知识点解析：涉及鼠标操作的事件主要有MouseDown(鼠标按下)、MouseMove(鼠标移动)和MouseUp(鼠标抬起)，所以窗体中抬起鼠标按钮，触发的事件是FormMouseUp，所以选项B正确。13、若存在关系STUD(学号，姓名，性别，年龄)，下列函数Fun的功能是FunctionFun()DimstrSQLAsStringstrSQL="ALTERTABLESTUDDropCONSTRAINTPR／MARY_KEY"CurrentProject．Connection．ExecutestrSQLEndFunctionA、为关系STUD中设置主关键字B、取消关系STUD中的主关键字C、为关系STUD添加索引D、取消关系STUD的全部索引标准答案：B知识点解析：在SQL语句中可以使用ALTERTABLE语句修改己建立的结构，包括添加新字段，修改字段属性，或删除某些字段，其基本格式为：ALTERTABLE＜表名＞[ADD＜新字段名＞＜数据类型＞[字段级完整性约束条件]][DROP[＜字段名＞]…][ALTER＜字段名[＞＜数据类型＞]：命令说明：＜表名＞：指需要修改的表结构的名字。ADD子句：用于增加新字段和该字段的完整性约束条件。DROP子句：用于删除指定的字段和完整性约束，ALTER子句：用于修改原来字段属性，包括字段名称、数据类型等。本题中SQL语句“ALTERTABLESTUDDropCONEFRAINTPRIMARY_KEY”是删除STUD表中的主键，所以选项B正确。14、子过程Plus完成对当前库中“教师表”的工龄字段都加1的操作。SubPlus()DimcnAsNewADODB．ConnectionDimrsAsNewADODB．RecordsetDimfdAsADODB．FieldDimstrConnectAsStringDimstrSQLAsStringSetcn=CurrentProject．ConnectionstrSQL="Select工龄from教师表"rs．OpenstrSQL，cn，adOpenDynamic，adLockOptimistic，adCmdTextSetfd=rs．Fields("工龄")DoWhileNotrs．EOF【】rs．Updaters．MoveNextLooprs．Closecn．CloseSetrs=NothingSetcn=NothingEndSub程序空白处【】应该填写的语句是A、fd=fd+1B、rs=rs+1C、工龄=工龄+1D、rs．fd=rs．fd+1标准答案：A知识点解析：程序中“DoWhileNotrS．EOF”中“rs．EOF”表示文件记录是否是该查询结果集的最后一条记录，如果是，则返回真，如果不是，则返回假。“Setfd=rs．Fields("工龄")”语句为设置“年龄”字段的引用，本题中需要对年龄字段值加1，所以程序空白处应该填上“fd=fd+1”，所以选项A正确。15、打开一个表应使用的宏操作命令是A、OpenReportB、OpenTableC、OpenFormD、OpenQuery标准答案：B知识点解析：OpenReport为打开报表，OpenTable为打开表，OpenForm为打开窗体，OpenQuery为打开查询，所以选项B正确。16、若要将指定的记录成为打开窗体的数据集的当前记录，应该使用的宏操作是A、GoToRecordB、GoToControlC、FindRecordD、ApplyFilter标准答案：A知识点解析：使用“GoToRecord”操作可以使指定的记录成为打开的表、窗体或查询结果集中的当前记录；使用“GoToControl”操作，可以把焦点移到打开的窗体、窗体数据表、表数据表、查询数据表中当前记录的特定字段或控件上；使用“FindRecord”操作，可以查找符合“FindRecord”参数指定的准则的第一个数据实例；使用“ApplyFilter”操作可以对表、窗体或报表应用筛选、查询或“SQLWHERE”子句，以便限制或排序表、基础表以及窗体或报表的查询中的记录，所以选项A正确。17、在设计计算控件中，“控件来源”表达式前都要加上的运算符是A、=B、!C、，D、Like标准答案：A知识点解析：设置计算型控件的控件来源时，计算表达式的第一个符号必须是“=”，所以选项A正确。18、VBA中一般采用Hungarian符号法命名变量，代表命令选项按钮的字首码是A、optB、lstC、ChkD、cmd标准答案：A知识点解析：Hungarian符号使用一组代表数据类型的码。用小写字母作为变量名的前缀，“opt”代表选项按钮，“Ist”代表列表框，“Chk”代表复选框，“cmd”代表命令按钮，所以选项A正确。19、VBA中，将字符代码转换为对应字母的函数是A、AscB、StrC、CStringD、Chr标准答案：D知识点解析：Asc函数为字符串转换字符ASCII码函数，该函数返回字符串首字符的ASCII码值；Str函数为数字转换成字符串函数，该函数将数值表达式的值转换成字符串；Chr函数为字符ASCII码值转换为字符函数，该函数返回与字符代码相关的字符，String不是类型转换函数，CString是返回一个由字符表达式的首字符重复组成的指定长度为数值表达式的字符串，所以选项D正确。20、已知过程GetData的定义如下：PrivateSubGetData(ByReffAsInteger)f=f+2EndSub若在主调过程中采用的调用语句是“CallGetData(J+5)”，则下列选项中正确的是A、由于形式参数被说明为ByRef，则实际参数不能是表达式B、由于形式参数被说明为ByRef，则实际参数应该使用数组名C、将表达式J+5的值传递给变量f，并将f的计算结果返回变量J中D、将表达式J+5的值传递给变量f’但不会将f的计算结果返回变量J中标准答案：D知识点解析：ByRef是指参数按地址传递，但是在这里面参数是一个表达式，表达式的结果会赋给一个临时变量，然后把临时变量的地址传递给f，因此f的计算结果并不会影响J的值，所以应选择选项D。21、下列选项中，与VBA中语句DimNewVar％，sum!等价的是A、DimNewVarAsInteger，sumAsSingleB、DimNewVarAsInteger，sumAsDoubleC、DimNewVarAsSingle，sumAsSingleD、DimNewVarAsSibgle，sumAsInteger标准答案：A知识点解析：整数型数据类型标识为Integer，用“％”表示；单精度数据类型标识为Single，用“!”表示，所以选项A正确。22、下列程序段中，如果变量a中保存的字符是逗号“，”，则以下程序段执行后，变量str的值是SelectCaseaCase"A"To"Z"str="UpperCase"Case"0"To"9"str="Number"Case"!"，"?"，"，"，")"，"；"str="Punctuaton"Case""str="NullString"CaseIs＜32str="SpecialCharacter"CaseElsestr=UnknownCharacter"EndSelectA、UnknownCharacterB、SpecialCharacterC、UpperCaseD、Punctuaton标准答案：D知识点解析：本题考查的是多路分支语句Selectcaser～EndCase知识点。该题将字符“，”赋值给变量a。程序会执行满足case后条件的那一条指令，然后结束程序。本题变量a的值与Case"!"，"?"，"，"，")"，"；"相匹配，所以执行该语句块中的语句“str="Punctuaton"”。因此应选择选项D。23、己知过程对应的代码如下：SubProc()f1=0：f2=1Forn=1to5f=f1+f2Debug．Printff1=f2：f2=fNextnEndSub过程Proc在立即窗口中依次显示的数值是A、12358B、12345C、1261015D、12468标准答案：A知识点解析：程序执行过程如下：程序初始化f1=0；f2=1；当n=1时；Forn=1to5；执行第一次循环，条件为true；f=f1+f2=0+1=1输出f的值为1；fl=f2=1；f2=f=2；当n=2时；执行第二次循环，条件为true；f=f1+f2=1+1=2，输出f的值为2；f1=f2=1；f2=f=2；当n=3时；执行第三次循环，条件为true；f=f1+f2=1+2=3，输出f的值为3；f1=f2=2；f2=f=3；当n=4时；执行第四次循环，条件为true；f=f1+f2=2+3=5，输出f的值为5：f1=f2=3；f2=f=5；当n=5时；执行第五次循环，条件为true；f=f1+f2=3+5=8，输出f的值为8；f1=f2=5；f2=f=8；当n=6时；执行第六次循环，条件为false，结束循环。综上所述，程序输出结果依次为1，2，3，5，8，所以选项A正确。24、下列Access内置函数中，属于域聚合函数的是A、AvgB、DMinC、CDateD、Sum标准答案：B知识点解析：数据库数据访问中常用的域聚合函数有：Nz函数、DCount函数、DAvg函数和DSum函数、DMax函数和DMin函数及DLookup函数，所以选项B正确。25、VBA中写磁盘文件的命令是A、Write#B、Print#C、Put#D、Set#标准答案：A知识点解析：写入文件的过程就是将值添加到相关文件中的过程。文件打开时，Wr