國(guó)家二級(jí)ACCESS機(jī)試選擇題（VBA編程）模擬試卷1（共150題）

國(guó)家二級(jí)ACCESS機(jī)試選擇題（VBA編程）模擬試卷1（共5套）（共150題）國(guó)家二級(jí)ACCESS機(jī)試選擇題（VBA編程）模擬試卷第1套一、選擇題(本題共30題，每題1.0分，共30分。)1、在VBA中，要引用“學(xué)生名單”窗體中的控件對(duì)象，正確的格式是A、Forms!學(xué)生名單!控件名稱[．屬性名稱]B、Forms．學(xué)生名單．控件名稱[．屬性名稱]C、Forms!學(xué)生名單!控件名稱[!屬性名稱]D、Forms!學(xué)生名單．控件名稱[．屬性名稱]標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：VBA中引用Access窗體中的控件對(duì)象的格式為：Forms!窗體名稱!控件名[．屬性名]，所以選項(xiàng)A正確。2、在窗體中有一個(gè)名稱為Command1的按鈕，該模塊內(nèi)還有一個(gè)函數(shù)過(guò)程：PublicFunctionf(xAsInteger)AsIntegerDimyAsIntegerx=20：y=2：f=x*yEndFunctionPrivateSubCommand1_Click()DimyAsIntegerStaticxAsIntegerx=10y=5y=f(x)Debug．Printx；yEndSub打開(kāi)窗體運(yùn)行后，如果單擊按鈕，則在立即窗口上顯示的內(nèi)容是A、105B、1040C、205D、2040標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：本題主要考查局部變量的使用和函數(shù)調(diào)用過(guò)程中的參數(shù)傳遞。參數(shù)傳遞的方式有傳值和傳址兩種形式，其中默認(rèn)的方式是傳址。本題中Click事件和函數(shù)f都有變量y，但都是各自的局部變量，只是同名而已。同樣Click事件和函數(shù)f中的x也是局部變量(形式參數(shù)也屬于局部變量)，但此處的參數(shù)傳遞是傳址，因此函數(shù)f對(duì)變量×的修改會(huì)帶回到Click事件。在Click事件中，調(diào)用函數(shù)f的同時(shí)將參數(shù)×以傳址的方式傳給了函數(shù)f。在函數(shù)f中×被重新賦值為20，并與函數(shù)f的局部變量y相乘得結(jié)果40，并通過(guò)函數(shù)f傳回了Click事件。在Click事件中該結(jié)果被賦值給該事件的局部變量y，所以調(diào)用的結(jié)果是Click事件中的局部變量x和y分別變成了20和40。所以此正確答案為選項(xiàng)D。3、若數(shù)據(jù)庫(kù)中有表STUD，則下列函數(shù)實(shí)現(xiàn)的功能是FunctionDropPrimaryKey()DimstrSQLAsStringstrSQL="ALTERTABLESTUDDropCONSTRAINTPRIMARY_KEY"CurrentProject．Connection．ExecutestrSQLEndFunctionA、為關(guān)系STUD中設(shè)置主關(guān)鍵字B、取消關(guān)系STUD中的主關(guān)鍵字C、為關(guān)系STUD添加索引D、取消關(guān)系STUD的全部索引標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：首先，函數(shù)內(nèi)定義字符串變量strSQL；然后將SQL．語(yǔ)句賦值，該語(yǔ)句的功能是將表STUD中字段學(xué)號(hào)取消為關(guān)鍵字(ALTER修改、Drop刪除、PRIMARYKEY關(guān)鍵字)：最后執(zhí)行語(yǔ)句執(zhí)行SQL。所以應(yīng)選擇選項(xiàng)B。4、下列子過(guò)程實(shí)現(xiàn)對(duì)“教師表”中的基本工資漲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程序空白處【】應(yīng)該填寫(xiě)的語(yǔ)句是A、fd=fd*1．1B、rs=rs*1．1C、基本工資=基本工資*1．1D、rs．fd=rs．fd*1．1標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：程序中“DoWhileNotrs．EOF”中“rs．EOF”表示文件記錄是否是該查詢結(jié)果集的最后一條記錄，如果是，則返回真，如果不是，則返回假。“Setfd=rs．Fields(”基本工資”)”語(yǔ)句為設(shè)置“基本工資”字段的引用，本題中需要對(duì)“教師表”中的基本工資漲10％，所以程序空白處應(yīng)該填上“fd=fd*1．1”。5、在計(jì)算控件的表達(dá)式中必須使用運(yùn)算符是A、=B、!C、圓括號(hào)()D、方括號(hào)[]標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：計(jì)算控件的表達(dá)式中必須以“=”開(kāi)頭，所以選項(xiàng)A正確。6、在窗體“學(xué)生信息”中，若要用宏操作GoToControl將焦點(diǎn)移到“學(xué)號(hào)”字段上，則該宏操作的參數(shù)“控件名稱”應(yīng)設(shè)置為A、[Forms]![學(xué)生信息]![學(xué)號(hào)]B、[學(xué)生信息]![學(xué)號(hào)]C、[學(xué)號(hào)]![學(xué)生信息]D、[學(xué)號(hào)]標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：使用GoToControl操作，可以把焦點(diǎn)移到打開(kāi)的窗體、窗體數(shù)據(jù)表、表數(shù)據(jù)表或查詢數(shù)據(jù)表中當(dāng)前記錄的指定字段或控件上。要想將焦點(diǎn)移動(dòng)到“學(xué)號(hào)”字段，必需先引用該字段。在Access中引用窗體對(duì)象上某一控件的語(yǔ)法格式為：Forms![窗體名稱]![控件名稱][屬性名]，由上述語(yǔ)法格式可知，“控件名稱”參數(shù)應(yīng)設(shè)置為該控件的字段名稱，所以選擇選項(xiàng)D。7、下列關(guān)于宏操作MessageBox的敘述中，錯(cuò)誤的是A、可以在消息框中給出提示或警告B、可以設(shè)置在顯示消息框的同時(shí)揚(yáng)聲器發(fā)出嘟嘟聲C、可以設(shè)置消息框中顯示的按鈕的數(shù)目D、可以設(shè)置消息框中顯示的圖標(biāo)的類型標(biāo)準(zhǔn)答案：C知識(shí)點(diǎn)解析：宏操作MessageBox可以設(shè)置“消息”、“發(fā)嘟嘟聲”、“類型”以及“標(biāo)題”信息，不能設(shè)置消息框中顯示的按鈕的數(shù)目，所以選項(xiàng)C錯(cuò)誤。8、內(nèi)部計(jì)算函數(shù)Min的功能是A、計(jì)算所有指定字段值的最小值B、計(jì)算全部數(shù)值型字段的最小值C、計(jì)算一條記錄中數(shù)值型字段的最小值D、計(jì)算一條記錄中指定字段的最小值標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：Min函數(shù)的功能是求指定字段值的最小值，所以選項(xiàng)A正確。9、打開(kāi)報(bào)表的宏命令是A、DocmD．OpenTableB、DocmD．OpenReportC、OpenTableD、OpenReport標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：Docmd對(duì)象是VBA中使用的，在宏中打開(kāi)報(bào)表對(duì)象，直接使用宏命令“OpenReport”，所以選項(xiàng)D正確。10、在Hungarian命名法中使用約定的字首碼代表特定的類型，代表復(fù)選框的字首碼是A、ChkB、CboC、cmdD、opt標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：Hungarian符號(hào)使用一組代表數(shù)據(jù)類型的碼。用小寫(xiě)字母作為變量名的前綴，“Chk”代表復(fù)選框，“Cbo”代表組合框，“cmd”代表命令按鈕，“opt”代表選項(xiàng)按鈕，所以選項(xiàng)A正確。11、已知事件對(duì)應(yīng)的程序代碼如下：PrivateSubCommand0_Click()DimJAsIntegerJ=100CallGetData(J+5)MsgBoxJEndSubPrivateSubGetData(ByReffAsInteger)f=f+120EndSub運(yùn)行程序，則輸出結(jié)果是A、100B、120C、125D、225標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：ByRef是指參數(shù)按地址傳遞，但是在這里面參數(shù)是一個(gè)表達(dá)式(J+5)，表達(dá)式的結(jié)果會(huì)賦給一個(gè)臨時(shí)變量，然后把臨時(shí)變量的地址傳遞給f，因此f的計(jì)算結(jié)果并不會(huì)影響J的值。12、下列選項(xiàng)中，與VBA語(yǔ)句：DimNew％，sum!等價(jià)的是A、DimNewAsDouble．sumAsSingleB、DimNewAsInteger，sumAsDoUbleC、DimNewAsInteger，sumAsSingleD、DimNewAsDouble，sumAsInteger標(biāo)準(zhǔn)答案：C知識(shí)點(diǎn)解析：整數(shù)型數(shù)據(jù)類型標(biāo)識(shí)為Integer，用“％”表示；單精度數(shù)據(jù)類型標(biāo)識(shí)為Single，用“!”表示，所以選項(xiàng)A正確。13、VBA中要進(jìn)行讀文件操作，應(yīng)使用的命令是A、InputB、ReadC、GetD、Fgets標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：語(yǔ)法：Input#filenumber，varname，其功能是從已打開(kāi)的順序文件中讀出一行并將它分配給String變量，所以選擇選項(xiàng)A。14、已知過(guò)程對(duì)應(yīng)的代碼如下：SubProc()f1=0：f2=1Forn=1to5f=f1+f2Debug．Printff1=f2f2=fNextnEndSub過(guò)程Proc在立即窗口中依次顯示的數(shù)值是A、12358B、12345C、1261015D、12468標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：程序執(zhí)行過(guò)程如下：程序初始化f1=0；f2=1；當(dāng)n=1時(shí)；Forn=1to5；執(zhí)行第一次循環(huán)，條件為true；f=f1+f2=0+1=1輸出f的值為1；f1=f2=1；f2=f=2；當(dāng)n=2時(shí)；執(zhí)行第二次循環(huán)，條件為true；f=f1+f2=1+1=2輸出f的值為2；f1=f2=1；f2=f=2；當(dāng)n=3時(shí)；執(zhí)行第三次循環(huán)，條件為true；f=f1+f2=1+2=3輸出f的值為3；f1=f2=2；f2=f=3；當(dāng)n=4時(shí)；執(zhí)行第四次循環(huán)，條件為true；f=f1+f2=2+3=5輸出f的值為5；f1=f2：3；f2=f=5；當(dāng)n=5時(shí)；執(zhí)行第五次循環(huán)，條件為true；f=f1+f2=3+5=8輸出f的值為8；f1=f2=5；f2=f=8；當(dāng)n=6時(shí)；執(zhí)行第六次循環(huán)，條件為faIse，結(jié)束循環(huán)。綜上所述，程序輸出結(jié)果依次為1，2，3，5，8，所以選項(xiàng)A正確。15、“用戶表”中包含4個(gè)字段：用戶名(文本，主關(guān)鍵字)，密碼(文本)，登錄次數(shù)(數(shù)字)，最近登錄時(shí)間(日期／時(shí)間)。在“登錄界面”的窗體中有兩個(gè)名為tUser和tPassword的文本框，一個(gè)登錄按鈕CommandO。進(jìn)入登錄界面后，用戶輸入用戶名和密碼，點(diǎn)擊登錄按鈕后，程序查找“用戶表”。如果用戶名和密碼全部正確，則登錄次數(shù)加1，顯示上次的登錄時(shí)間，并記錄本次登錄的當(dāng)前日期和時(shí)間；否則，顯示出錯(cuò)提示信息。為完成上述功能，請(qǐng)?jiān)诔绦蛑小尽刻幪钊脒m當(dāng)語(yǔ)句。PrivateSubCommand0_Click()DimcnAsNewADoDB．ConnectionDimrsAsNewADODB．RecordsetDimfd1AsADODB．FieldDimfd2AsADODB．FieldDimstrSQLAsStringSetcn=CurrentProject．ConnectionstrSQL="Select登錄次數(shù)，最近登錄時(shí)間From用戶表Where用戶名=’"&Me!tUser&"’And密碼=’"&Me!tPassword&"’"rs．OpenstrSQL，ca，adOpenDynamic，adLockOptimistic，adCmdTextSetfd11=rs．Fields("登錄次數(shù)")Setfd2=rs．Fields("最近登錄時(shí)間")IfNotrs．EOFThenfd1=fd1+1MsgBox”用戶已經(jīng)登錄："&fd1&"次"&Chr(13)&Chr(13)&"上次登錄時(shí)間："&fd2fd2=Now()【】ElseMsgBox"用戶名或密碼錯(cuò)誤。"EndIfrs．Closecn．CloseSetrs=NothingSetcn=NothingEndSubA、rs．UpdateB、UpdateC、rs．ChangeD、Change標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：本題中的if語(yǔ)句是是否到文件結(jié)尾，當(dāng)執(zhí)行更新操作fd1=fd1+1；fd2=Now()之后，都需要使用rS．update語(yǔ)句將所更新的記錄數(shù)據(jù)存儲(chǔ)到數(shù)據(jù)庫(kù)中，所以選項(xiàng)A正確。16、以下程序的功能是求“x^3-5”表達(dá)式的值，其中x的值由文本框Text0輸入，運(yùn)算的結(jié)果由文本框Text3輸出。PrivateSubCommand0_Click()DimxAsInteger，yAsLongMe．Text0=xy=x^3-5Me．Text3=yEndSub上述程序有錯(cuò)誤。錯(cuò)誤的語(yǔ)句是A、DimxAsIntegerB、Me．Text0=xC、Me．Text3gyD、DimyAsLong標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：根據(jù)題意，程序功能是求“x^3*5”表達(dá)式的值，×的值由文本框Text0輸入，則在程序中應(yīng)該將Text0的值賦給變量×，而程序中Me．Text0=x的功能是將x的值賦給Text0，所以選擇選項(xiàng)B。17、下列代碼實(shí)現(xiàn)的功能是：若在文本框tNum中輸入課程編號(hào)，則將在文本框tName顯示“課表”中對(duì)應(yīng)的“課程名稱”。PrivateSubtNum_AflerUpdate()Me!tName=【】("課程名稱"，"課表"，"課程編號(hào)=’"&Me!tNum&"’")EndSub則程序中【】處應(yīng)該填寫(xiě)的是A、DLookupB、SwitchC、DFindD、Choose標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：根據(jù)題意，【】處的代碼應(yīng)實(shí)現(xiàn)的功能是在“課程表”中查詢出“課程編號(hào)”等于tNum文本框中數(shù)據(jù)的“課程名稱”，此DLookup函數(shù)有此功能。DLookup函數(shù)的格式為：DLookup(表達(dá)式，記錄集[，條件式])。其中表達(dá)式用來(lái)指定要查詢的字段，即題中的“課程名稱”。記錄集用來(lái)指定要查詢的范圍，即題中的“課程表”。條件式用來(lái)指定查詢條件，即題中的“課程編號(hào)=’”Me!tNum“’”，所以選擇選項(xiàng)A。18、已知代碼下：DimstrSQLAsStringstrSQL="CreateTableStudent("strSQL=strSQL+"SnoCHAR(10)PRIMARYKEY，"strSQL=strSQL+"SnameVARCHAR(15)NOTNULL，"strSQL=strSQL+"SphotolMAGE)；"DoCmd．RunSQLstrSQL以上代碼實(shí)現(xiàn)的功能是A、創(chuàng)建表StudentB、刪除Student表中指定的字段C、為Student表建立索引D、為Student表設(shè)置關(guān)鍵字標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：在SQL語(yǔ)言中，可以使用CREATETABLE語(yǔ)句建立基本表，本題是將創(chuàng)建基本表student的ASQL語(yǔ)句，存放在strSQL變量中，然后使用Docmd．RunSQL命令，執(zhí)行該SQL語(yǔ)句，所以本題是動(dòng)態(tài)創(chuàng)建表對(duì)象Student，所以選項(xiàng)A正確。19、在VBA變量的Hungarian命名法中，代表復(fù)選框的字首碼是A、ChkB、CboC、cmdD、opt標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：Hungarian符號(hào)使用一組代表數(shù)據(jù)類型的碼。用小寫(xiě)字母作為變量名的前綴，“Chk”代表復(fù)選框，“Cbo”代表組合框，“cmd”代表命令按鈕，“opt”代表選項(xiàng)按鈕，所以選項(xiàng)A正確。20、在窗體上有一個(gè)按鈕，當(dāng)單擊該按鈕時(shí)，若將窗體標(biāo)題改為“歡迎”，則設(shè)計(jì)該宏時(shí)應(yīng)選擇的宏操作是A、AddMenuB、RepaintObjectC、SetMenultemD、SetProperty標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：根據(jù)題意，單擊按鈕時(shí)調(diào)用宏，宏的功能是將窗體的標(biāo)題改為"歡迎"，窗體的標(biāo)題屬于窗體的一個(gè)屬性，則宏的功能是改變窗體的屬性值，A選項(xiàng)中AddMenu的功能是增加菜單，不符合題意。B選項(xiàng)RepaintObject功能是重畫(huà)窗體，不符合題。C選項(xiàng)SetMenultem功能是設(shè)置菜單元素，不符合題意D。21、有宏M1，依次包含Macro1和Macro2兩個(gè)子宏，以下敘述中錯(cuò)誤的是A、創(chuàng)建子宏的目的是方便對(duì)宏的管理B、可以用RunMacro宏操作調(diào)用子宏C、調(diào)用M1中Macro1的正確形式是M1．Macro1D、如果調(diào)用M1則順序執(zhí)行Macro1和Macro2兩個(gè)子宏標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：創(chuàng)建子宏的目的是方便對(duì)宏的管理，A選項(xiàng)正確；使用RunMacro宏操作命令可以調(diào)用子宏，調(diào)用的格式為：宏名．子宏名，B、C選項(xiàng)正確；如果調(diào)用M1則只會(huì)執(zhí)行Macro1，不會(huì)執(zhí)行Macro2，所以選項(xiàng)D敘述錯(cuò)誤。22、內(nèi)置計(jì)算函數(shù)Max的功能是A、計(jì)算所有指定字段值的最大值B、計(jì)算全部數(shù)值型字段的最大值C、計(jì)算一條記錄中數(shù)值型字段的最大值D、計(jì)算一條記錄中指定字段的最大值標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：Max函數(shù)的功能是求指定字段值的最大值，所以選項(xiàng)A正確。23、打開(kāi)數(shù)據(jù)表的是宏命令是A、DocmD．OpenTableB、DocmD．OpenReportC、OpenTableD、OpenReport標(biāo)準(zhǔn)答案：C知識(shí)點(diǎn)解析：Docmd對(duì)象是VBA中使用的，在宏中打開(kāi)表對(duì)象，直接使用宏命令“OpenTable”，所以選頊C正確。24、與VBA語(yǔ)句DimVar％，sum!等價(jià)的是A、DimVarAsInteger，sumAsSingleB、DimVarAsInteger，sumAsDoubleC、DimVarAsSingle．sumAsDoubleD、DimVarAsDouble，sumAsSingle標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：整數(shù)型數(shù)據(jù)類型標(biāo)識(shí)為工nteger，用“％”表示；單精度數(shù)據(jù)類型標(biāo)識(shí)為single，用“!”表示，所以選項(xiàng)A正確。25、VBA程序中，打開(kāi)窗體應(yīng)使用的命令是A、DoCmd．OpenFormB、Docmd．OpenReportC、OpenFormD、OpenReport標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：Docmd對(duì)象是VBA中使用的，打開(kāi)窗體對(duì)象，使用命令“Docmd．OpenForm”，所以選項(xiàng)A正確。26、與DateDiff("m"，#1893-12-26#，Date())等價(jià)的表達(dá)式是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#)標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：日期／時(shí)間函數(shù)DateDiff(間隔類型，日期1，日期2[W1][，W2])區(qū)回兩個(gè)日期之間按照間隔類型指定的時(shí)間間隔數(shù)目。題目中的間隔類型為ilmll表示月，函數(shù)Date()獲得當(dāng)前系統(tǒng)日期，表達(dá)式的結(jié)果是當(dāng)前系統(tǒng)日期與1893-12-26之間相差的月數(shù)，即為“(當(dāng)前年份-1893)+12+(當(dāng)前月份-12)”，所以選擇選項(xiàng)D。27、要從記錄集中得到符合條件的特定字段的值，應(yīng)使用的內(nèi)置函數(shù)是A、DLookupB、DCountC、DFirstD、DLast標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：DLookup表示從記錄集中檢索特定字段的值；DCount函數(shù)用于返回指定記錄集中的記錄數(shù)；如果只需要表或查詢中特定字段的任意值，則可以使用DFirst和DLast函數(shù)從該字段返回隨機(jī)記錄?？梢栽诤?、模塊、查詢表達(dá)式或者窗體或報(bào)表上的計(jì)算控件中使用DFirst和DLast函數(shù)。所以選項(xiàng)A正確。28、調(diào)用下面子過(guò)程，消息框顯示的結(jié)果是SubSFun()Dimx，y，mx=100：y=200Ifx＞yThenm=xElsem=yEndIfMsgBoxmEndSubA、300B、400C、100D、200標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：本題的if～else語(yǔ)句功能是將變量x和v中的較大值賦給變量m，所以選項(xiàng)D正確。29、已知在“用戶表”中包含4個(gè)字段：用戶名(文本，主關(guān)鍵字)，密碼(文本)，登錄次數(shù)(數(shù)字)，最近登錄時(shí)間(日期／時(shí)間)。在“登錄界面”的窗體中有兩個(gè)名為“tUser”和“tPassword”的文本框，一個(gè)登錄按鈕“CommandO”。進(jìn)入登錄界面后，用戶輸入用戶名和密碼，點(diǎn)擊登錄按鈕后，程序查找“用戶表”。如果用戶名和密碼全部正確，則登錄次數(shù)加1，顯示上次的登錄時(shí)間，并記錄本次登錄的當(dāng)前日期和時(shí)間；否則，顯示出錯(cuò)提示信息。為完成上述功能，請(qǐng)?jiān)诔绦颉尽刻幪钊脒m當(dāng)語(yǔ)句。PrivateSubCommand0_Click()DimcnAsNewADODB．ConnectionDimrsAsNewADODB．RecordsetDimfd1AsADODB．FieldDimfd2AsADODB．FieldDimstrSQLAsStringSetcn=CurrentProject．ConnectionstrSQL="Select登錄次數(shù)，最近登錄時(shí)間From用戶表Where用戶名=’"&Me!tUser"’And密碼=’"&Me!tPassword&"’"rs．OpenstrSQL，cn，adOpenDynamic，adLockOptimistic，adCmdTextSetfd1=rs．Fields("登錄次數(shù)")Setfd2=rs．Fields("最近登錄時(shí)間")IfNotrs．EOFThenfd1=fd1+1MsgBOX”用戶已經(jīng)登錄："&fd1&"次"&Chr(13)&Chr(13)&"上次登錄時(shí)間："&fd2fd2=【】rs．UpdateElseMsgBox"用戶名或密碼錯(cuò)誤。"EndIfrs．Closecn．CloseSetrs=NothingSeton=NothingEndSubA、Now()B、Date()C、Time()D、Day()標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：記錄本次登錄的當(dāng)前日期和時(shí)間使用Now函數(shù)，所以選項(xiàng)A正確。30、以下程序的功能是求“x^3．5”表達(dá)式的值，其中x的值由文本框“Text0”輸入，運(yùn)算的結(jié)果由文本框“Text1”輸出。PrivateSubCommand0_Click()DimxAsInteger，yAsLongMe．Text0=xy=x^3*5Me．Text1=yEndSub運(yùn)行上述程序時(shí)，會(huì)有錯(cuò)誤。錯(cuò)誤的語(yǔ)句是A、DimxAsIntegerB、Me．Text0=xC、Me．Text1=yD、DimyAsLong標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：根據(jù)題意，程序功能是求“x^3+5”表達(dá)式的值，×的值由文本框Text0輸入，則在程序中應(yīng)該將Text0的值賦給變量x，而程序中Me．Text0=x的功能是將x的值賦給Text0，所以選擇選項(xiàng)B。國(guó)家二級(jí)ACCESS機(jī)試選擇題（VBA編程）模擬試卷第2套一、選擇題(本題共30題，每題1.0分，共30分。)1、VBA中一般采用Hungarian符號(hào)法命名變量，代表報(bào)表的字首碼是A、ChkB、QryC、RptD、Cbo標(biāo)準(zhǔn)答案：C知識(shí)點(diǎn)解析：Hungarian符號(hào)使用一組代表數(shù)據(jù)類型的碼。用小寫(xiě)字母作為變量名的前綴，“Chk”代表復(fù)選框，“Qry"代表查詢，“Rpt”代表報(bào)表，“Cbo”代表組合框，所以選項(xiàng)C正確。2、在標(biāo)準(zhǔn)模塊“模塊1”聲明區(qū)中定義了變量x和變量y，如下所示，則變量x和變量y的作用范圍分別是DimxAsIntegerPublicyAsIntegerSubdemoVar()x=3y=5Debug．Printx&""&yEndSubA、模塊級(jí)變量和過(guò)程級(jí)變量B、過(guò)程級(jí)變量和公共變量C、模塊級(jí)變量和公共變量D、過(guò)程級(jí)變量和模塊范圍標(biāo)準(zhǔn)答案：C知識(shí)點(diǎn)解析：VBA的變量聲明會(huì)指明變量的作用域和聲明周期，Dim為局部變量，Public為全局變量，Static代表靜態(tài)變量。在模塊區(qū)定義的區(qū)域，通關(guān)Dim定義的變量時(shí)模塊級(jí)變量，通過(guò)Public定義的變量是公共變量，所以應(yīng)選擇選項(xiàng)C。3、下列Access內(nèi)置函數(shù)中，用于去掉字符串前后空格的函數(shù)是A、LtrimB、RtrimC、SpaceD、Trim標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：LTrim(＜字符串表達(dá)式＞)：刪除字符串的開(kāi)始空格：RTrim(＜字符串表達(dá)式＞)：刪除字符串的尾部空格；Trim(＜字符串表達(dá)式＞)：刪除字符串的開(kāi)始和尾部空格；Space(＜數(shù)值表達(dá)式＞)：返回?cái)?shù)值表達(dá)式的值指定的空格字符數(shù)。本題選項(xiàng)D正確。4、下列程序的輸出結(jié)果是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標(biāo)準(zhǔn)答案：C知識(shí)點(diǎn)解析：在函數(shù)參數(shù)傳遞中，包括按地址傳遞ByRef和按值傳遞ByVal兩種方法。其中前者在函數(shù)體內(nèi)改變變量值會(huì)影響參數(shù)外的變量，后者不會(huì)。本題y是按地址傳遞，調(diào)用fun()函數(shù)后，會(huì)將y的值改為fun()函數(shù)中y的值，所以應(yīng)選擇選項(xiàng)C。5、下列程序的輸出結(jié)果是PrivateSubCommand3_Click()t=0m=1sum=00t=t+msum=sum+tm=m+1LoopWhilem＜=4MsgBox"Sum="&sumEndSubA、Sum=6B、Sum=10C、Sum=20D、Sum=35標(biāo)準(zhǔn)答案：C知識(shí)點(diǎn)解析：本題考查Do～LoopWhile循環(huán)的執(zhí)行過(guò)程。Do～LoopWhile循環(huán)結(jié)構(gòu)是先執(zhí)行后判斷，循環(huán)語(yǔ)句至少執(zhí)行一次。While關(guān)鍵字用于指明條件為真時(shí)執(zhí)行循環(huán)體內(nèi)語(yǔ)句，當(dāng)條件為假時(shí)，結(jié)束循環(huán)。該題的循環(huán)體要執(zhí)行4次，第4次結(jié)束時(shí)m=5，不滿足循環(huán)的條件，因此循環(huán)終止。根據(jù)代碼執(zhí)行的結(jié)果，最后sum=20，所以選擇選項(xiàng)C。6、下列代碼實(shí)現(xiàn)的功能是：若在窗體中一個(gè)名為tNum的文本框中輸入課程編號(hào)，則程序自動(dòng)將“課程表”中對(duì)應(yīng)的“課程名稱”顯示在另一個(gè)名為tName文本框中。PrivateSub【】()Me!tName=DLookup("課程名稱"，"課程表"，"課程編號(hào)=’"&MelTNum&"’")EndSub程序中【】處應(yīng)填寫(xiě)的是A、tNum_AfterUpdateB、tNum_ChangeC、tNum_OpenD、tNum_Load標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：本題考查的是變量標(biāo)識(shí)符的命名規(guī)則。標(biāo)識(shí)符的名字以一個(gè)或者多個(gè)小寫(xiě)字母開(kāi)頭作為前綴；之后接第一個(gè)單詞的首字母大寫(xiě)或者多個(gè)單詞的組合，且該單詞要指明變量的用途。本題是根據(jù)輸入Num然后(After)更新(Update)tName內(nèi)容，所以選擇選項(xiàng)A。7、子過(guò)程Plus完成對(duì)當(dāng)前庫(kù)中“學(xué)生表”的年齡字段都加1的操作。SubPlus()DimcnAsNewADODB．ConnectionDimrsAsNewADODB．RecordsetDimfdAsADODB．FieldDimstrConnectAsStringDimstrSQLAsStringSetcn=CurrentProject．ConnectionstrSQL="Select年齡from學(xué)生表"rs．OpenstrSQL，cn，adOpenDynamic，adLockOptimistic，adCmdText’Setfd=rs．Fields("年齡")DoWhileNotrs．EOFfd=fd+1rs．Updte【】Looprs．Closeca．CloseSetrs=NothingSetcn=NothingEndSub程序空白處【】應(yīng)該填寫(xiě)的語(yǔ)句是A、rs．MoveNextB、cn．MoveNextC、rs．NextD、cn．Next標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：本題考查的是如何使用ADO’數(shù)據(jù)庫(kù)技術(shù)操作數(shù)據(jù)庫(kù)。其中，RecordSet對(duì)象rs是用來(lái)表示來(lái)自基本表或命令執(zhí)行結(jié)果的記錄集。rs更新完一條記錄之后，需要使指針往后移動(dòng)下一個(gè)記錄上(注：MoveNext，移動(dòng)到下一個(gè)記錄的位置)。因此本題應(yīng)選擇選項(xiàng)A。8、下列關(guān)于自動(dòng)宏的敘述中，正確的是A、打開(kāi)數(shù)據(jù)庫(kù)時(shí)不需要執(zhí)行自動(dòng)宏，需同時(shí)按住Alt鍵B、打開(kāi)數(shù)據(jù)庫(kù)時(shí)不需要執(zhí)行自動(dòng)宏，需同時(shí)按住Shift鍵C、若設(shè)置了自動(dòng)宏，則打開(kāi)數(shù)據(jù)庫(kù)時(shí)必須執(zhí)行自動(dòng)宏D、打開(kāi)數(shù)據(jù)庫(kù)時(shí)只有滿足事先設(shè)定的條件才執(zhí)行自動(dòng)宏標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：取消自動(dòng)運(yùn)行宏，打開(kāi)數(shù)據(jù)庫(kù)時(shí)按住Shift鍵即可，所以選項(xiàng)B正確。9、下列表達(dá)式中，與DateDiif("m"，#2013-11-25#，Date())等價(jià)的表達(dá)式是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#)標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：日期／時(shí)間函數(shù)DateDiff(間隔類型，日期1，日期2[JW1][，W2])返回兩個(gè)日期之間按照間隔類型指定的時(shí)間間隔數(shù)目。題目中的間隔類型為“m”表示月，函數(shù)Date()獲得當(dāng)前系統(tǒng)日期，表達(dá)式的結(jié)果是當(dāng)前系統(tǒng)日期與2013-11-25之間相差的月數(shù)，即為“(當(dāng)前年份-2013)*12+(當(dāng)前月份-12)”，所以選擇選項(xiàng)D。10、以下關(guān)于宏的敘述中，錯(cuò)誤的是A、宏是Access的數(shù)據(jù)庫(kù)對(duì)象之一B、可以將宏對(duì)象轉(zhuǎn)換為VBA程序C、不能在VBA程序中調(diào)用宏D、宏比VBA程序更安全標(biāo)準(zhǔn)答案：C知識(shí)點(diǎn)解析：VBA中調(diào)用宏對(duì)象，可以使用Docmd．RunMicro"宏名"語(yǔ)句調(diào)用宏，所以選項(xiàng)C敘述錯(cuò)誤。11、內(nèi)置計(jì)算函數(shù)Sum的功能是A、計(jì)算所有指定字段值的累加和B、計(jì)算全部數(shù)值型字段的累加和C、計(jì)算一條記錄中數(shù)值型字段的累加和D、計(jì)算一條記錄中指定字段的累加和標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：SUM函數(shù)的功能是求指定字段值的累加和，所以選項(xiàng)A正確。12、打開(kāi)選擇查詢或交叉表查詢的宏操作命令是A、Docmd．OpenFormB、Docmd．OpenQueryC、OpenFormD、OpenQuery標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：Docmd對(duì)象是VBA中使用的，在宏中打開(kāi)查詢對(duì)象，直接使用宏命令“OpenQuerv”，所以選項(xiàng)D正確。13、若要使窗體上的控件“Command0”不可用，正確的設(shè)置是A、Command0．Enable=FalseB、Command0．Visible=FalseC、Command0．Enable=TrueD、Command0．Visible=True標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：Enable屬性為“可用性”，值設(shè)置為“true”表示可用，值設(shè)置為“false”表示可見(jiàn)：Visible屬性為“可見(jiàn)性”，值設(shè)置為“true”表示可見(jiàn)，值設(shè)置為“false”表示不可見(jiàn)，所以選項(xiàng)A正確。14、當(dāng)窗體的大小發(fā)生變化時(shí)，觸發(fā)的事件是A、ResizeB、ChangeC、UnloadD、AfterUpdate標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：Resize事件是在打開(kāi)窗體后，當(dāng)窗體的大小發(fā)生變化時(shí)觸發(fā)的事件。Change事件是當(dāng)文本框或其它控件中的文本或數(shù)據(jù)發(fā)生變化時(shí)觸發(fā)的事件。Unload事件是加載窗體時(shí)激發(fā)的事件。AfterUpdate文本框內(nèi)容更新后激發(fā)的事件，所以選擇選項(xiàng)A。15、在使用ADO訪問(wèn)數(shù)據(jù)源時(shí)，從數(shù)據(jù)源獲得的數(shù)據(jù)以行的形式存放一個(gè)對(duì)象中，該對(duì)象應(yīng)是A、CommandB、RecordsetC、ConnectionD、Parameters標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：ADO(ActiveXDataObjects)提供了編程語(yǔ)言和統(tǒng)一數(shù)據(jù)訪問(wèn)方式OLEDB的一個(gè)中間層，是一個(gè)用于存取數(shù)據(jù)源的COM組件。ADO包含一些頂層的對(duì)象：①Connection代表數(shù)據(jù)庫(kù)的連接；②Recordset結(jié)果集，表示數(shù)據(jù)庫(kù)中記錄的一個(gè)集合；③Command對(duì)象主要作用是在VBA中用SQL語(yǔ)句訪問(wèn)、查詢數(shù)據(jù)庫(kù)中的數(shù)據(jù)，可以完成Recordset對(duì)象不能完成的操作，如創(chuàng)建表、修改表結(jié)構(gòu)、刪除表、將查詢結(jié)果保存為新表等；④Error依賴于Connection對(duì)象的使用，代表訪問(wèn)數(shù)據(jù)庫(kù)的過(guò)程中產(chǎn)生的錯(cuò)誤；⑤Field依賴于Recordset對(duì)象的使用，代表記錄集中的字段數(shù)據(jù)信息。Parameters依賴于Command對(duì)象的使用，代表SQL語(yǔ)句中傳遞的參數(shù)。16、下列關(guān)于VBA數(shù)據(jù)庫(kù)數(shù)據(jù)訪問(wèn)的內(nèi)置域聚合函數(shù)的敘述中，錯(cuò)誤的是A、域聚合函數(shù)可以直接從一個(gè)表中取得符合條件的值賦給變量B、域聚合函數(shù)可以直接從一個(gè)查詢中取得符合條件的值賦給變量C、使用域聚合函數(shù)之前要完成數(shù)據(jù)庫(kù)連接和打開(kāi)操作D、使用域聚合函數(shù)之后無(wú)需進(jìn)行關(guān)閉數(shù)據(jù)庫(kù)操作標(biāo)準(zhǔn)答案：C知識(shí)點(diǎn)解析：域聚合函數(shù)和SQL聚合函數(shù)，兩者提供相似的功能，但用于不同的場(chǎng)合。SQL聚合函數(shù)可以在SQL語(yǔ)句中使用，但不能直接從VisualBasic中調(diào)用。與之不同的是，域聚合函數(shù)不僅可以直接從VisualBasic代碼中調(diào)用，也可以在SQL語(yǔ)句中使用，不過(guò)SQL聚合函數(shù)通常更為有效。由于域聚合函數(shù)可以直接從VisualBasic代碼中調(diào)用，因此使用之前不必先進(jìn)行數(shù)據(jù)庫(kù)連接和打開(kāi)操作，所以選擇選項(xiàng)C。17、在VBA中，要引用“學(xué)生”窗體中的控件對(duì)象，錯(cuò)誤的格式是A、Forms!學(xué)生!控件名稱[．屬性名稱]B、Forms．學(xué)生．控件名稱[．屬性名稱]C、Forms!學(xué)生!控件名稱[!屬性名稱]D、Forms!學(xué)生．控件名稱[．屬性名稱]標(biāo)準(zhǔn)答案：C知識(shí)點(diǎn)解析：VBA中引用Access窗體中的控件對(duì)象的格式為：Forms!窗體名稱!控件名[．屬性名]。注意：引用控件屬性時(shí)，只能使用“．”不能使用“!”所以選項(xiàng)C錯(cuò)誤。18、在窗體中有一個(gè)名為“Command1”的按鈕，該模塊內(nèi)還有一個(gè)函數(shù)過(guò)程：PublicFunctionf(xAsInteger)AsIntegerDimyAsIntegerx=30y=3f=x*yEndFunctionPrivateSubCommand1_Click()DimyAsIntegerStaticxAsIntegerx=10y=5y=f(x)Debug．Printx；yEndSub打開(kāi)窗體運(yùn)行后，如果單擊按鈕，則在立即窗口上顯示的內(nèi)容是A、105B、1090C、305D、3090標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：本題主要考查局部變量的使用和函數(shù)調(diào)用過(guò)程中的參數(shù)傳遞。參數(shù)傳遞的方式有傳值和傳址兩種形式，其中默認(rèn)的方式是傳址。本題中cIick事件和函數(shù)f都有變量y，但都是各自的局部變量，只是同名而已。同樣Click事件和函數(shù)f中的x也是局部變量(形式參數(shù)也屬于局部變量)，但此處的參數(shù)傳遞是傳址，因此函數(shù)f對(duì)變量×的修改會(huì)帶回到Click事件。在Click事件中，調(diào)用函數(shù)f的同時(shí)將參數(shù)x以傳址的方式傳給了函數(shù)f。在函數(shù)f中x被重新賦值為30，并與函數(shù)f的局部變量y相乘得結(jié)果90，并通過(guò)函數(shù)f傳回了Click事件。在Click事件中該結(jié)果被賦值給該事件的局部變量y，所以調(diào)用的結(jié)果是Click事件中的局部變量x和y分別變成了30和90，所以正確答案為選項(xiàng)D。19、下列代碼實(shí)現(xiàn)的功能是：在窗體中一個(gè)文本框“tNum”，運(yùn)行時(shí)若在其中輸入課程編號(hào)，則會(huì)自動(dòng)在“課程表”中找出對(duì)應(yīng)的“課名”顯示在另一個(gè)名為“tName”文本框中。PrivateSub【】()Me!tName=DLookup("課名"，"課程表"，"課程編號(hào)=’"&Me!tNum&"’")EndSub則程序中【】處應(yīng)該填寫(xiě)的是A、tNurn_AflerUpdateB、tNum_ClickC、tName_AtterUpdateD、tName_Click標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：本題考查的是變量標(biāo)識(shí)符的命名規(guī)則。標(biāo)識(shí)符的名字以一個(gè)或者多個(gè)小寫(xiě)字母開(kāi)頭作為前綴；之后接第一個(gè)單詞的首字母大寫(xiě)或者多個(gè)單詞的組合，且該單詞要指明變量的用途。本題是根據(jù)輸入Num然后(After)更新(Update)tName內(nèi)容，所以選擇選項(xiàng)A。20、以下程序的功能是計(jì)算并輸出兩個(gè)整數(shù)的最大公約數(shù)。PrivateSuba1()DimxAsInteger，yAsInteger，tAsIntegerx=InputBox("請(qǐng)輸入x的值")y=InputBox("請(qǐng)輸入y的值")Do【】x=yy=tLoopWhile(t＜＞0)Debug．Print【】EndSub有如下語(yǔ)句：①t=x②t=y③t=x＼y④t=xMody⑤x⑥y⑦t⑧x／y程序中有兩個(gè)【】，將程序補(bǔ)充完整的正確語(yǔ)句是A、①⑦B、②⑥C、③⑧D、④⑤標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：求兩個(gè)整數(shù)×和y的最大公約數(shù)的算法是：令t等于x除以y的余數(shù)，若t=0，則y為x和y的最大公約數(shù)。若t不為0，則可以肯定最大公約數(shù)必為小于y的數(shù)，則可令x=y，y=t，再返回開(kāi)始狀態(tài)，執(zhí)行t=xmody。直到t=0時(shí)，x為最大公約數(shù)。因此程序中Do和Loop之間為循環(huán)體，第一個(gè)空應(yīng)填t=xmody，第二個(gè)空為輸出語(yǔ)句，應(yīng)該輸出x，所以選擇選項(xiàng)D。21、打開(kāi)名為“學(xué)生信息”的窗體時(shí)，首先發(fā)生的事件是A、打開(kāi)(Open)B、加載(Load)C、激活(Activate)D、成為當(dāng)前(Current)標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：打開(kāi)窗體時(shí)，發(fā)生的事件依次為：打開(kāi)(Open)→加載(Load)→調(diào)整大小(Resize)→激活(Activate)→成為當(dāng)前(Current)，所以選項(xiàng)A正確。22、下列表達(dá)式中，與DateDiff("m"，#1893-12-26#，Date())等價(jià)的表達(dá)式是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#)標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：日期／時(shí)間函數(shù)DateDiff(間隔類型，日期1，日期2[，W1][，W2])返回兩個(gè)日期之間按照間隔類型指定的時(shí)間間隔數(shù)目。題目中的間隔類型為"m"表示月，函數(shù)Date()獲得當(dāng)前系統(tǒng)日期，表達(dá)式的結(jié)果是當(dāng)前系統(tǒng)日期與1893-12-26之間相差的月數(shù)；即為“(當(dāng)前年份-1893)*12+(當(dāng)前月份-12)”。23、要在一個(gè)窗體的某個(gè)按鈕的單擊事件上添加動(dòng)作，可以創(chuàng)建的宏是A、只能是獨(dú)立宏B、只能是嵌入宏C、獨(dú)立宏或數(shù)據(jù)宏D、獨(dú)立宏或嵌入宏標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：獨(dú)立宏是獨(dú)立的對(duì)象，它獨(dú)立于窗體、報(bào)表等對(duì)象之外。在導(dǎo)航窗格中可見(jiàn)。因此可以創(chuàng)建獨(dú)立宏響應(yīng)按鈕的單擊事件，不受其他對(duì)象約束。嵌入宏是嵌入在窗體、報(bào)表或控件對(duì)象的事件中。是他們所嵌入的對(duì)象或控件的一部分。在導(dǎo)航窗格中不可見(jiàn)，因此也可以創(chuàng)建嵌入宏，直接嵌入按鈕的單擊事件中，所以選擇選項(xiàng)D。24、內(nèi)置計(jì)算函數(shù)Avg的功能是A、計(jì)算所有指定字段值的平均值B、計(jì)算全部數(shù)值型字段的平均值C、計(jì)算一條記錄中數(shù)值型字段的平均值D、計(jì)算一條記錄中指定字段的平均值標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：Avg函數(shù)的功能是求指定字段值的平均值，所以選項(xiàng)A正確。25、打開(kāi)指定窗體的宏操作命令是A、Docmd．OpenFormB、Docmd．OpenQueryC、OpenFormD、OpenQuery標(biāo)準(zhǔn)答案：C知識(shí)點(diǎn)解析：Docmd對(duì)象是VBA中使用的，在宏中打開(kāi)窗體對(duì)象，直接使用宏命令“OpenForm”，所以選項(xiàng)C正確。26、若要使窗體上的標(biāo)簽控件Lab1可顯示，則在VBA中正確的設(shè)置是A、Lab1．Enable=FalseB、Lab1．Visible=FalseC、Lab1．Enable=TrueD、Lab1．Visible=True標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：窗體上的標(biāo)簽控件用于顯示說(shuō)明性的文本，沒(méi)有數(shù)據(jù)源，不顯示字段或表達(dá)式的值，顯示的內(nèi)容是固定不變的。標(biāo)簽控件的屬性Visible的功能是設(shè)置標(biāo)簽內(nèi)容的可見(jiàn)性。如Visible屬性設(shè)為True，則標(biāo)簽控件上的文本可以顯示；若設(shè)為False，則標(biāo)簽控件的文本不可顯示，所以選擇D選項(xiàng)。27、在VBA中要定義一個(gè)100元素的個(gè)整型數(shù)組，正確的語(yǔ)句是A、DimNewArray(100)AsIntegerB、DimNewArray(2To101)AsIntegerC、DimNewArray(2To101)D、DimNewArray(100)標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：VBA中定義數(shù)組格式為；Dim數(shù)組名([下標(biāo)下限to]下標(biāo)上限)As數(shù)據(jù)類型缺省情況下，下標(biāo)下限為0，數(shù)組元素從“數(shù)組名(0)”至“數(shù)組名(下標(biāo)上限)”；如果使用to選項(xiàng)，則可以安排非0開(kāi)始的下標(biāo)下限。本題中C、D選項(xiàng)沒(méi)有指定數(shù)據(jù)類型，默認(rèn)為變體型，不符合題意；A選項(xiàng)中數(shù)組下標(biāo)默認(rèn)從0開(kāi)始，0到100共101個(gè)元素，不符合題意；所以只有選項(xiàng)B正確。28、下列關(guān)于Access內(nèi)置函數(shù)的分類中，錯(cuò)誤的是A、表函數(shù)B、轉(zhuǎn)換函數(shù)C、文本函數(shù)D、程序流程函數(shù)標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：在Access中常用的內(nèi)置函數(shù)有財(cái)務(wù)函數(shù)、日期函數(shù)、算術(shù)函數(shù)、文本函數(shù)、轉(zhuǎn)換函數(shù)、檢查函數(shù)，沒(méi)有表函數(shù)。所以選擇選項(xiàng)A。29、己知過(guò)程對(duì)應(yīng)的代碼如下：SubProc()n=1f1=0f2=1DoMlilen＜=8f=f1+f2Debug．Printff1=f2f2=fn=n+1LoopEndSub過(guò)程Proc在立即窗口中顯示的結(jié)果是A、斐波那契序列中2到9對(duì)應(yīng)的序列值B、斐波那契序列中2到8對(duì)應(yīng)的序列值C、整數(shù)1到n(n＜9)對(duì)應(yīng)的累加和D、整數(shù)1到n(n＜8)對(duì)應(yīng)的累加和標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：程序執(zhí)行過(guò)程如下：程序初始化f1=0：f2=1；當(dāng)n=1時(shí)；Forn=1to8：執(zhí)行第一次循環(huán)，條件為true；f=f1+f2=0+1=1輸出f的值為1；f1=f2=1；f2=f=2；當(dāng)n=2時(shí)；執(zhí)行第二次循環(huán)，條件為true：f=f1+f2=1+1=2輸出f的值為2；f1=f2=1；f2=f=2；當(dāng)n=3時(shí)；執(zhí)行第三次循環(huán)，條件為true；f=f1+f2=1+2=3輸出f的值為3；f1=f2=2；f2=f=3；當(dāng)n=4時(shí)；執(zhí)行第四次循環(huán)，條件為true；f=f1+f2=2+3=5輸出f的值為5；f1=f2=3；f2=f=5；當(dāng)n=5時(shí)；執(zhí)行第五次循環(huán)，條件為true；f=f1+f2=34-5=8輸出f的值為8；f1=f2=5；f2=f=8；當(dāng)n=6時(shí)；執(zhí)行第六次循環(huán)，條件為true；f=f1+f2=5+8=13輸出f的值為13；f1=f2=8；f2=f=13；當(dāng)n=7時(shí)；執(zhí)行第七次循環(huán)，條件為true；f=f1+f2=8+13=21．輸出f的值為21；f1=f2=13；f2=f=21；當(dāng)n=8時(shí)；執(zhí)行第八次循環(huán)，條件為true；f=f1+f2=113+21=34輸出f的值為34；f1=f2=21；f2：f=34；當(dāng)n=9時(shí)；執(zhí)行第九次循環(huán)，條件為false；循環(huán)結(jié)束。綜上所述，輸出結(jié)果依次為1，2，3，5，8，13，21，34，該數(shù)據(jù)列是斐波那契序列中2到9對(duì)應(yīng)的序列值(注：第1項(xiàng)為0，第2項(xiàng)為1)，所以選項(xiàng)A正確。30、屬于Access域聚合函數(shù)的是A、CountB、DMaxC、CDateD、Max標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：Access內(nèi)置函數(shù)中域聚合函數(shù)包括DAvg、DCount、DFirst、DLookup、DMax、Dmin等，所以選擇選項(xiàng)B。國(guó)家二級(jí)ACCESS機(jī)試選擇題（VBA編程）模擬試卷第3套一、選擇題(本題共30題，每題1.0分，共30分。)1、打開(kāi)一個(gè)窗體，要通過(guò)選擇窗體的數(shù)據(jù)輸入與窗體方式，限制窗體所顯示的記錄，應(yīng)使用的宏操作命令是A、OpenReportB、OpenTableC、OpenFormD、OpenQuery標(biāo)準(zhǔn)答案：C知識(shí)點(diǎn)解析：OpenReport為打開(kāi)報(bào)表，OpenTable為打開(kāi)表，OpenForm為打開(kāi)窗體，OpenQuery為打開(kāi)查詢，所以選項(xiàng)C正確。2、在窗體中有一個(gè)命令按鈕Command1，兩個(gè)文本框Text0和Text1，按鈕Command1對(duì)應(yīng)的代碼過(guò)程如下：PrivateSubCommand1_Click()Dimm，kAsIntegerDimflagAsBooleanm=Val(Me!Text0)’輸入一個(gè)整數(shù)DoWhile1k=2flag=TrueDo、Whilek＜=m／2AndflagIfmModk=0Thenflag=FalseElsek=k+1EndIfLoopIfflagThenMe!Textl=m’輸出計(jì)算結(jié)果ExitDoElsem=m+1EndIfLoopEndSub運(yùn)行程序，輸入12，單擊按鈕，程序的輸出結(jié)果是A、13B、12C、11D、其他整數(shù)標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：根據(jù)題目要求，輸入一個(gè)整數(shù)賦值給m；外層D0wMe循環(huán)條件設(shè)置為“1”，表示循環(huán)條件永遠(yuǎn)為“真”，第一次執(zhí)行循環(huán)語(yǔ)句時(shí)：k=2；flag=true；內(nèi)層DoWhilek＜=m／2Andflag循環(huán)條件為true，進(jìn)入內(nèi)層循環(huán)的循環(huán)體語(yǔ)句，ifmmodk=0條件為真，執(zhí)行flag=false語(yǔ)句，內(nèi)層循環(huán)體語(yǔ)句執(zhí)行結(jié)束，然后判斷第二次執(zhí)行的循環(huán)條件DoWhilek＜=m／2Andflag循環(huán)條件為false，內(nèi)層循環(huán)結(jié)束，進(jìn)入外層循環(huán)語(yǔ)句ifflag判斷條件為fafse，執(zhí)行語(yǔ)句m=m+1，m的值為13；繼續(xù)進(jìn)行外層循環(huán)，第二次執(zhí)行循環(huán)語(yǔ)句時(shí)：k=2；flag=false；內(nèi)層DoWhilek＜=m／2Andflag循環(huán)條件為false，內(nèi)層循環(huán)不執(zhí)行，進(jìn)入外層循環(huán)語(yǔ)句ifflag判斷條件為true，執(zhí)行語(yǔ)句Me!Text1=m，文本框Text1中顯示的內(nèi)容為13，然后執(zhí)行exitdo語(yǔ)句，結(jié)束整個(gè)循環(huán)，所以最終程序輸出的結(jié)果為13，選項(xiàng)A正確。3、在窗體中有一個(gè)命令按鈕Command1，三個(gè)文本框Text0、Text1個(gè)Text2，命令按鈕對(duì)應(yīng)代碼過(guò)程如下：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運(yùn)行程序，在文本框Text0和Text1中分別輸入15和25，單擊按鈕后文本框Text2中顯示的結(jié)果是A、5B、10C、15D、25標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：程序開(kāi)始時(shí)，f1和f2的值分別是從文本框Text0和Text1中輸入的值15和25，然后利用if語(yǔ)句判斷f1和f2兩個(gè)數(shù)的大小，變量i中存放f1和f2中較小者的值，flag初始值為true，程序進(jìn)入DoWhile循環(huán)語(yǔ)句，首先判斷循環(huán)條件“i＞1Andflag”，結(jié)果為true，循環(huán)體中的if語(yǔ)句，只有當(dāng)f1和f2同時(shí)能被i整除，flag才會(huì)被賦值為false，否則將變量i減1，繼續(xù)進(jìn)行DoWhile循環(huán)的條件判斷，一旦f1和f2同時(shí)能被i整除，變量flag被賦值為false，則整個(gè)循環(huán)結(jié)束，將變量I的值輸出到文本框。Text2中，所以只有當(dāng)變量i為5時(shí)，才能同時(shí)被f1(15)和f2(25)整除，本題程序的功能是求兩個(gè)數(shù)的最大公約數(shù)，故選項(xiàng)A正確。4、在VBA中要定義一個(gè)由10個(gè)整型數(shù)構(gòu)成的數(shù)組，正確的語(yǔ)句是A、DimNewArray(10)AsIntegerB、DimNewArray(2To11)AsIntegerC、DimNewArray(2To11)D、DimNewArray(10)標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：VBA中數(shù)組定義的格式為：Dim數(shù)組名([下標(biāo)下界to]下標(biāo)上界)As數(shù)據(jù)類型下標(biāo)下界的默認(rèn)值為0，本題中要定義一個(gè)由10個(gè)整型數(shù)構(gòu)成的數(shù)組，A選項(xiàng)定義了11個(gè)元素，C、D選項(xiàng)未指定數(shù)據(jù)類型，默認(rèn)是變體型，B選項(xiàng)定義了10個(gè)整型數(shù)的數(shù)組，所以選項(xiàng)B正確。5、VBA中一般采用Hungarian符號(hào)法命名變量，代表命令列表框的字首碼是A、lstB、txtC、ChkD、sub標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：Hungarian符號(hào)使用一組代表數(shù)據(jù)類型的碼。用小寫(xiě)字母作為變量名的前綴，命令列表框的字首碼是“l(fā)st”，“txt”代表文本框，“Chk”代表復(fù)選框，“sub”代表子窗體／子報(bào)表，所以選項(xiàng)A正確。6、VBA中，將字符串的首字母轉(zhuǎn)換為對(duì)應(yīng)的字符代碼的函數(shù)是A、AscB、StrC、StringD、Chr標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：Asc函數(shù)為字符串轉(zhuǎn)換字符ASCII碼函數(shù)，該函數(shù)返回字符串首字符的ASCII碼值；str函數(shù)為數(shù)字轉(zhuǎn)換成字符串函數(shù)，該函數(shù)將數(shù)值表達(dá)式的值轉(zhuǎn)換成字符串；Chr。函數(shù)為字符ASCII碼值轉(zhuǎn)換為字符函數(shù)，該函數(shù)返回與字符代碼相關(guān)的字符，String不是類型轉(zhuǎn)換函數(shù)，String是返回一個(gè)由字符表達(dá)式的首字符重復(fù)組成的指定長(zhǎng)度為數(shù)值表達(dá)式的字符串，所以選項(xiàng)A正確。7、下列關(guān)于內(nèi)置函數(shù)分類的選項(xiàng)中，不是Access內(nèi)置函數(shù)分類的是A、表B、數(shù)據(jù)庫(kù)C、數(shù)組D、程序流程標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：在Access中常用的內(nèi)置函數(shù)有財(cái)務(wù)函數(shù)、日期函數(shù)、算術(shù)函數(shù)、文本函數(shù)、轉(zhuǎn)換函數(shù)、檢查函數(shù)，沒(méi)有表函數(shù)。表是Access的對(duì)象，不是函數(shù)，所以應(yīng)選擇選項(xiàng)A。8、如果在北京時(shí)間12點(diǎn)00分運(yùn)行以下代碼，程序的輸出是SubProcedure()IfHour(Time())＞=8AndHour(Time())＜=12ThenDebug．Print"上午好!"ElseIfHour(Time())＞12AndHour(Time())＜=18ThenDebug．Print"下午好!"ElseDebug．Print"歡迎下次光臨!"EndIfEndSubA、歡迎下次光臨!B、上午好!C、下午好!D、無(wú)輸出標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：Time()函數(shù)可以返回系統(tǒng)當(dāng)前時(shí)間，Hour(Time())可以返回系統(tǒng)當(dāng)前時(shí)間的小時(shí)，本程序中的if～elseif多分支判斷語(yǔ)句，判斷系統(tǒng)當(dāng)前時(shí)間的小時(shí)值，如果在8到12點(diǎn)之間(含8點(diǎn)和12點(diǎn))，則輸出“上午好”，如果在12點(diǎn)到18點(diǎn)之間(含18點(diǎn))，則輸出“下午好”，除此之外輸出“晚上好”，因?yàn)楫?dāng)前系統(tǒng)時(shí)間為12點(diǎn)，所以輸出“上午好”，所以選項(xiàng)B正確。9、已知過(guò)程對(duì)應(yīng)的代碼如下：SubProc()f1=0：f2=1Forn=1to8f=f1+f2Debug．Printff1=12：12=fNextnEndSub過(guò)程Proc在立即窗口中顯示的結(jié)果是A、斐波那契序列中2到9對(duì)應(yīng)的序列值B、斐波那契序列中2到8對(duì)應(yīng)的序列值C、整數(shù)1到n(n＜9)對(duì)應(yīng)的累加和D、整數(shù)1到n(n＜8)對(duì)應(yīng)的累加和標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：本題中程序執(zhí)行過(guò)程：程序初始化f1=0；f2=1；當(dāng)n=1時(shí)：Forn=1to8：執(zhí)行第一次循環(huán)，條件為。true；f=f1+f2=0+1=1輸出f的值為1；f1=f2=1；f2=f=2；第一次循環(huán)結(jié)束；當(dāng)n=2時(shí)；執(zhí)行第二次循環(huán)，條件為true；f=f1+f2=1+1=2，輸出f的值為2；f1=f2=1；f2=f=2；當(dāng)n=3時(shí)；執(zhí)行第三次循環(huán)，條件為true；f=f1+f2=1+2=3，輸出f的值為3；f1=f2=2；f2=f=3；當(dāng)n=4時(shí)；執(zhí)行第四次循環(huán)，條件為true：f=f1+f2=2+3=5，輸出f的值為5；f1=f2=3；f2=f=5；當(dāng)n=5時(shí)；執(zhí)行第五次循環(huán)，條件為true；f=f1+f2=3+5=8，輸出f的值為8；f1=f2：5；f2=f=8；當(dāng)n=6時(shí)；執(zhí)行第六次循環(huán)，條件為true：f=f1+f2=5+8=13，輸出f的值為13；f1：f2=8；f2=f=13；當(dāng)n=7時(shí)；執(zhí)行第七次循環(huán)，條件為true；f=f1+f2=8+13=21，輸出f的值為21；f1=f2=13；f2=f=21；當(dāng)n=8時(shí)；執(zhí)行第八次循環(huán)，條件為true；f=f1+f2=13+21=34，輸出f的值為34；f1=f2=21；f2=f=34；當(dāng)n=9時(shí)；執(zhí)行第九次循環(huán)，條件為false；循環(huán)結(jié)束。綜上所述，輸出結(jié)果依次為1，2，3，5，8，13，21，34，該數(shù)據(jù)列是斐波那契序列中2到9對(duì)應(yīng)的序列值(注：第1項(xiàng)為0，第2項(xiàng)為1)，所以選項(xiàng)A正確。10、下列Access內(nèi)置函數(shù)中，屬于域聚合函數(shù)的是A、CountB、DMaxC、CDateD、Max標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：數(shù)據(jù)庫(kù)數(shù)據(jù)訪問(wèn)中常用的域聚合函數(shù)有：Nz函數(shù)、DCount函數(shù)、DAvg函數(shù)和DSum函數(shù)、DMax函數(shù)和DMin函數(shù)及DLookup函數(shù)，所以選項(xiàng)B正確。11、VBA中讀文件的語(yǔ)句是A、Input#B、Read#C、Get#D、Fgets#標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：VBA的輸入／輸出過(guò)程中，使用Open函數(shù)打開(kāi)文件，Input函數(shù)提取文件內(nèi)容，Write函數(shù)向文件寫(xiě)入內(nèi)容，Print函數(shù)將一系列值寫(xiě)入打開(kāi)的文件；Input#語(yǔ)句的功能是從打開(kāi)的文件中提取數(shù)據(jù)并向變量賦值，所以選項(xiàng)A正確。12、在窗體中抬起鼠標(biāo)按鈕，觸發(fā)的事件是A、Form_MouseDownB、Form_MouseUpC、Form_MouseOverD、Form_MouseLeave標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：涉及鼠標(biāo)操作的事件主要有MouseDown(鼠標(biāo)按下)、MouseMove(鼠標(biāo)移動(dòng))和MouseUp(鼠標(biāo)抬起)，所以窗體中抬起鼠標(biāo)按鈕，觸發(fā)的事件是FormMouseUp，所以選項(xiàng)B正確。13、若存在關(guān)系STUD(學(xué)號(hào)，姓名，性別，年齡)，下列函數(shù)Fun的功能是FunctionFun()DimstrSQLAsStringstrSQL="ALTERTABLESTUDDropCONSTRAINTPR／MARY_KEY"CurrentProject．Connection．ExecutestrSQLEndFunctionA、為關(guān)系STUD中設(shè)置主關(guān)鍵字B、取消關(guān)系STUD中的主關(guān)鍵字C、為關(guān)系STUD添加索引D、取消關(guān)系STUD的全部索引標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：在SQL語(yǔ)句中可以使用ALTERTABLE語(yǔ)句修改己建立的結(jié)構(gòu)，包括添加新字段，修改字段屬性，或刪除某些字段，其基本格式為：ALTERTABLE＜表名＞[ADD＜新字段名＞＜數(shù)據(jù)類型＞[字段級(jí)完整性約束條件]][DROP[＜字段名＞]…][ALTER＜字段名[＞＜數(shù)據(jù)類型＞]：命令說(shuō)明：＜表名＞：指需要修改的表結(jié)構(gòu)的名字。ADD子句：用于增加新字段和該字段的完整性約束條件。DROP子句：用于刪除指定的字段和完整性約束，ALTER子句：用于修改原來(lái)字段屬性，包括字段名稱、數(shù)據(jù)類型等。本題中SQL語(yǔ)句“ALTERTABLESTUDDropCONEFRAINTPRIMARY_KEY”是刪除STUD表中的主鍵，所以選項(xiàng)B正確。14、子過(guò)程Plus完成對(duì)當(dāng)前庫(kù)中“教師表”的工齡字段都加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程序空白處【】應(yīng)該填寫(xiě)的語(yǔ)句是A、fd=fd+1B、rs=rs+1C、工齡=工齡+1D、rs．fd=rs．fd+1標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：程序中“DoWhileNotrS．EOF”中“rs．EOF”表示文件記錄是否是該查詢結(jié)果集的最后一條記錄，如果是，則返回真，如果不是，則返回假?！癝etfd=rs．Fields("工齡")”語(yǔ)句為設(shè)置“年齡”字段的引用，本題中需要對(duì)年齡字段值加1，所以程序空白處應(yīng)該填上“fd=fd+1”，所以選項(xiàng)A正確。15、打開(kāi)一個(gè)表應(yīng)使用的宏操作命令是A、OpenReportB、OpenTableC、OpenFormD、OpenQuery標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：OpenReport為打開(kāi)報(bào)表，OpenTable為打開(kāi)表，OpenForm為打開(kāi)窗體，OpenQuery為打開(kāi)查詢，所以選項(xiàng)B正確。16、若要將指定的記錄成為打開(kāi)窗體的數(shù)據(jù)集的當(dāng)前記錄，應(yīng)該使用的宏操作是A、GoToRecordB、GoToControlC、FindRecordD、ApplyFilter標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：使用“GoToRecord”操作可以使指定的記錄成為打開(kāi)的表、窗體或查詢結(jié)果集中的當(dāng)前記錄；使用“GoToControl”操作，可以把焦點(diǎn)移到打開(kāi)的窗體、窗體數(shù)據(jù)表、表數(shù)據(jù)表、查詢數(shù)據(jù)表中當(dāng)前記錄的特定字段或控件上；使用“FindRecord”操作，可以查找符合“FindRecord”參數(shù)指定的準(zhǔn)則的第一個(gè)數(shù)據(jù)實(shí)例；使用“ApplyFilter”操作可以對(duì)表、窗體或報(bào)表應(yīng)用篩選、查詢或“SQLWHERE”子句，以便限制或排序表、基礎(chǔ)表以及窗體或報(bào)表的查詢中的記錄，所以選項(xiàng)A正確。17、在設(shè)計(jì)計(jì)算控件中，“控件來(lái)源”表達(dá)式前都要加上的運(yùn)算符是A、=B、!C、，D、Like標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：設(shè)置計(jì)算型控件的控件來(lái)源時(shí)，計(jì)算表達(dá)式的第一個(gè)符號(hào)必須是“=”，所以選項(xiàng)A正確。18、VBA中一般采用Hungarian符號(hào)法命名變量，代表命令選項(xiàng)按鈕的字首碼是A、optB、lstC、ChkD、cmd標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：Hungarian符號(hào)使用一組代表數(shù)據(jù)類型的碼。用小寫(xiě)字母作為變量名的前綴，“opt”代表選項(xiàng)按鈕，“Ist”代表列表框，“Chk”代表復(fù)選框，“cmd”代表命令按鈕，所以選項(xiàng)A正確。19、VBA中，將字符代碼轉(zhuǎn)換為對(duì)應(yīng)字母的函數(shù)是A、AscB、StrC、CStringD、Chr標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：Asc函數(shù)為字符串轉(zhuǎn)換字符ASCII碼函數(shù)，該函數(shù)返回字符串首字符的ASCII碼值；Str函數(shù)為數(shù)字轉(zhuǎn)換成字符串函數(shù)，該函數(shù)將數(shù)值表達(dá)式的值轉(zhuǎn)換成字符串；Chr函數(shù)為字符ASCII碼值轉(zhuǎn)換為字符函數(shù)，該函數(shù)返回與字符代碼相關(guān)的字符，String不是類型轉(zhuǎn)換函數(shù)，CString是返回一個(gè)由字符表達(dá)式的首字符重復(fù)組成的指定長(zhǎng)度為數(shù)值表達(dá)式的字符串，所以選項(xiàng)D正確。20、已知過(guò)程GetData的定義如下：PrivateSubGetData(ByReffAsInteger)f=f+2EndSub若在主調(diào)過(guò)程中采用的調(diào)用語(yǔ)句是“CallGetData(J+5)”，則下列選項(xiàng)中正確的是A、由于形式參數(shù)被說(shuō)明為ByRef，則實(shí)際參數(shù)不能是表達(dá)式B、由于形式參數(shù)被說(shuō)明為ByRef，則實(shí)際參數(shù)應(yīng)該使用數(shù)組名C、將表達(dá)式J+5的值傳遞給變量f，并將f的計(jì)算結(jié)果返回變量J中D、將表達(dá)式J+5的值傳遞給變量f’但不會(huì)將f的計(jì)算結(jié)果返回變量J中標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：ByRef是指參數(shù)按地址傳遞，但是在這里面參數(shù)是一個(gè)表達(dá)式，表達(dá)式的結(jié)果會(huì)賦給一個(gè)臨時(shí)變量，然后把臨時(shí)變量的地址傳遞給f，因此f的計(jì)算結(jié)果并不會(huì)影響J的值，所以應(yīng)選擇選項(xiàng)D。21、下列選項(xiàng)中，與VBA中語(yǔ)句DimNewVar％，sum!等價(jià)的是A、DimNewVarAsInteger，sumAsSingleB、DimNewVarAsInteger，sumAsDoubleC、DimNewVarAsSingle，sumAsSingleD、DimNewVarAsSibgle，sumAsInteger標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：整數(shù)型數(shù)據(jù)類型標(biāo)識(shí)為Integer，用“％”表示；單精度數(shù)據(jù)類型標(biāo)識(shí)為Single，用“!”表示，所以選項(xiàng)A正確。22、下列程序段中，如果變量a中保存的字符是逗號(hào)“，”，則以下程序段執(zhí)行后，變量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標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：本題考查的是多路分支語(yǔ)句Selectcaser～EndCase知識(shí)點(diǎn)。該題將字符“，”賦值給變量a。程序會(huì)執(zhí)行滿足case后條件的那一條指令，然后結(jié)束程序。本題變量a的值與Case"!"，"?"，"，"，")"，"；"相匹配，所以執(zhí)行該語(yǔ)句塊中的語(yǔ)句“str="Punctuaton"”。因此應(yīng)選擇選項(xiàng)D。23、己知過(guò)程對(duì)應(yīng)的代碼如下：SubProc()f1=0：f2=1Forn=1to5f=f1+f2Debug．Printff1=f2：f2=fNextnEndSub過(guò)程Proc在立即窗口中依次顯示的數(shù)值是A、12358B、12345C、1261015D、12468標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：程序執(zhí)行過(guò)程如下：程序初始化f1=0；f2=1；當(dāng)n=1時(shí)；Forn=1to5；執(zhí)行第一次循環(huán)，條件為true；f=f1+f2=0+1=1輸出f的值為1；fl=f2=1；f2=f=2；當(dāng)n=2時(shí)；執(zhí)行第二次循環(huán)，條件為true；f=f1+f2=1+1=2，輸出f的值為2；f1=f2=1；f2=f=2；當(dāng)n=3時(shí)；執(zhí)行第三次循環(huán)，條件為true；f=f1+f2=1+2=3，輸出f的值為3；f1=f2=2；f2=f=3；當(dāng)n=4時(shí)；執(zhí)行第四次循環(huán)，條件為true；f=f1+f2=2+3=5，輸出f的值為5：f1=f2=3；f2=f=5；當(dāng)n=5時(shí)；執(zhí)行第五次循環(huán)，條件為true；f=f1+f2=3+5=8，輸出f的值為8；f1=f2=5；f2=f=8；當(dāng)n=6時(shí)；執(zhí)行第六次循環(huán)，條件為false，結(jié)束循環(huán)。綜上所述，程序輸出結(jié)果依次為1，2，3，5，8，所以選項(xiàng)A正確。24、下列Access內(nèi)置函數(shù)中，屬于域聚合函數(shù)的是A、AvgB、DMinC、CDateD、Sum標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：數(shù)據(jù)庫(kù)數(shù)據(jù)訪問(wèn)中常用的域聚合函數(shù)有：Nz函數(shù)、DCount函數(shù)、DAvg函數(shù)和DSum函數(shù)、DMax函數(shù)和DMin函數(shù)及DLookup函數(shù)，所以選項(xiàng)B正確。25、VBA中寫(xiě)磁盤文件的命令是A、Write#B、Print#C、Put#D、Set#標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：寫(xiě)入文件的過(guò)程就是將值添加到相關(guān)文件中的過(guò)程。文件打開(kāi)時(shí)，Wr