2011年9月計算機等級考試二級筆試試Access數據庫程序設計(考試時間90分鐘，滿分100分A D） 是（。 B）C語言編譯程 D）數據庫管理系 D）診斷和改正程序中的錯 概念模 D）數據模ABCa12b2ABCa12b21c31ABCA12b21ABCc31則由關系R和S得到關系T的操作是 自然連 D） 繼 D）逐步求 學校規定學生住宿標準是：本科生4人一間，生2人一間，博士生1人一間，學生與 C）OLE對象 必須輸入字母或數

D）D）報表和字段組成 在SQL語言的SELECT語句中，用于指明檢索結果排序的子句是 C）GROUP D）ORDER 記錄 D）記錄選擇 Abs([成績 D）Sgn([成績在Access中為窗體上的控件設置Tab鍵的順序，應選擇“屬性”框的 B“ 課程名 D牌微波爐A牌B2SELECT部門號,MAX(單價*數量)FROM商品表GROUPBY部門號; 在宏表達式中要Form1窗體中的txt1控件的值，正確的方法是 Form1! C）Forms!Form1! D）Forms! 由“Fori=1To16Step3”決定的循環結構被執行 A）4 B）5 C）6 D）7st=InputBox("請輸入字符串","字符串框“bbbb， PrivateSubForm_Click()Fori=1To6step3NextiEnd

盤輸入的10個大于0的整數，找出其中的最大值和對應的輸入位置。PrivateSubCommand32_Click()max=0max_n=0Fori=1T010num=Val(InputBox("請輸入第"&i&"個大于0的整數 NextiMsgBox("最大值為第"&max_n&"個輸入的End Subsfun(xAsSingle,yAsSingle)y=tModyEndSubPrivateSubCommand33_Click()DimaAsDimbAsa=5:MsgBoxa＆chr(10)+chr(13)＆bEndSub A）1和 B）1.25和 C）1.25和 D）5和 PrivateSubCommand34_Click()i=0i=iLoopWhilei<10MsgBoxiEnd PrivateSubCommand0_Click()DimIAsInteger,JAsIntegerForI=2To10ForJ=2ToIfImodJ=0ThenExitForNextJIfJ>sqr(I)ThenDebug.PrintI;NextIEndA）157 B）46 C）357 D）235數據結構分為線性結構與非線性結構，帶鏈的棧屬于【1】在長度為n的順序的線性表中插入一個元素，情況下需要移動表中【2】個元流圖（DFD，則應采用【3】方法。數據庫系統的是【4】換為【5】。Access數據庫中的字節（Byte）數值類型在數據庫中占【6】字節。 【7】&"頁"Access數據庫中保存的數據發布到網絡上，可以采用的對象是【8】。Forml，則將該窗體標題設置為“Access窗體”的語句是【9】。l100的累加和。請在空白處填入適當的語句，使程序完成指定DimsAsInteger,mAsIntegers=0m=do 【10s=s+mm=m+1下列程序的功能是求算式：1-1/2+1/3-1/4+……30項之和。請在空白處填入適當的語句，PrivateSubDimiasinteger,sassingle,fasintegers=0;f=1ForI=1To30s=s+f/f= NextDebug.Print"1-1/2+1/3-1/4+……=";sEndSub碼：”，用于輸入用戶名的文本框名為“UserName”，用于輸入的文本框名為 用!”信息。要求整個登錄過程要在30秒中完成，如果超過30秒還沒有完成正確的登錄操作，DimSecondAsIntegerPrivateSubForm_Open(CancelAsInteger)Second=0EndPrivateSubForm_Timer()IfSecond>30ThenMe!Tnum=30- 'EndSecond 【12EndIfMe.UserName<>"123"OrMe.UserPassword<>"456"MsgBox"錯誤!"+"您還有&30-Second&秒vbCritical,"提示"Me.TimerInterval '終止Timer事件繼續發MsgBox歡迎使用!"vbInformation,成功"EndIfEndSub“ 成績×40％，如果學生平時成績大于等于60分，則可以參加期末考試(“能否考試”字段“PrivateSubCommand0_Click()DimdbAsDAO.DatabaseDimrsAsDAO.RecordsetDimpszyAsDAO.Field,xcyAsDAO.Field,qzksAsDAO.FieldDimpsAsDAO.Field,ksAsDAO.FieldSetdb=CurrentDb(Setrsdb.OpenRecordset("平時成績表")Setpszy=rs.Fields("平時作業")Setxcy=rs.Fields("小測驗")Setqzksrs.Fields("期中考試")