国家二级ACCESS机试选择题（模块）模拟试卷1（共99题）

国家二级ACCESS机试选择题（模块）模拟试卷1（共4套）（共99题）国家二级ACCESS机试选择题（模块）模拟试卷第1套一、选择题(本题共29题，每题1.0分，共29分。)1、执行下列程序段后，变量a和b的值分别是a＝100：b＝50Ifa>bThena＝a－bElseb＝b＋aEndIfA、50和50B、100和50C、100和150D、150和100标准答案：A知识点解析：本题考查IfElse条件语句，若a＞b则执行a＝a－b。否则执行b＝b＋a。本题a初始值为100，b初始值为50。满足a＞b的条件，执行a＝a－b，即a＝100－50＝50，b的值不变，因此8值为50，b值为50。2、执行下列程序段后，变量s的值是s＝0Forx＝99to1Step－2s＝s＋xNextxA、100B、500C、2500D、5000标准答案：C知识点解析：本题实际上是给出了一个计算1至99之间奇数之和的程序，x初始为99，每循环一次递减2。第一次循环结果：x＝99，s＝0＋99＝99；第二次循环结果：x＝97，s＝99＋97；以此类推，直至x＝1，s＝99＋97＋95＋…＋1＝2500。3、程序执行时，单击窗体后输出结果是Privatesubform_click()DimnasIntegern＝8Whilen＞5n＝n－1Debug．Printn；WendEndSubA、876B、765C、7654D、8765标准答案：B知识点解析：本题考查While…Wend循环语句。若n大于5，反复执行n＝n－1的操作，之后打印输出。本题中n初始值为8，满足n大于5的条件，进入第一次循环，执行n＝8－1＝7，打印输出7；n为7，满足循环条件，进入第二次循环，执行n＝7－1＝6，打印输出6；n为6，满足循环条件，进入第三次循环，执行n＝6－1＝5，打印输出5；n为5不再满足循环条件，跳出循环。因此输出结果为765。4、下列程序的功能是计算1到1000之间所有偶数之和，程序空白处应填写的语句是PrivateSubCommand_Click()DimxAsDoubleFori＝1To1000If_______Thenx＝x＋iEndIfNextiDebug．PrintxEndSubA、iMod2＝0B、xMod2＝0C、iMod2＜＞0D、xMod2＜＞0标准答案：A知识点解析：本题中利用For循环语句与If条件判断语句完成计算1到1000之间所有偶数之和。首先利用For循环使i从1至1000逐个变换，若i为偶数，则执行相加操作，因此应在If语句空白处填写iMod2＝0。5、下列程序段运行后，变量b的值是b＝1DoUntilb＞7b＝b*(b＋1)LoopA、7B、39C、42D、1标准答案：C知识点解析：DoUntil…Loop循环采用的是先判断条件后执行循环体的做法，如果条件为True，则循环体一次都不执行，否则进入循环体执行。本题中，若不满足b＞7的条件，则执行b＝b*(b＋1)。b初始值为1，进入第一次循环，b＝1*(1＋1)＝2；满足循环条件，进入第二次循环，b＝2*(2＋1)＝6；满足循环条件，进入第三次循环，b＝6*(6＋1)＝42，不再满足循环条件，跳出循环，b的值最终为42。6、下列循环语句中，循环体执行的次数是a＝100Doa＝a＋1LoopUntila<＝10A、1B、10C、100D、死循环标准答案：D知识点解析：Do…LoopUntil采用的是先执行循环体后判断条件的做法，首先执行循环，之后进行条件判断，结构是条件式不成立时，重复执行循环，直到条件式成立，结束循环。本题中a初始值为100，进入循环执行a＝a＋1的操作，之后进行a<＝10的条件判断，条件永远不成立，因此本循环是死循环。7、执行下列程序段后，输出结果是n＝0Fori＝1to3Forj＝5To1Step－1n＝n＋1Nextj，iDebug．Printn；j；iA、1204B、1504C、1231D、1531标准答案：B知识点解析：本题考察For循环语句的嵌套。首先执行外层第一次循环，i＝1，内层执行5次循环，n每次加1变为5；执行外层第二次循环，i＝2，同样内层执行5次循环，n每次加1由5变为10；执行外层第三次循环，i＝3，同样内层执行5次循环，n每次加1由10变为15，此时j＝1，执行Nextj，j操作，j变为0，i变为4。因此最终n为15，j为0，n为4。8、要使循环体至少执行一次，应使用的循环语句是A、For－－nextB、While－－wendC、Do－－LoopwhileluntilD、d0[while｜until]－－loop标准答案：C知识点解析：Do…Loopwhile｜until采用的是先执行循环体后判断条件的做法，首先执行循环，之后进行条件判断，无论条件是否成立，循环体都会至少执行一次。因此选项C正确，而其他三个循环语句都会首先进行条件判断，若条件不成立，则不进入循环体。9、单击命令按钮时，下列程序的执行结果为PrivateFunctionP(NAsInteger)StaticsumForI＝1ToNsun＝sum＋1NextIP＝sumEndFunctionPrivateSubCommandl_Click()S＝P(1)＋P(2)＋P(3)＋P(4)Debug．PrintSEndSubA、20B、30C、115D、135标准答案：A知识点解析：本题考察For循环结构。首先看程序中的FunctionP函数，在该函数中，首先定义了静态变量sum，默认初始值为0，然后设置了一个For循环，将函数参数作为For循环的控制条件，通过语句“surn＝sum＋i”，将循环次数累计相加。在单击按钮事件“Commandl_Click()”通过语句“s＝p(1)＋p(2)＋p(3)＋p(4)”调用函数并将函数结果用于计算，下面就来分析一下程序运行过程：P(1)，带入函数P的参数N＝1，For循环运行1次：i＝1：sum＝0＋1＝1，所以P(1)＝1；P(2)，带入函数P的参数N＝2，For循环运行2次：i＝1：sum＝0＋1＝1，i＝2：sum＝1＋2＝3，所以P(2)＝3；P(3)，带入函数P的参数N＝3，For循环运行3次：i＝1：sum＝0＋1＝1，i＝2：sum＝1＋2＝3，i＝3：sum＝3＋3＝6，所以P(3)＝6；P(4)带入函数P的参数N＝3，For循环运行4次：i＝1：sum＝0＋1＝1，i＝2：sum＝1＋2＝3，i＝3：sum＝3＋3＝6，i＝4：sum＝6＋4＝10，所以P(4)＝10；那么，s＝P(1)＋P(2)＋P(3)＋P(4)＝1＋3＋6＋10＝20，所以输出结果为20。10、下列程序段的执行结果是Dima(5)AsStringDimbAsIntegerDimIAsIntegerF0rI＝0T05a(I)＝I＋1Debug．Printa(I)NextIA、123456B、6C、654321D、0标准答案：A知识点解析：本题考察For循环结构。首先定义了一个数组a(5)，之后进行For循环判断，若1满足在0至5范围内，则进入循环体，执行a(I)＝I＋1，之后打印输出a(I)。当I为0时，进入第一次循环，a(0)＝0＋1＝1，输出1，之后I变为1；进入第二次循环，a(1)＝1＋1＝2，输出2，之后I变为2；进入第三次循环，a(2)＝2＋1＝3，输出3，之后I变为3；进入第四次循环，a(3)＝3＋1＝4，输出4，之后I变为4；进入第五次循环，a(4)＝4＋1＝5，输出5，之后I变为5；进入第六次循环，a(5)＝5＋1＝6，输出6，之后I变为6，不再满足循环条件。因此程序执行结果为123456。11、销售库中有“产品表”(产品编码，产品名称，单价)，另有“新品表”(产品编码，产品名称，单价)。根据产品编码，一件产品只在“新品表”中出现，则要将该产品追加到“产品表”中；如果一件产品在“产品表”和“新品表”中同时出现，则用“新品表”中的单价修改“产品表”中相应产品的单价。为实现上述功能要求，应使用的方法是A、更新查询B、追加查询C、生成表查询D、编VBA程序标准答案：D知识点解析：根据题目描述，若产品编码只在“新品表”中出现，需要追加至“产品表”；若产品编码在“产品表”和“新品表”中同时出现，需要修改“产品表”中相应产品的单价。为了同时满足上述功能要求，应编写VBA程序进行判断后执行相应操作。因此选项D正确。12、下列程序段的功能是：计算1＋2＋3……＋10的值，程序空白处应填写的语句是Dimt，kassinglek＝0DOWhilek＜0k＝k＋1LoopA、t＝t＋kB、t＝t＋2C、k＝k＋2D、t＝t＋1标准答案：A知识点解析：本题利用DoWhile…Loop循环语句实现了计算1＋2＋3……＋10的值的功能。利用循环条件k＜10进行控制。若满足条件则执行k值加1的操作，使k值从1至10逐个变换，之后利用t存储相加结果，利用t＝t＋k语句实现计算1＋2＋3……＋10的值的功能。13、执行k＝0DoUntilk＞3x＝x＋2k＝k＋1Loop下列程序段后，变量x的值是A、2B、4C、6D、8标准答案：C知识点解析：本题考查DoUntil…Loop循环结构。当不满足条件k＞33进入循环循环体，反复执行x＝x＋2，k＝k＋1操作，直至条件满足。本题中k、x初始值为0，进入第一次循环，x＝0＋2＝2，k＝0＋1＝1；k不满足循环结束条件，进入第二次循环，x＝2＋2＝4，k＝1＋1＝2；k不满足循环结束条件，进入第三次循环，x＝4＋2＝6，k＝2＋1＝3，满足循环结束条件，x的值最终为6。14、调用下面子过程，消息框显示的结果是SubSFun()Dimx，y，mx＝100y＝200Ifx＞yThenm＝xElsem＝yEndIfMsgBoxmEndSubA、300B、400C、100D、200标准答案：D知识点解析：根据题意，代码中用Sub定义了一个过程，过程中定义了3个变量：x，y，m。其中x＝100，y＝200。然后是if条件语句，条件是(x＞Y)，根据前面的赋值可知，不满足此条件，故执行Else中的代码，m＝y，因此显示的m的值为200。因此选择D选项。15、设执行以下程序段时依次输入：1、3、5，执行结果为Dima(4)AsIntegerDimb(4)AsIntegerForK＝0to2a(K＋1)＝Val(InputBox("请输入数据："))b(3－K)＝a(K＋1)NextKDebug．Printb(K)A、1B、3C、5D、0标准答案：A知识点解析：本题考察For循环语句，计算数组b(K)的值。在程序中，首先定义了两个数组a(4)、b(4)，之后执行For循环。当K＝0时，进入第一次循环，将输入的1赋值给a(1)，即a(1)＝1，b(3)＝a(1)＝1；之后K＝1，进入第二次循环，将输入的3赋值给a(2)，即a(2)＝3，b(2)＝a(2)＝3；之后K＝2，进入第三次循环，将输入的5赋值给a(3)，即a(3)＝5，b(1)＝a(3)＝5，之后K＝3，不满足循环条件，结束循环。输出b(3)，值为1。16、下列程序的功能是输出100到200间不能被3整除的数，程序空白处应填写的语句是PrivateSubCommmandl_Click()DimXAsIntegerx＝100DoUntilx_________IfxMod3<>0ThenDebug．PrintxEndIfx＝x＋1LoopEndSubA、＞200B、＞100C、＜100D、＜200标准答案：A知识点解析：DoUntil…Loop循环采用的是先判断条件后执行循环体的做法，如果条件表达式成立，不执行循环体，否则进入循环体。本题中，要输出100到200间不能被3整除的数，x初始值为1011，之后执行DoUntil…Loop循环，若x超出200则不执行循环，否则利用If条件语句进行判断，若能被3整除则输出，之后x值加1进行下一次循环判断。因此DoUntil语句空白处应填写＞200。17、执行下列程序段后，变量intsum的值是DimintsumAsIntegerDimIAsIntegerintsum＝0ForI＝20．2To5Step－4．7intsum＝intsum＋INextIA、150B、200C、50D、0标准答案：C知识点解析：本题考查For循环。初始将intsm和I都定义为整型。因此循环初始I值取整为20，进入第一次循环，执行intsum＝0＋20；进入下一循环前Step－4．7对I值减4．7，取整为15，之后执行第二次循环，intsum＝20＋15；进入下一循环前I值变为15－4．7＝10．3，取整为10，执行第三次循环，intsum＝20＋15＋10；进入下—循辅I值变为10－4．7＝5．3，取整为5，执行第四次循环，intsum＝2D＋15＋10＋5＝50；进入下—循环前I值变为5－4．7＝0．3，取整为0，不再满足循环条件，因此intsum值为50。18、执行下列程序段后，变量s的值是DimsAslong，xAsIntegerB＝0：x＝1DoWhile(x＜10)s＝s＋xx＝x＋2LoopA、10B、25C、50D、100标准答案：B知识点解析：DoWhile…Loop语句是在条件表达式结果成立时，执行循环体，并持续到条件表达式结果不成立或执行到选择性ExitDo语句而退出循环。在程序中，s初始值为0，x初始值为1，若满足x＜10循环条件则执行s＝s＋x，x＝x＋2操作，实际上是求1－10以内奇数之和。因此1＋3＋5＋7＋9＝25。19、如果要求下列程序段中的循环执行3次，则程序中括号里的条件应是x＝1Dox＝x＋3LoopUntil(_______)A、x＞＝8B、x＜＝8C、x＞＝7D、x＜＝7标准答案：A知识点解析：Do…LoopUntil采用的是先执行循环体后判断条件的做法，首先执行循环，之后进行条件判断，结构是条件表达式不成立时，重复执行循环，直到条件表达式成立，结束循环。本题中，x初始值为1，之后进入第一次循环，执行x＝1＋3＝4；进入第二次循环，执行x＝4＋3＝7；进入第三次循环，执行x＝7＋3＝10，之后跳出循环，因此，Until的条件应是x＞＝8。20、执行下列程序段后，变量intsum的值是DimintsumAsIntegerDimIAsIntegerintsum＝0ForI＝0T050Step10intsum＝intsum＋INextIA、150B、200C、50D、0标准答案：A知识点解析：本题考查For循环。初始将intsum和I都定义为整型。因此循环初始I值为0，进入第一次循环，执行intsum＝0＋0；进入下一循环前执行Step10，I值变为10，进入第二次循环，intsum＝0＋10；以此类推直至I值变为50，intsum＝0＋10＋20＋30＋40＋50＝150，之后I值变为60不再符合循环条件，跳出循环。因此intsum值为150。21、执行下列程序段，变量x的值是x＝2：y＝5DoUntily＞5x＝x*yy＝y＋1LoopA、2B、5C、10D、20标准答案：C知识点解析：DoUntil…Loop循环采用的是先判断条件后执行循环体的做法，如果条件为True，则循环体一次都不执行，否则进入循环体执行。本题中，若不满足y＞5的条件，则执行x＝x*y，y＝y＋1操作。x初始值为2，y值初始值为5，满足循环条件，进入第一次循环，x＝2*5＝10，y＝5＋1＝6，不再满足循环条件，跳出循环，x的值最终为10。22、下列程序的功能是计算10的阶乘，程序空白处应该填写的语句是DimtassingleDimkasIntegerk＝0：t＝1While_______k＝k＋1t＝t*kWendA、k＜10B、k＞10C、k＜＝10D、k＞＝10标准答案：A知识点解析：本程序作用是计算10的阶乘，While空白处是用来进行条件限制，满足循环条件则执行k＝k＋1，t＝t*k操作，实现k值加1和阶乘的计算。因此当循环至k值为9时，执行循环体k＝k＋1＝9＋1＝10，t＝1*2*3*4*5*6*7*8*9*10完成10的阶乘的计算，循环到此结束，因此循环的条件应为k＜10或k＜＝9。23、VBA中将lnputBox的返回值转换为数值应该使用的函数是A、LoSB、StrC、LenD、Val标准答案：D知识点解析：InputBox的返回值为字符型，Val函数的功能是将文本数据转换为数值型数据。24、若有语句：str1＝inlmtbox("输入"，""，"练习")；从键盘上输入字符串“示例”后，str1的值是A、输入C、练习D、示例标准答案：D知识点解析：InputBox函数表示在对话框来中显示提示，等待用户输入正文或按下按钮，并返回包含文本框内容的字符串，其函数格式为InputBox(prompt[，title][，default][，xpos][，ypos][，helpfile，context])。Prompt必需的，作为对话框消息出现的字符串表达式；Title可选的，显示对话框标题栏中的字符串表达式；Default可选的，显示文本框中的字符串表达式。因此本题中的消息框标题初始显示“输入”，文本框初始显示“练习”，从键盘上输入字符串“示例”后，传给str1，其值为“示例”。25、函数MsgBox返回值的类型是A、数值B、字符串C、变体D、是／否标准答案：A知识点解析：函数MsgBox返回值的类型是数值。26、下列选项中，错误的VBA数据验证函数是A、IsTextB、IsDateC、IsNumericD、IsNull标准答案：A知识点解析：VBA常用的验证函数包括IsNumeric、IsDate、IsNull、IsEmpty、IsArray、IsError、IsObject。27、假设数据库中有学生信息表stud(sno，sname，ssex)。其中，性别ssex字段已建索引，要在调试窗口中显示第一个男同学的信息，程序空白处应填写的语句是PrivateSubForm_Load()DimisAsADODB．RecordsetSetrs＝NewADODB．Recordsetrs．ActiveConnection＝"Provider＝Microsoft．Jet．OLEDB．4．0；"＆"DataSource＝e：＼考试中心教程＼教学管理．mdb；”rs．CursorType＝adOpenKeysetrs．LockType＝adLockOptimisticrs．Index＝"ssex"rs．Open"stud"，，，，adCmdTableDirectDebug．Printrs("sno")，rs("sname")，r8("ssex")rs．CloseSetrs＝NothingEndSubA、rs．Find"男"，adSeekFirstEQB、rs．Seek"男"，adSeekFirstEQC、rs．Find"男"，adSeekLastEQD、rs．Seek"男"，adSeekLastEQ标准答案：B知识点解析：DAO的Seek成员函数是在表类型记录集合中基于表索引进行记录搜索，Find成员函数是在动态集类型或快照类型记录集中进行记录搜索。由于本题中性别ssex字段已建索引，因此采用Seek成员函数。AdSeekFiirstEQ查找等于关键值的第一个关键字，AdsoekLastEQ查找等于关键值的最后一个关键字。本题中要显示第一个男同学的信息，使用AdSeekFimtEQ。28、假设数据库中有学生信息表stud(sno，sname，ssex)，其中ssex字段已建索引，要输出最后一名男同学的信息，程序空白处应填写的语句是PrivateSUbForm_Load()Dimr8AsADODB．RecordsetSetrs＝NewADODB．Recordsetrs．ActiveConnection＝"Provider＝Microsoft．Jet．OLEDB．4．0："＆"DataSource＝e：＼考试中心教程＼教学管理．mdb；”rs．CursorType＝adOpenKeysetrs．LockType＝adLockOptimisticrs．Index＝"8sex"rs．Open"stud"，，，，adCmdTablleDirectDebug．Printrs("sno")，rs("sname")，rs("ssex")rs．CloseSetrs＝NothingEndSubA、rs．Find"男"，adSeekFimtEQB、rs．Seek"男"，adSeekFimtEQC、rs．Find"男"，adsoekLastEQD、rs．Seek"男"，adSeekLastEQ标准答案：D知识点解析：DAO的Seek成员函数是在表类型记录集合中基于表索引进行记录查找，Find成员函数是在动态集类型或快照类型记录集中进行记录查找。由于本题中性别ssex字段已建索引，因此采用Seek成员函数。AdSeekFirstEQ查找等于关键值的第一个关键字，AdSeekLastEQ查找等于关键值的最后一个关键字。本题中要输出最后一名男同学的信息，因此使用AdSeekLastEQ。29、ADO对象模型中有5个主要对象，它们是Command、RecordSet、Field、Error和A、DatabaseB、WorkspaceC、ConnectionD、DBEngine标准答案：C知识点解析：在VBA中提拱了Active数据对象(ADO)作为数据库的访问接口，ADO对象模型中包括5个主要对象，即Connection连接，代表到数据库的连接；Recordset记录集，代表数据库记录的一个集合；Command命令，代表一个SQL命令；Error错误，代表数据库访问中产生的意外；Field字段，代表记录集中的字段数据信息。国家二级ACCESS机试选择题（模块）模拟试卷第2套一、选择题(本题共19题，每题1.0分，共19分。)1、在下列关于宏和模块的叙述中，正确的是()。A、模块是能够被程序调用的函数B、通过定义宏可以选择或更新数据C、宏或模块都不能是窗体或报表上的事件代码D、宏可以是独立的数据库对象，可以提供独立的操作动作标准答案：D知识点解析：模块是Access系统中的一个重要的对象，它以VBA语言为基础编写，以函数过程(Function)或子过程(Sub)为单元的集合方式存储，是VBA代码的容器。模块分为类模块和标准模块两种类型。窗体模块和报表模块都属于类模块，它们从属于各自的窗体和报表。使用宏可以实现以下一些操作：①在首次打开数据库时，执行一个或一系列操作；②建立自定义菜单栏；③从工具栏上的按钮执行自己的宏或程序；④将筛选程序加到各个记录中，从而提高记录查找的速度；⑤可以随时打开或者关闭数据库对象；⑥设置窗体或报表控件的属性值；⑦显示各种信息，并能够使计算机扬声器发出报警声，以引起用户的注意；⑧实现数据自动传输，可以自动地在各种数据格式之间导入或导出数据；⑨可以为窗体定制菜单，并可以让用户设计其中的内容。故选择D选项。2、用一个对象来表示“一只白色的足球被踢进球门”，那么“白色”、“足球”、“踢”、“进球门”分别对应的是()。A、属性、对象、方法、事件B、属性、对象、事件、方法C、对象、属性、方法、事件D、对象、属性、事件、方法标准答案：B知识点解析：对象就是一个实体，比如足球；每个对象都具有一些属性可以相互区分，比如颜色；对象的事件就是用户对对象执行的操作，比如足球可以踢，人可以走；对象要执行的特定动作即是对象的方法，比如足球进门。故选择B选项。3、若要求窗体中的某个控件在事件发生时要执行一段代码，则应设置是()。A、窗体属性B、事件过程C、函数过程D、通用过程标准答案：B知识点解析：在Access数据库中，若要求窗体中的某个控件在事件发生时要执行一段代码，完成指定动作，这样的代码过程称为事件过程或事件响应代码。故选择B选项。4、下列关于Access内置函数的分类中，错误的是()。A、表函数B、转换函数C、文本函数D、程序流程函数标准答案：A知识点解析：Access内置函数是Access本身提供的方便用户计算、操作数据的常用函数。主要分类有：SQL聚合函数；程序流程函数、日期／时间函数、数学函数、文本函数、转换函数等，但Access内置函数中并不包含表函数的分类。故选择A选项。5、表达式“B=INT(A+0．5)”的功能是()。A、将变量A保留小数点后1位B、将变量A四舍五入取整C、将变量A保留小数点后5位D、舍去变量A的小数部分标准答案：B知识点解析：INT函数是返回表达式的整数部分。表达式A+0．5中，当A的小数部分大于等于0．5时，整数部分加1；当A的小数部分小于0．5时，整数部分不变，INT(A+0．5)的结果是实现将A四舍五入取整。故选择B选项。6、对不同类型的运算符，优先级的规定是()。A、字符运算符＞算术运算符＞关系运算符＞逻辑运算符B、算术运算符＞字符运算符＞关系运算符＞逻辑运算符C、算术运算符＞字符运算符＞逻辑运算符＞关系运算符D、字符运算符＞关系运算符＞逻辑运算符＞算术运算符标准答案：B知识点解析：对不同类型的运算符，优先级为：算术运算符＞连接运算符(字符运算符)＞比较运算符(关系运算符)＞逻辑运算符。所有比较运算符的优先级相同。算术运算符中，指数运算符(^)＞负数(一)＞乘法和除法(*、／)＞整数除法(＞求模运算(Mod)＞加法和减法(+、一)，括号优先级最高。故选择B选项。7、下列表达式计算结果为数值类型的是()。A、#5/5/2010#—#5/1/2010#B、102＞”11”C、102=98+4D、#5/1/2010#+5标准答案：A知识点解析：选项A是两个日期数据相减后结果为整型数据4。选项B是两个字符串比较，结果为False，是布尔型。选项C为关系表达式的值，结果为False，是布尔型。选项D为日期型数据加5，结果为2010—5—6，仍为日期型。故选择A选项。8、当条件为5＜x＜10时，x=x+1，以下语句正确的是()。A、if5＜x＜10thenx=x+1B、if5＜xorx＜10thenx=x+1C、if5＜xandx＜10thenx=x+1D、if5＜xxorx＜10thenx=x+1标准答案：C知识点解析：条件5＜x＜10即为x大于5小于10，用关系表达式表示就是x＞5andx＜10。故选择C选项。9、表达式4+5＼6*7/8Mod9的值是()。A、4B、5C、6D、7标准答案：B知识点解析：本题表达式涉及到的运算优先级顺序由高到低依次为：乘法和除法(*、／)、整数除法、求模运算(Mod)、加法(+)。因此4+5＼6*7/8Mod9=4+5\42/8Mod9=4+5\5．25Mod9=4+1Mod9=4+1=5。故选择B选项。10、函数InStr(1，"eFCdEfGh"，"EF"，1)执行的结果是()。A、0B、1C、5D、6标准答案：B知识点解析：InStr函数的语法是：InStr([Start，]＜Strl＞，＜Str2＞[，Compare])其中Start检索的起始位置，题目中为1，表示从第1个字符开始检索。Str1表示待检索的串，Str2表示待检索的子串。Compare取值O或缺省时表示做二进制比较，取值为1表示不区分大小写。本题中值为1，检索时不区分大小写，函数返回值为l。故选择B选项。11、若有语句：strl=inputbox("输入"，""，"练习")；从键盘上输入字符串“示例”后，strl的值是()。A、"输入"B、""C、"练习"D、"示例"标准答案：D知识点解析：InputBox函数表示在对话框来中显示提示，等待用户输入正文或按下按钮，并返回包含文本框内容的字符串，其函数格式为InputBox(prompt[，title][，default][，xpos][，ypos][，helpfile，context])。Prompt必需的，作为对话框消息出现的字符串表达式；Title可选的，显示对话框标题栏中的字符串表达式；Default可选的，显示文本框中的字符串表达式。本题中的消息框标题初始显示“输入”，文本框初始显示“练习”，从键盘上输入字符串“示例”后，传给strl，其值为“示例”。故选择D选项。12、表达式Int(5*Rnd()+1)*Int(5*Rnd()—1)值的范围是()。A、[0，15]B、[—1，15]C、[—4，15]D、[—5，15]标准答案：D知识点解析：Rnd函数返回大十或等于0且小于1的随机值，Int函数用于取整。当第一个Rnd函数取值为0．99……时，第一个Int函数取值最大，为Int(5*0．99+1)=Int(5．95)=5;当第二个Rnd函数取值为0．99……时，第二个Int函数取值最大，为Int(5*0．99—1)=Int(3．95)=3；当Rnd函数取值为0时，第二个Int函数取值最小，为—1。因此表达式值的范围为[—5，15]。故选择D选项。13、VBA表达式Int(—17．8)+Sgn(17．8)的值是()。A、18B、—17C、—18D、—16标准答案：B知识点解析：Int函数用于取整，对于负数返回小于或者等于原数的第一个负数，Sgn函数返回数值表达式的符号值，若数值表达式的值小于0，则函数返回—1;若数值表达式的值等于0，则函数返回O；若数值表达式的值大于0，则函数返回1。因此Int(—17．8)的值为—18，Sgn(17．8)的值为1，故选择B选项。14、在模块的声明部分使用“OptionBase1”语句，然后定义二维数组A(2to5，5)，则该数组的元素个数为()。A、20B、24C、25D、36标准答案：A知识点解析：VBA中OptionBase1语句的作用是设置数组下标从l开始，展开二维数组A(2to5，5)为A(2，1)…A(2，5)、A(3，1)…A(3，5)、A(4，1)…A(4，5)、A(5，1)…A(5，5)共4组，每组5个元素，共20个元素。故选择A选项。15、在VBA中定义了二维数组B(3to7，4)，则该数组的元素个数为()。A、36B、20C、24D、25标准答案：D知识点解析：本题考查二维数组元素个数的计算问题，本题中二维数组B(3to7，4)中，行数为5行(下标取值3，4，5，6，7)，列数为5列(下标取值0，1，2，3，4)，所以此二维表的元素个数为5*5=25个。故选择D选项。16、将逻辑型数据转换成整型数据，转换规则是()。A、将True转换为—1，将False转换为0B、将True转换为1，将False转换为—1C、将True转换为0，将False转换为—1D、将True转换为1，将False转换为0标准答案：A知识点解析：在VBA中将逻辑型数据转换成整型数据时，True转为—1，Flase则转为0。故选择A选项。17、下列VBA变量名中，正确的是()。A、2010accessB、2010—accessC、access—2010D、access2010标准答案：D知识点解析：变量名只能由字母、数字、下划线组成，且以字母开头，不区分大小写，不能包含其他字符。选项A以数字开头，选项B以数字开头且有特殊字符“一”，选项C有特殊字符“一”，表达均错误。故选择D选项。18、VBA中一般采用Hungarian符号法命名变量，代表命令按钮的字首码是()。A、cmdB、txtC、chkD、sub标准答案：A知识点解析：本题考查的是Hungarian符号法命名规则，标识符的名字以一个或者多个小写字母开头作为前缀；Access对象表的前缀为tbl;查询的前缀为qry；窗体的前缀为frm；报表的前缀为rpt；复选框的前缀为chk;组合框的前馈为cbo；命令按钮的前缀为cmd；标签的前缀为lbl;列表框的前缀为lst，选项按钮的前缀为opt；文本框的前缀为txt；子窗体／子报表的前缀为sub。故选择A选项。19、执行下列程序段后，变量a和b的值分别是()。a=100：b=50ffa＞bThena=a-bElseb=b+aEndIfA、50和50B、100和50C、100和150D、150和100标准答案：A知识点解析：本题考查If—Else条件语句。若a＞b则执行a=a—b，否则执行b=b+a。本题a初始值为100，b初始值为50，满足a＞b的条件，执行a=a—b，即a=100—50=50，b的值不变，因此a值为50，b值为50。故选择A选项。国家二级ACCESS机试选择题（模块）模拟试卷第3套一、选择题(本题共30题，每题1.0分，共30分。)1、若要求窗体中的某个控件在事件发生时要执行一段代码，则应设置是A、窗体属性B、事件过程C、函数过程D、通用过程标准答案：B知识点解析：在Access数据库中，若要求宙体中的某个控件在事件触发时要执行一段代码，完成指定动作，这样的过程称为事件响应代码。2、VBA中如果没有显式声明或未用符号来定义变量的数据类型，则变量的默认数据类型为A、BooleanB、IntC、StringD、Variant标准答案：D知识点解析：在VBA中，没有显示声明(用如Dim、Private、Public或Static等语句)或使用符号来定义的变量，数据类型默认是变体型(Variant)。3、下列VBA数组声明语句中，正确的是A、Dima[3，4]AsIntegerB、Dima(3，4)AsStringC、Dima(n，n)AsSingleD、Dima(34)AsInteger标准答案：B知识点解析：在VBA中数组声明的格式为：Dim数组名(维数定义)as类型，声明数组用圆括号，如果定义多维数组时，维数之间用逗号分隔。4、VBA的数组下标可取的变量类型是A、日期型B、字符型C、数值型D、可变型标准答案：C知识点解析：在VBA中数组声明的格式为：dim数组名(维数定义)as类型，声明数组用圆括号，用数值型变量定义维数，如果定义多维数组时，维数之间用逗号分隔。5、VBA语句Dima(－3to3)所定义的数组元素个数是A、6B、7C、8D、9标准答案：B知识点解析：一维数组a(－3to3)代表a(－3)、a(－2)、a(－1)、a(0)、a(1)、a(2)、a(3)，共7个数组元素。6、下列VBA变量名中，正确的是A、IFB、7ABC、A[B]7D、AB_7标准答案：D知识点解析：变量命名规则：只能由字母、数字或下划线组成，不允许出现空格、一等符号；第一个字符必须是字母；不能与VBA关键字相同。因此，选项A与VBA．关键字相同，选项B是以数字开头，选项C含有“[]”符号，只有选项D正确。7、VBA中一般采用Hungarian符号法命名变量，代表子报表的字首码是A、subB、RptC、FmtD、txt标准答案：A知识点解析：本题考查的是Hungarian符号法命名规则，标识符的名字以一个或者多个小写字母开头作为前缀；前缀之后的是第一个单词或者多个单词的组合的首字母大写，该单词要指明变量的用途。子报表英文为subreport；复选框按钮单词英文全称，拼写为CheckBox；命令选项按钮单词英文全称，拼写为OptionButton。因此选择A选项。8、下列代码实现的功能是：若在窗体中一个名为tNum的文本框中输入课程编号，则将“课程表”中对应的“课程名称”显示在另一个名为tName文本框中，PrivateSub【】()Me!tName＝DLookup("课程名称"，"课程表"。"课程编号＝"＆Me!"TNum&"′")EndSub则程序中【】处应填写的是A、tNum_AfterUpdateB、tNum_ChangeC、tNum_OpenD、tNum_Load标准答案：A知识点解析：该题考查变量标示名的命名规则。标识符的命名规则是以一个或者多个小写字母开头作为前缀，后接首字母大写的第一个单词或者多个单词的组合，且单词要指明变量的用途。本题根据输入Num然后(After)更新(Update)tName的内容。因此本题应选择A选项。9、能够实现从指定记录集里检索特定字段值的函数是A、NzB、findC、LookupD、DLookup标准答案：D知识点解析：DlookUp函数是从指定记录集里检索特定字段的值。它可以直接在VBA、宏、查询表达式或计算控件中使用，而且主要用于检索来自外部表字段中的数据。10、下列表达式中，与：DateDiff("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(date())－month(#2013－11－25#)标准答案：D知识点解析：日期／时间函数DateDiff(<间隔类型>，<日期1>，<日期2>[，W1][，W2])返回两个日期之间按照间隔类型指定的时间间隔数目。根据题意间隔类型为“m”表示月。表达式的结果是当前系统日期与2013－11－25之间相差的月数，应该等于“(当前年份－2013)*12＋(当前月份－11)”，因此选择D选项。11、VBA表达式17mod3的运算结果是A、0．5B、1C、1．5D、2标准答案：D知识点解析：运算符MOD是对两个操作数做除法并返回余数，因此17除以3结果是5，余数是2，因此17mod3的运算结果是2。12、若变量x是小于100的非负数，正确的VBA表达式是A、x＞＝0B、0＜＝x＜100C、x＞＝0Andx＜100D、0＜＝xOrx＜100标准答案：C知识点解析：选项A没有限制小于100的条件；选项B语法错误，VBA不能进行运算符的连接；选项D不应使用“或”运算符“OR”；选项C正确。13、若变量x是大于100且小于200的整数，则正确的判断x在合理范围的VBA表达式是A、100<=x<=200B、100C、x>100ANDx<200D、100<=xORx<200标准答案：C知识点解析：VBA中出现选项A和选项B所示的运算符连用属于语法错误；选项C将x＞100、x＜200两个条件表达式利用AND运算符连接，符合要求；选项D利用或运算OR不符合题目要求。14、VBA表达式19．5Mod2*2的运算结果是A、3．5B、1C、3D、0标准答案：D知识点解析：MOD是对两个操作数做除法并返回余数。同时mod运算要求2个数都是整数，不是的话就四舍五入，乘运算优先级高于mod运算符，所以a＝19．5mod2*2＝20mod4＝0。15、VBA表达式Left("howareyou"，3)值是A、howB、areC、youD、ho标准答案：A知识点解析：本题考查的是字符串截取函数Left函数的用法。其格式为：Left(<字符串表达式>，)，表示从字符串左边起截取N个字符。因此Left("howareyou"，3)表示从字符串“howareyou”左边起截取3个字符，返回值为“how”。16、VBA中求平方根的函数是A、SqrB、SgnC、RndD、Str标准答案：A知识点解析：在VBA中求平方根的函数是Sqr；Sgn函数返回数值表达式的符号值；Rnd函数返回大于或等于0且小于1的随机值；Str函数用于将数值表达式的值转化为字符串。17、能够实现从指定记录集里检索特定字段值的函数是A、NzB、DSumC、DLookupD、Rnd标准答案：C知识点解析：DLookUp函数是从指定记录集里检索特定字段的值。它可以直接在VBA、宏、查询表达式或计算控件中使用，而且主要用于检索来自外部表字段中的数据。18、VBA表达式Int(－17．8)＋Sgn(17．8)的值是A、18B、－17C、－18D、－16标准答案：B知识点解析：Int函数用于取整，对于负数返回小于或者等于原数的第一个负数，Sgn函数返回数值表达式的符号值，若数值表达式的值小于0，则函数返回－1；若数值表达式的值等于0，则函数返回0；若数值表达式的值大于0，则函数返回1。因此Int(－17．8)的值为－18，Sgn(17．8)的值为1，表达式最终结果为－17。19、VBA中去除前后空格的函数是A、LTrimB、RTrimC、TrimD、Ucase标准答案：C知识点解析：删除字符串开始和尾部空格使用函数Trim()；函数Ltrim()是删除字符串的开始空格；Rtrim()函数是删除字符串的尾部空格；Ucase()函数是将字符串中小写字母转换成大写字母。20、VBA函数left("Hello"，2)的值为A、HeB、elC、loD、true标准答案：A知识点解析：本题考查的是字符串截取函数Left函数的用法。其格式为：Left(<字符串表达式>，)，表示从字符串左边起截取N个字符。因此left("Hello"，2)表示从字符串"Hello"左边起截取2个字符，返回值为"He"。21、若数据库中有表STUD，刚下列函数实现的功能是FunctionDmpPfimaryKey()DimstrSQLAsStringatrSQL＝"ALTERTABLESTUDDropCONSTRAINTPPdMARY_KEY”CurrentProject．Connection．ExecutestrSQLEndFunctionA、为关系STUD中设置主关键字B、取消关系STUD中的主关键字C、为关系STUD添加索引D、取消关系STUD的全部索引标准答案：B知识点解析：根据题意，用Function定义了一个自定义函数，函数名为：DropPrimaryKey。在函数DropPrimaryKey中定义了一个strSQL的sql语句，该sql语句中使用Alter语句修改表STUD的表结构。其中，DropConstraintprimary_key表示取消表STUD中的主关键字，因此选择B选项。22、表达式Datediff("YYYY"，#12／30／2012#，#L／13／2013#)的结果是A、10B、1C、14D、99标准答案：B知识点解析：函数DateDiff按照指定类型返回指定时间的间隔数目。语法为DateDiff(<间隔类型>，<日期1>，<日期2>，[W1][W2])，间隔类型为“yyyy”，表示返回两个日期间隔的年数。因此2012年与2013年间隔1年，返回1。23、在一个窗体上建立两个文本框，名称分别为Text1和Text2，事件过程如下，PrivateSubText1_change()Text2＝Ucase(Text1．Text)EndSub则在Text1文本框输入“Access2012”后，Text2中显示的结果是A、无内容B、ACCESS2012C、Access2012D、ACCESS标准答案：B知识点解析：Ucase()函数是将字符串中小写字母转换成大写字母。本题程序实现的功能是将Text1文本框中的小写字母转换为大写字母，之后赋值给。Text2。因此若在Text1文本框输入“Access2012”后，经Ucase()函数转换，Text2文本框中会显示“ACCESS2012”。24、在VBA中，要引用“学生”窗体中的控件对象，正确的格式是A、Forms!学生!控件名称[．属性名称]B、Forms．学生．控件名称[．属性名称]C、Forms!学生!控件名称[!属性名称]D、Forms!学生．控件名称[．属性名称]标准答案：A知识点解析：VBA中引用Access窗体中的控件对象的格式为：Forms!窗体名称!控件名[．属性名]。因此选择A选项。25、VBA中求字符串长度的函数是A、LenB、LengthC、StrLenD、strLength标准答案：A知识点解析：VBA中求字符串长度的函数是Len()。26、VBA中如果一行中要写多条语句，则语句之间应使用的分隔符是A、分号B、逗号C、冒号D、空格标准答案：C知识点解析：VBA中在一行中写多条语句时，应使用冒号(：)分隔。27、下列If语句的功能是统计性别为男、职称为副教授以上且年龄小于40岁的人数，错误的语句是A、Ifsex＝"男"Andage<40InStr(duty，"教授")>0Thenn＝n＋1B、Ifsex＝"男"Andage<40InStr(duty＝"教授"orduty＝"副教授")＞0Thenn＝n＋1C、Ifsex＝"男"Andage<40Right(duty，2)＝"教授"Thenn＝n＋1D、Ifsex＝"男"Andage<40And(duty＝"教授"Orduty＝"副教授")Thenn＝n＋1标准答案：D知识点解析：选项A、选项B、选项C均在第二个条件age<40后缺少And进行与第三个条件的连接。28、执行下列程序段后，整型变量c的值为a＝24b＝328SeleetCaseb＼10Case0c＝a*10＋bCase1to9c＝a*100＋bCase10to99c＝a*1000＋bEndSelectA、537B、2432C、24328D、240328标准答案：C知识点解析：SelectCase结构运行时，首先计算“表达式”的值，然后会依次将表达式的值与每个Case表达式的值进行比较，直到值匹配成功，程序会转处相应Case结构内执行语句。本题中，SelectCase语句中b＼lO的值为32，因此程序执行Case10to99后边的c＝a*1000＋b语句，即c＝24*1000＋328＝24328。29、以下程序的功能是求“x＾3*5”表达式的值，其中x的值由文本框Text0输入，运算的结果由文本框Text1输出。PrivateSubCommand0_Click()DimxAsIntegerDimyAsLongMe．Text0＝xy＝x＾3*5Me．Text1＝yEndSub运行上述程序时，会有错误。错误的语句是A、DimxAsIntegerB、Me．Text0＝xC、Me．Text1＝yD、DimyAsLong标准答案：B知识点解析：根据题意，程序功能是求“x＾3*5”表达式的值，x的值由文本框Text0输入，则在程序中应该将Text0的值赋给变量x，而程序中Me．Text0＝x的功能是将x的值赋给Text0，因此选择B选项。30、有VBA语句：Ifx＝1theny＝1，下列叙述中正确的是A、x＝1和y＝1均为赋值语句B、x＝1和y＝1均为关系表达式C、x＝1为关系表达式，y＝1为赋值语句D、x＝1为赋值语句，y＝1为关系表达式标准答案：C知识点解析：If条件语句的格式为，lf条件式表达式Then语句。If测试指定的条件，如果条件为真。则执行Then后面的语句。因此在Ifx＝1theny＝1语句中，x＝1为条件表达式，y＝1为赋值语句。国家二级ACCESS机试选择题（模块）模拟试卷第4套一、选择题(本题共21题，每题1.0分，共21分。)1、下列程序段运行结束后，变量x的值是()。x=2y=2Dox=x*yy=y+1LoopWhiley＜4A、4B、12C、48D、192标准答案：B知识点解析：程序中使用了Do…While循环，循环体至少执行一次，循环继续执行的条件是y＜4。循环体中x=x*y—2*2=4，y=y+l=3，条件满足循环体继续执行，x=4*3=12，y=3+1=4．此时条件不满足，不再执行循环体，循环结束。故选择B选项。2、如果变量A是Boolean型，则下列赋值语句中，正确的是()。A、A="No"B、A=．No．C、A=#TURE#D、A=2＜10标准答案：D知识点解析：Boolean类型变量的取值只能取true或false，其中选项A是字符型常量；选项B写法有误；选项C可以在数据库查询中作为查询条件使用；选项D是将一个表达式的值赋给Boolean型变量A，选项中2＜10为真，所以A取值为true。故选择D选项。3、下列选项中，与VBA语句：DimNew％，sumT等价的是()。A、DimNewAsInteger，sumAsSingleB、DimNewAsInteger，sumAsDoubleC、DimNewAsDouble，sumAsSingleD、DimNewAsDouble，sumAsInteger标准答案：A知识点解析：题中VBA语句：DimNew％，sum!的功能是定义一个整数New和一个单精度数sum。在VBA数据类型中，符号“％”表示整数，符号“！”表示单精度数，符号“@”表示货币，符号“$”表示字符串。与本题等价的声明语句为：DimNewAsInteger，sumAsSingle，故选择A选项。4、下列程序段运行结束后，变量c的值是()。a=24b=328selectcaseb\10case0c=a*10+bcase1t09c=a*100+bcase10t099c=a*1000+bendselectA、537B、2427C、24328D、240328标准答案：C知识点解析：整数除法“＼”是对两个操作题做树法并返回一个整数。程序中SelectCase语句中b＼10的值为32，程序执行Case10to99后边的c=a*1000+b语句，即c=24*1000+328=24328。故选择C选项。5、窗体上有命令按钮commaM1，对应的Click事件过程如下：PrivateSubCommand1_Click()DimxAsIntegerx=InputBox("请输入x的值")SelectCasexCase1，2，4，10Debug．Print"A"Case5T09Debug．Print"B"CaseIs=3Debug．Print"C"CaseElseDebug．Print"D"EndSelectEndSub窗体打开运行，单击命令按钮，在弹出的输入框中输入3，则立即窗口上显示的内容是()。A、CB、AC、BD、D标准答案：A知识点解析：在SelectCase语句中，Case表达式可以是下列4种格式之一：①单一数值或一行并列的数值，用来与“表达式”的值进行比较，成员之间以逗号隔开。②由关键字To分割开的两个数值或表达式之间的范围。③关键字Is接关系运算符，如＜＞、＜、＜=、=、＞=或＞，后面再接变量或精确的值。④关键字CaseElse后的表达式，是在前面的Case条件都不满足时执行。本题中输入“3”，与第三个Case语句匹配，程序输出字符“C”，故选择A选项。6、下列If语句的功能是统计性别为男、职称为副教授以上且年龄小于40岁的人数，错误的语句是()。A、Ifsex="男"Andage＜40InStr(duty，"教授")＞OThenn=n+1B、Ifsex="男"Andage＜40InStr(duty="教授"orduty=”副教授”)＞OThenn=n+1C、Ifsex="男"Andage＜40Right(duty，2)="教授"Thenn=n+1D、Ifsex="男"Andage＜40And(duty="教授"Orduty="副教授")Thenn=n+1标准答案：D知识点解析：选项A、B、C均在第二个条件age＜40后面缺少And关键字进行与第三个条件的连接，语法结构错误。故选择D选项。7、由“Fori=1T016Step3”决定的循环结构被执行()。A、4次B、5次C、6次D、7次标准答案：C知识点解析：题目考查的是For循环结构，循环初值i为1，终值为16，每次执行循环，依次加3，则i分别为1、4、7、10、13、16，则循环执行6次。故选择C选项。8、要求循环执行2次后结束循环，【】处应填入的语句是()。X=iDox=x+2LoopUntil【】A、x＜=5B、x＜5C、x＞=5D、x＞5标准答案：C知识点解析：本题考查Do．．．LoopUntil循环控制结构的用法。该结构的特点是先执行，后判断，循环语句至少执行一次。Until当条件为假时，执行循环体内的语句。题目要求循环执行2次。第一次执行x=3，第二次执行x=5，然后条件为真，结束循环。故条件为真时x至少要等于5。故选择C选项。9、运行下列程序，结果是()。PrivateSubCommand32_Click()f0=1：f1=1：k=1DoWhilek＜=5f=f0+f1f0=f1fl=fk=k+1LoopMsgBox"f="&fEndSubA、f=5B、f=7C、f=8D、f=13标准答案：D知识点解析：本题考查DoWhile循环语句：k=1时，f=1+1=2，f0=1，f1=2，k=1+1=2;k=2时，f=3，f0=2，f1=3，k=2+1=3;k=3时，f=5，f0=3，f1=5，k=3+1=4;k=4时，f=8，f0=5，f1=8，k=4+1=5;k=5时，f=13，f0=8，f1=13，k=6，不再满足循环条件跳出循环，此时f=13。故选择D选项。10、有如下事件程序，运行该程序后输出结果是()。PhvateSubCommand33_Click()DimxAsInteger，yAsIntegerx=1：y=0DoUntily＜=25y=y+x*xx=x+1LoopMsgBoxtx="&x&"，y="&yEndSubA、x=1，y=0B、x=4，y=25C、x=5，y=30D、输出其他结果标准答案：A知识点解析：DoUntil循环采用的是先判断条件后执行循环体的做法，如果条件为True，则循环体一次都不执行。否则进入循环体执行。本题中的循环停止条件是y＜=25，而y=0，满足条件表达式，则不进入循环体，x、y的值不变，仍为1、0。故选择A选项。11、窗体中有文本框为Text1和Text2。运行程序时单击“运行”按钮Command1，在Text1中输入整数m(m＞0)，在Text2中显示输出m的全部除1和自身之外的因子。例如，20的因子有2，4，5，10，输出结果为“2，4，5，10”；16的因子为2，4，8，输出结果为“2，4，8”。事件代码如下：PrivateSubCommand1_Click()m=Val(Me!Text1)resule=""k=2DoIfmModk=0Thenresult=result&k&"，"k=k+1LoopWhile【】Me!Text2=resultEndSub程序【】处应填写的语句是()A、k＞mB、k＜mC、k＞=mD、k＜=m标准答案：B知识点解析：Do循环是查找m的因子，循环的条件是因子k小于m，因子k初始值为2，循环结束的条件是k增加到m—1结束，即k＜m。故选择B选项。12、窗体中有文本框TPxt1。运行程序，输入大于0的整数m，单击按钮Command1，程序显示由星号组成的高度和上底均为m的等腰梯形形。例如，当m=5时，显示图形如下。*********************************************事件代码如下。PrivateSubCommand1_Click()m=Val(Me!Text1)result=""Fork=1TomForn=lTo【】Ifn＜m-k+1Thenresult=result&""Elseresult=result&"*"EndIfNextnresult=result+Chr(13)NextkMsgBoxresult，，"运行结果"EndSub程序【】处应填写的语句是()。A、k+2*m—2B、k+2*mC、k+m—1D、k+m标准答案：A知识点解析：本题考查的是for循环执行过程，通过for循环输出等腰梯形。第一个循环用于控制输出的行数，第二个for循环用于控制每行输出的字符数。从图中可看出，第1行，4个空格，5个*字符；第2行，3个空格，7个*字符；第3行，2个空格，9个*字符；第4行，1个空格，11个*字符；第5行，0个空格，13个*字符；可看出行号与输出空格关系，假定有输入的为整数m，第k行，应输出m—k个空格；同理，第k行，应输出k+2*m—2个*号字符。故选择A选项。13、有Click事件对应的程序如下：PrivateSubCommand1_Click()DimsumAsDouble，xAsDoublesum=0n=0Fori=1T05x=n/in=n+1sum=sum+xNextiEndSub该程序通过For循环计算一个表达式的值，该表达式是()。A、1+1/2+2/3+3/4+4/5B、1/2+2/3+3/4+4/5C、1+1/2+1/3+1/4+1/5D、1/2+1/3+1/4+1/5标准答案：B知识点解析：本题考查了For循环控制结构的应用，本题中循环共执行了5次，每次各变量赋值情况如下表所示：ixnsum10/11021/221/232/331/2+2/343/441/2+2/3+3/454/551/2+2/3+3/4+4/5循环结束后，sum最后的值为1/2+2/3+3/4+4/5，故选择B选项。14、下列四种形式的循环设计中，循环次数最少的是()。A、a=5：b=8DoUntila＜bb=b+1LoopB、a=5：b=8Doa=a+iLoopWhilea＜bC、a=5：b=8Doa=a+1LoopUntila＜bD、a=5：b=8DoUntila＞ba=a+1Loop标准答案：A知识点解析：本题考查循环结构的使用，Do…LoopUntil和DoUntil…Loop都是当条件为假时，重复执行循环体，直到条件为真或遇到ExitDo才结束循环；Do…LoopWhile循环当条件为真时，执行循环体，当条件为假时，结束循环，选项A条件为真，循环一次也不执行；选项B循环执行3次；选项C循环执行1次；选项D循环执行4次。故选择A选项。15、下列不属于VBA函数的是()。A、ChooseB、IfC、IIfD、Switch标准答案：B知识点解析：IIf函数、Switch函数和Choose函数是VBA提供的3个条件函数，而If是程序流程控件的条件语句，不是函数。故选择B选项。16、在VBA中，下列关于过程的描述中正确的是()。A、过程的定义可以嵌套，但过程的调用不能嵌套B、过程的定义不可以嵌套，但过程的调用可以嵌套C、过程的定义和过程的调用均可以嵌套D、过程的定义和过程的调用均不能嵌套标准答案：B知识点解析：在VBA中过程不可以嵌套定义，