2010年3月二級(jí)access試題和答案

SELECT*FROMFOR*網(wǎng)絡(luò)*SELECT*FROMFORLIKE"*網(wǎng)絡(luò)SELECT*FROMWHERE"*網(wǎng)絡(luò)SELECT*FROMWHERELIKE"*網(wǎng)絡(luò) D)SQL查SQL“GROUPBY” PrivateSubCommandl_Click()subT.Form.RecordSource"select*fromEnd 在控件或記錄的數(shù)據(jù)變化后發(fā)生的B)在控件或記錄的數(shù)據(jù)變化前發(fā)生的C)當(dāng)窗體或控件接收到焦點(diǎn)時(shí)發(fā)生的D)當(dāng)窗體或控件失去了焦點(diǎn)時(shí)發(fā)生的PrintOutB)OutputToC)MsgBoxD)RunWarnings 在模塊的部分使用“OptionBase1”語(yǔ)句，然后定義二維數(shù)組A(2to5,5)，則該數(shù)組的元素個(gè)數(shù) 由“Fori=1To9Step3”0 B)1 C)4 PrivateSubCommand1_Click()Dimi,j,xFori=1To20stepx=Forj=iTo20step3x=x+1NextjNextEnd PrivateSubDimyAsIntegery=0y=If(yMod10)+Int(y/10)=10ThenDebug.Printy;LoopUntily=0EndA)3755642819 B)1050 C)105020 D)37556428PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=12:y=32CallProc(x,y)Debug.Printx;yEndSubPublicSubProc(nAsInteger,ByValmAsInteger)n=nMod10m=mMod10EndSubA)2 B)12 C)2 D)12PrivateSubCommandl_Click()Dimd1AsDateDimd2AsDatedl=#12/25/2009#d2=#1/5/2010#MsgBoxDateDiff(”ww”,d1,End (35)下列程序段的功能是實(shí)現(xiàn)“學(xué)生”表中“”字段值加1DimStrAsStringStr="Docmd.RunSQLA)= B)Update學(xué)生Set=C)Set= D)Edit學(xué)生=二、填空題(每空2分，共3050front=45(rear=10(指向隊(duì)尾元素)，則該循環(huán)隊(duì)列中共有【2】個(gè)元素。34有一個(gè)學(xué)生選課的關(guān)系，其中學(xué)生的關(guān)系模式為：學(xué)生(學(xué)號(hào)，，班級(jí)，)，課程的關(guān)系模式為：課程(課號(hào)，課程名，學(xué)時(shí))，其中兩個(gè)關(guān)系模式的鍵分別是學(xué)號(hào)和課號(hào)，則關(guān)系模式選課可定義為：選課(學(xué)號(hào)，【5】，成績(jī))。Command1)Framel)，選項(xiàng)組上顯示“Framel”文本的控件名稱為L(zhǎng)abell，若將選項(xiàng)組上顯示文本“Frame1”改為漢字“”，應(yīng)使用的語(yǔ)句是【6PrivateSubTextl_KeyPress(KeyAsciiAsInteger)SelectCaseDeyAsciiCase97ToDebug.PrintUcase(Chr(KeyAscii));Case65To90Debug.PrintLcase(Chr(KeyAscii));Case48To57Debug.PrintCaseKeyAscii=0EndSelectEndSubPrivateSubDima(10),p(3)AsIntegerk=5Fori=1To10a(i)=i*iNextiFori=1To3p(i)=a(i*i)NextiFori=1To3k=k+p(i)*2NextiMsgBoxkEndSubPrivateSubForm_Click()DimNcount%,n%n=n+If【11】ThenDebug.PrintnNcount=Ncount1EndIfLoopUntilNcont=5EndSub100200PrivateSubDimi%,j%,k%,t‘tDimbAsFori=100To200b=Truek=j=DoWhilekjAndbIfIModk=0Thenb=【12】Endk13Ifb=TrueThent=t+1Debug.PrintiEndIfNextDebug.Print"t=";tEndSub數(shù)據(jù)庫(kù)中有工資表，包括“”、“工資”和“”等字段，現(xiàn)要對(duì)不同的職工增加工資，規(guī)定教授增PrivateSubCommand5_Click()DimwsAsDAO.WorkspaceDimdbAsDAO.DatabaseDimrsAsDAO.RecordsetDimgzAsDAO.FieldDimzcAsDAO.FieldDimsumAsCurrencyDimrateAsSingleSetdb=CurrentDb()Setrsdb.OpenRecordset("工資表")Setgz=rs.Fields("工資")Setzc=rs.Fields("")sum=0DoWhileNot14SelectCasezcCaseIsrate=0.15CaseIs=""rate=0.1CaseElserate=0.05EndSelectsum=sum+gz*rategz=gz+gz*rate【15Setrs=NothingSetdb=MsgBox"漲工資總計(jì):"&sumEndSub（1）A公共基礎(chǔ)知識(shí)第一章P39二分法只適用與順序的有序表，有序鏈表不能二分法查找（2）-(10)DBACBADCA(11)-(20)DCCCA(21)-(30)ACDDBCDB 29.A(optionBase11(30)步