2023年河北省對口升學計算機專業(yè)理論試題(附答案)2

PAGE232023年河北省普通高等學校對口招生考試計算機專業(yè)理論試題〔A〕一、選擇題〔本大題共50小題，每題2分，共100分。在每題所給出的四個選項中，只有一個符合題目要求，將正確選項填涂在機讀卡上〕1．以下關于計算機語言的描述不正確的是〔〕A．程序設計語言通常分為機器語言、匯編語言和高級語言三類B．VisualBasic程序設計語言屬于結構化程序設計語言C．匯編語言編寫的程序必須編譯成機器語言才能執(zhí)行D．常見的解釋型語言有C語言2．影響計算機運行速度的主要性能指標是〔〕A．顯示器的分辨率、打印機的性能B．硬盤的容量和內(nèi)存的容量C．字長、內(nèi)存容量和CPU的時鐘頻率D．計算機所配備的語言、操作系統(tǒng)、外部設備3．以下描述不正確的是〔〕A．多媒體技術最主要的兩個特點是集成性和交互性B．所有計算機的字長都是固定不變的，都是8位C．CPU主要包括運算器和控制器兩大部件D．各種高級語言的編譯系統(tǒng)都屬于系統(tǒng)軟件4．以下關于計算機數(shù)制的描述正確的是〔〕A．八進制數(shù)有8個數(shù)碼，范圍是從1到8B．一般在數(shù)字后面加一個大寫字母B表示十六進制數(shù)C．計算機內(nèi)部所有信息都是以二制數(shù)表示的D．十進制整數(shù)轉換為二進制的規(guī)那么是“除2取余數(shù)，余數(shù)順序排列〞5．以下4種不同數(shù)制表示的數(shù)中，數(shù)值最大的一個是〔〕A．八進制數(shù)367B．十進制數(shù)258C．十六進制數(shù)F6 D．二進制數(shù)100000016．以下選項表達了馮·諾依曼計算機體系結構特點的是〔〕A．引入了CPU的概念 B．ASCII編碼和指令系統(tǒng)C．程序存儲和程序控制 D．機器語言和十六進制7．以下關于病毒的描述，正確的是〔〕A．只要不上網(wǎng)，就不會感染病毒B．不隨意翻開陌生、可疑郵件是預防病毒的一種手段C．只要安裝最好的殺毒軟件，就不會感染病毒D．所有的病毒都會導致計算機越來越慢，甚至可能使系統(tǒng)崩潰8．為了解決計算機中CPU與內(nèi)存儲器之間速度不匹配問題，常使用的部件是〔〕A．CacheB．EPROM C．ROM D．Flash9．在WindowsXP中，為防止文件內(nèi)容被任意更改，可將其屬性設置為〔〕A．系統(tǒng) B．壓縮 C．存檔 D．只讀10．在WindowsXP中，關于文件快捷方式的描述正確的是〔〕A．刪除文件快捷方式，即刪除該快捷方式所指向的文件B．對快捷方式重新命名后，雙擊該快捷方式圖標，那么不能翻開其指向的文件C．在桌面上創(chuàng)立文件的快捷方式，就是將相應的文件復制到桌面D．創(chuàng)立文件快捷方式，就是建立指向相應文件的鏈接11．在WindowsXP中，以下關于回收站的描述正確的是〔〕A．放入回收站的內(nèi)容，不占用硬盤的存儲空間B．U盤上被刪除的文件或文件夾，可以利用回收站的“復原〞命令將其恢復C．執(zhí)行回收站中的“清空回收站〞命令，可以將回收站中的內(nèi)容復原到原來位置D．放置在回收站中的文件或文件夾，在回收站被清空之前，可以恢復12．在Word2003中，實現(xiàn)以下圖顯示的排版效果，正確的操作方法是〔〕A．將光標置于此段中，單擊“格式〞菜單中的“首字下沉〞菜單項，選擇“下沉〞格式?！跋鲁列袛?shù)〞設置為“2”，單擊“B．將光標置于此段中，單擊“工具〞菜單中的“首字下沉〞菜單項，選擇“下沉〞格式?！跋鲁列袛?shù)〞設置為“2”，單擊“C．選中相關文字，單擊“格式〞菜單中的“字體〞菜單項，將“效果〞中“上標〞前面的復選框選中，單擊“確定〞D．將光標置于此段中，單擊“插入〞菜單中的“首字下沉〞菜單項，選擇“下沉〞格式。“下沉行數(shù)〞設置為“2”，單擊“13．在Word2003中，假設要計算如下表中第2行第6列“廠家A〞的“季度平均值〞，需在“表格〞菜單中翻開“公式〞對話框，如以下圖所示，應在“=〞后面輸入正確的公式是〔〕A．AVERAGE(B2:E2)B．AVERAGE(LEFT)C．AVERAGE(ABOVE)D．AVERAGE(B2:D2)14．在Word2003文檔的頁面設置中，不能進行的操作是〔〕A．設置頁邊距 B．設置紙張大小C．設置紙張來源 D．設置分欄15．Excel2003的數(shù)據(jù)表“銷售業(yè)績提成表〞如以下圖所示。假設“總銷量〞到達或高于“獎勵標準〞，那么在“有無獎金〞列填充“有〞，否那么填充“無〞。單元格H6中是“獎勵標準〞的值?，F(xiàn)要求在單元格F3中填入公式，判斷是否有獎金，并向下自動填充F列其他單元格；H9中填入公式計算獎勵比例〔有獎金人數(shù)除以總人數(shù)〕。以下是F3和H9中分別填入的公式，其中完全正確的選項是〔〕A．=IF(E3>=H6,"有","無")；=COUNTIF(F3:F10,"有")/COUNT(E3:E10)B．=IF(E3>=$H$6,"有","無")；=COUNTIF(F3:F10,"有")/COUNT(E3:E10)C．=IF(E3>=H$6,"有","無")；=COUNTIF(F3:F10,F6)/COUNT(F3:F10)D．=IF(E3>=$H6,"有","無")；=COUNTIF(F3:F10,F6)/COUNT(F3:F10)16．在Excel2003中，對數(shù)據(jù)進行分類匯總前，必須進行的操作是〔〕A．查詢 B．篩選 C．檢索 D．排序17．在Excel2003工作表中，用“高級篩選〞方式篩選數(shù)據(jù)時，在條件區(qū)同一行輸入的多個條件之間的關系是〔〕A．“與〞關系 B．“或〞關系C．“非〞關系 D．“異或〞關系18．在VisualBasic中，要產(chǎn)生10到80之間〔含10和80〕的隨機整數(shù)，以下表達式中正確的是〔〕A．Int(Rnd*80+10) B．Int(Rnd*71+10)C．Int(Rnd*71+70) D．Int(Rnd*10+80)19．在VisualBasic中,使用PictureBox控件裝載圖形，以下方法中不能實現(xiàn)此功能的選項是〔〕A．在設計時使用對象的Picture屬性B．在設計時使用剪貼板把圖形從剪貼板粘貼到控件上C．在運行時使用剪貼板把圖形從剪貼板粘貼到控件上D．在運行時使用LoadPicture函數(shù)裝入指定的圖形文件,然后將函數(shù)返回值賦值給控件的Picture屬性20．在VisualBasic中，以下為雙精度類型的變量是〔〕A．a(chǎn)$ B．a(chǎn)! C．a(chǎn)% D．a(chǎn)#21．在VisualBasic中，表達式String$(3,"abc")的值是〔〕A．"abcabcabc" B．"aaa"C．"abc" D．"cba"22．在VisualBasic的窗體上有一個定時器控件Timer1和一個命令按鈕C1，假定定時器控件Timer1的Interval屬性值為500，Enabled屬性值為True；命令按鈕C1的Left屬性值為400，Width屬性值為200。Timer1的Timer事件代碼為：PrivateSubTimer1_Timer() C1.Left=C1.Left-100EndSub那么程序開始運行多少秒后，命令按鈕恰好完全從窗體的左邊移出〔〕A．5 B．4 C．3 D．223．在VisualBasic中，以下控件沒有Caption屬性的是〔〕A．列表框 B．復選按鈕 C．單項選擇按鈕 D．框架24．在VisualBasic的窗體中，有名稱為List1的列表框，程序運行時，如果選中了列表項號為5的列表項〔列表框中最上面的列表項號為0〕，以下描述不成立的是〔〕A．List1.Selected(List1.ListIndex)的值為邏輯值TrueB．List1.Selected(5)的值為邏輯值TrueC．List1.List(5)的值為邏輯值TrueD．List1.Listindex的值為525．在VisualBasic中，以下程序運行后，單擊命令按鈕，那么輸出結果為〔〕PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=10y=15Callproc(x,y)Printx,yEndSubPublicSubproc(aAsInteger,ByValbAsInteger)a=a*bx=a+bb=b+100EndSubA．10165 B．15015C．16515 D．15011526．在VisualBasic中，為了使一個復選框被禁用〔灰色顯示〕，應把它的Value屬性設置為〔〕A．0 B．1C．2 D．False27．在VisualBasic中，有如下程序段。程序運行后，單擊命令按鈕，在輸入對話框中依次輸入25，33，55，66，輸出結果是〔〕PrivateSubCommand1_Click()DimxAsInteger,yAsInteger，aAsIntegerx=100Fori=1To4y=InputBox("請輸入一個整數(shù)")IfyMod5=0Thena=a+yx=yElsea=a+xEndIfNextiPrintaEndSubA．160 B.100C．120 D．9028．在VisualFoxpro中，恢復系統(tǒng)菜單默認設置的命令是〔〕A．SETDEFAULTSYSTEMB．SETMENUTODEFAULTC．SETSYSTEMTODEFAULTD．SETSYSMENUTODEFAULT29．在VisualFoxpro中，如果指定參照完整性的“刪除規(guī)那么〞為“級聯(lián)〞，那么當刪除父表中的記錄時〔〕A．系統(tǒng)自動備份子表相關記錄到一個新表中B．假設子表中有相關記錄，那么禁止刪除父表中記錄C．會自動刪除子表中所有相關記錄D．不作參照完整性檢查，刪除父表記錄與子表無關30．在VisualFoxpro中，在DOWHILE……ENDDO循環(huán)結構中LOOP語句的作用是..〔〕A．轉移到DOWHILE語句行，開始下一次判斷和循環(huán)B．終止循環(huán)，將控制轉移到本循環(huán)結構ENDDO后面的第一條語句繼續(xù)執(zhí)行C．該語句在DOWHILE……循環(huán)結構中不起任何作用 D．退出循環(huán)，返回到程序開始處31．在VisualFoxpro中，以下表達式返回結果為.T.的是〔〕A．AT("計算機","電子計算機") B．TYPE("CTOD('01/01/2017')")="D"C．"計算機系統(tǒng)結構"$"計算機"D．SUBSTR(STR(120),3,1)="0"32．在VisualFoxpro中，以下關于查詢的描述正確的是〔〕A．不能將查詢結果保存在報表文件中B．查詢文件的擴展名為.pqrC．只能對數(shù)據(jù)庫表建立查詢D．查詢是從指定的表或視圖中提取滿足條件的記錄，可將結果定向輸出33．在VisualFoxpro中，用報表向導創(chuàng)立報表時，可設置的報表布局方式有〔〕A．列數(shù)、方向、字段布局 B．列數(shù)、行數(shù)、字段布局C．行數(shù)、方向、字段布局 D．列數(shù)、行數(shù)、方向34．在VisualFoxpro中，關于過程調用的描述正確的是〔〕A．當實參的數(shù)量多于形參的數(shù)量時，多余的實參被忽略B．過程中必須包含RETURN語句，否那么不能返回調用程序C．參數(shù)傳遞都是按引用傳遞D．上面的都不正確35．在VisualFoxpro中，以下程序段執(zhí)行以后，顯示的結果為〔〕CLEARA=10B=20SETUDFPARMSTOREFERENCESWA((A),B)?A,BPROCEDURESWAPARAMETERSX1,Y1TEMP=X1X1=Y1Y1=TEMPENDPROCA．1010B．1020C．2010D．202036．以下選項不屬于計算機網(wǎng)絡性能指標的是〔〕A．速率 B．帶寬 C．主頻 D．時延37．在同一種網(wǎng)絡體系結構下，以下關于網(wǎng)絡協(xié)議與網(wǎng)絡效勞的描述中，正確的是〔〕A．網(wǎng)絡協(xié)議與網(wǎng)絡效勞同時存在，可以相互替代B．網(wǎng)絡協(xié)議與網(wǎng)絡效勞沒有聯(lián)系，可以獨立存在并獨立運行C．網(wǎng)絡協(xié)議是分層次的，而網(wǎng)絡效勞是不分層次的D．網(wǎng)絡協(xié)議水平存在于不同網(wǎng)絡結點〔即同層次同協(xié)議〕，網(wǎng)絡效勞垂直存在于同一網(wǎng)絡結點相鄰層次之間38．在互聯(lián)網(wǎng)中的兩臺計算機間傳遞文件時，組成該文件的數(shù)據(jù)被劃分為假設干個數(shù)據(jù)包進行傳送。以下關于數(shù)據(jù)傳送過程的描述中，不正確的是〔〕A．受網(wǎng)絡協(xié)議控制，數(shù)據(jù)包可能需要重新發(fā)送B．數(shù)據(jù)包的長度不一定都是相同的C．不同的數(shù)據(jù)包經(jīng)過的傳送路徑是相同的D．數(shù)據(jù)包不一定按發(fā)送順序到達目標計算機39．以下關于物理層通信的描述不正確的是〔〕A．信號是數(shù)據(jù)的載體，可以通過物理層無過失傳遞B．基帶傳輸時，傳送的是數(shù)字信號；寬帶傳輸時，傳送的是模擬信號C．并行傳輸比串行傳輸效率高、信息吞吐量大D．全雙工通信的效率比半雙工通信、單工通信高40．在以下通信介質中，對抗電磁干擾最為理想的是〔〕A．同軸電纜 B．光纖 C．衛(wèi)星通信 D．屏蔽雙絞線41．NIC〔網(wǎng)絡適配器，即網(wǎng)卡〕不具備以下哪個功能〔〕A．透明傳輸 B．擁塞控制C．封裝成幀 D．過失檢測42．為了通過共享信道、最大限度提高信道利用率，在網(wǎng)絡通信中廣泛使用多路復用技術。以下關于多路復用技術的描述不正確的是〔〕A．頻分復用是指在同一物理連接中使用不同的頻率來傳輸不同的信號B．時分復用是指在同一物理連接的不同時段來傳輸不同的信號C．碼分復用是指使用同一碼制攜帶多路信號D．波分復用是指將波長不同的光信號合成一束，沿著單根光纖進行傳輸43．以下關于以太網(wǎng)標準10BASE-T的描述不正確的是〔〕A．“10”B．“T〞表示連網(wǎng)介質為雙絞線C．“BASE〞表示通過連網(wǎng)介質傳送的信號是基帶信號D．使用10BASE-T標準的網(wǎng)絡，其物理拓樸結構為星形44．以下關于網(wǎng)絡設備的描述正確的是〔〕A．網(wǎng)卡工作在數(shù)據(jù)鏈路層，可以進行路由選擇B．集線器與交換機都是工作在數(shù)據(jù)鏈路層的，但交換機性能優(yōu)于集線器C．中繼器可以有效擴展網(wǎng)絡范圍，其工作在物理層D．路由器在傳輸層將不同網(wǎng)絡進行了互連45．以下關于網(wǎng)絡協(xié)議及拓樸的描述正確的是〔〕A．使用不同協(xié)議的網(wǎng)絡，不能進行互連B．不同拓樸結構的網(wǎng)絡，可以進行互連C．拓樸結構與網(wǎng)絡協(xié)議有關，即一種網(wǎng)絡結構只能使用一種特定的網(wǎng)絡協(xié)議D．環(huán)形網(wǎng)中使用的硬件設備，可以直接應用到星形網(wǎng)絡中46．以下對CSMA/CD的描述正確的是〔〕A．CSMA/CD通過令牌幀的傳遞控制結點數(shù)據(jù)的收、發(fā)過程B．CSMA/CD工作方式允許多個結點同時發(fā)送數(shù)據(jù)而不會產(chǎn)生信道沖突C．CSMA/CD指載波監(jiān)聽多點接入/碰撞檢測，是一種公共介質競爭使用的控制方法D．CSMA/CD是環(huán)形網(wǎng)絡廣泛使用的工作方式47．計算機網(wǎng)絡中主機的硬件地址是指〔〕A．域名地址 B．端口地址C．IP地址 D．MAC地址48．以下關于子網(wǎng)掩碼的描述不正確的是〔〕A．子網(wǎng)掩碼由四個十進制數(shù)組成，這四個十進制數(shù)只能是0或255B．子網(wǎng)掩碼與IP地址按位與運算，可以得到該計算機所在的網(wǎng)絡地址C．子網(wǎng)掩碼可以用來屏蔽IP地址的一局部，以區(qū)別網(wǎng)絡標識和主機標識D．子網(wǎng)掩碼可以用于將一個大的IP網(wǎng)絡劃分為假設干小的子網(wǎng)絡49．有以下6個IP地址，以下關于IP地址分類的描述不正確的是〔〕〔1〕 〔2〕7〔3〕53 〔4〕48 A．(2)和(5)是A類 B．(6)和(2)是D類C．(1)和(3)是B類 D．(4)和(6)是C類50．以下關于ARP協(xié)議的描述正確的是〔〕A．ARP協(xié)議向網(wǎng)絡層提供地址轉換效勞，所以ARP工作在數(shù)據(jù)鏈路層B．ARP協(xié)議工作時只通過檢索方式，即可獲得目標MAC地址C．ARP協(xié)議完成從IP地址到MAC地址的轉換D．ARP協(xié)議通過向效勞器問詢，獲得目標MAC地址二、判斷題〔本大題14小題，每題1分，共14分。將答案填涂在機讀卡上，正確的填涂“√〞格，錯誤的填涂“×〞格〕1．目前在生活和工作中普遍使用的計算機，主要電子元器件采用的是大規(guī)模和超大規(guī)模集成電路?！病?．CPU可以直接訪問硬盤存儲器。〔〕3．操作系統(tǒng)的主要功能是對計算機所有資源進行統(tǒng)一控制和管理，為用戶使用計算機提供方便?！病?．在WindowsXP中，將文件以鼠標左鍵拖拽方式釋放至另一文件夾，完成的功能是復制而非移動。〔〕5．在Word2003中，表格外框線的線型可以設置不同，但表中內(nèi)框線的線型設置必須一致。〔〕6．在Word2003中，通過“插入〞菜單中的“頁眉和頁腳〞菜單項，可以為文檔設置頁眉和頁腳?！病?．在Excel2003中，可以通過使用“條件格式〞功能，將滿足條件的數(shù)據(jù)進行突出顯示。〔〕8．在Excel2003中，如果要一次性在多個單元格中填入相同內(nèi)容，采取的步驟是：①選中多個單元格；②輸入內(nèi)容；③按Ctrl+Enter鍵?！病?．在VisualBasic中，單擊滾動條上的箭頭，可觸發(fā)滾動條的Scroll事件。〔〕10．在VisualFoxPro中，當表單運行時，數(shù)據(jù)環(huán)境中的表處于只讀狀態(tài)，只能顯示不能修改?！病?1．DHCP協(xié)議的主要功能是建立IP地址與域名的對應關系。〔〕12．網(wǎng)絡防火墻工作在網(wǎng)絡層，可以實現(xiàn)基于IP地址的數(shù)據(jù)包過濾。〔〕13．能夠共享到網(wǎng)絡中的資源，只能是以文件、數(shù)據(jù)等形式提供的軟件資源，而不能是計算機硬件資源?！病?4．FTP是一個應用層協(xié)議，可以用來傳輸各種格式的文件?！病橙⑻羁疹}〔本大題共13小題，每題2分，共26分。請將答案填寫在答題紙上〕1．字母a的ASCII碼是(97)10，那么字母f的ASCII碼是()10。2．在計算機中，供用戶自定義計算機外觀和功能，添加或刪除程序，設置網(wǎng)絡連接和用戶賬戶等的應用程序的集合是。3．在WindowsXP中，要將整個桌面以圖片的方式存入剪貼板，應按_鍵。4．“計算機輔助設計〞的英文縮寫是。5．在Word2003中，去除圖片的局部邊緣,使用的是圖片工具欄中的命令。6．在Excel2003中，在某一單元格填充分數(shù)2/3，輸入方法為。7.在VisualBasic中，順序文件關閉語句是。8.VisualBasic中，由a和b兩個變量組成的代數(shù)式的算術表達式是。9.在VisualFoxPro中，設M=200，N=300，X="M+N"，Y="01/01/2017"，那么表達式IIF(TYPE("&Y")$X,REPLICATE("AAA",2),REPLICATE("BBB",2))的值為。10.在VisualFoxPro中，使用命令DECLAREMM(5,6)定義的數(shù)組，包含的數(shù)組元素的個數(shù)為。11．與IPv4不同，IPv6協(xié)議使用個字節(jié)來表示一個IP地址。12．計算機網(wǎng)絡的OSI參考模型，其中文名稱為。交換機PC1交換機PC1PC2PC3PC4PC5路由器 Internet 四、根據(jù)的環(huán)境與題意，寫出相應的VisualFoxPro操作命令或SQL語句，要求每題用一條命令或語句完成〔本大題共5小題，每題4分，共20分，請將答案填寫在答題紙上〕現(xiàn)有數(shù)據(jù)庫“JXC.DBC〞，其中包含表“PROINFO.DBF〞，該表有以下字段：商品編號(C,6)、商品名稱(C,40)、商品類別(C,4)、商品單位(C,6)、商品單價(N,8,1)，庫存下限(N,8,0)，產(chǎn)地〔C,40〕，并建立了以“商品編號〞為關鍵字的主索引。相應的數(shù)據(jù)庫和表已翻開，寫出實現(xiàn)下述功能的命令(注意：每個命令只能寫一條語句，多于一條不得分)。1．刪除所有“庫存下限〞小于100,“商品單位〞不是“箱〞的記錄。〔要求使用VisualFoxPro命令〕2．假設表“GOODS.DBF〞與表“PROINFO.DBF〞結構相同，將“GOODS.DBF〞中的數(shù)據(jù)添加到“PROINFO.DBF〞表中?！惨笫褂肰isualFoxPro命令〕3.創(chuàng)立“SALLINFO.DBF〞表〔商品編號〔C，6〕，售價〔N，8,1〕〕,并與“PROINFO.DBF〞建立關聯(lián)，關聯(lián)字段為“商品編號〞?！惨笫褂肧QL語句〕4．將“PROINFO.DBF〞表所有“商品單位〞為“聽〞，商品類別為“0001”的商品“庫存下限〞調整為200。〔要求使5．按不同“商品類別〞計算“PROINFO.DBF〞表中“商品單價〞的平均值?！惨笫褂肧QL語句〕五、程序分析〔本大題共2小題，每題5分，共10分，讀程序并分析結果，請?zhí)顚懺诖痤}紙上〕1．分析下面的VisualBasic程序，循環(huán)體中的語句s=s+1循環(huán)了_______次。OptionBase1PrivateSubCommand1_Click()DimiAsIntegerDimsAsIntegerDimkAsIntegeri=0:s=0a=Array(80,20,100,40,70,60,50,10,90,30)Fork=1To10Fori=a(k)To1Step-1Ifi>=45ThengotoLab1s=s+1NextiLab1:NextkPrintsEndSub2．分析下面的VisualFoxPro程序，要使輸出結果為VhayagawVgavIx,那么輸入的字符串應為。CLEARACCEPT"請輸入字符串："TOCHARINN=LEN(CHARIN)DIMEYCHAR(N)FORI=1TONIFI%2=0YCHAR(I)=SUBSTR(CHARIN,I,1)ELSEYCHAR(I)=UPPER(SUBSTR(CHARIN,I,1))ENDIFENDFORFORI=1TON/2TEMP=YCHAR(I)YCHAR(I)=YCHAR(N-I+1)YCHAR(N-I+1)=TEMPENDFORDCHAR=""FORI=1TONIFASC(YCHAR(I))>=ASC("A")ANDASC(YCHAR(I))<=ASC("Z")DCHAR=DCHAR+LOWER(CHR(ASC("A")+ASC("Z")-ASC(YCHAR(I))))ELSEIFASC(YCHAR(I))>ASC("a")ANDASC(YCHAR(I))<=ASC("z")DCHAR=DCHAR+UPPER(CHR(ASC("a")+ASC("z")-ASC(YCHAR(I))))ELSEDCHAR=DCHAR+YCHAR(I)ENDIFENDIFENDFOR?DCHAR六、寫出以下程序的運行結果〔本大題共5小題，每題5分，共25分，請將答案填寫在答題紙上〕1．分析下面VisualBasic程序。窗體中有一命令按鈕〔名稱為Command1〕。OptionBase1PrivateSubCommand1_Click()DimiAsIntegerDimkAsIntegerDimmAsIntegera=Array(6,4,8,2,1,3,9,12,43,67,8)Fori=1To10Fork=i+1To11Ifa(i)>a(k)Thena(i)=a(i)+a(k):a(k)=a(i)-a(k):a(i)=a(i)-a(k)EndIfNextkIfa(i)>=10Thena(i)=Int(a(i)/10)NextiIfa(i)>=10Thena(i)=Int(a(i)/10)m=0Fori=1To11m=m+a(i)NextiPrintmEndSub窗體啟動后，單擊命令按鈕，窗體顯示的結果為________。2．分析下面VisualBasic程序。如下圖，界面中有兩個文本框和一個命令按鈕，上面有字符的控件是文本框1〔名稱Text1〕，中間的控件是文本框2〔名稱Text2〕，最下面的控件是命令按鈕〔名稱Command1〕。PrivateSubCommand1_Click()DimnumAsStringDimnum1AsStringDimnum2AsStringDimcAsStringDimiAsIntegerDimlengthAsIntegerDimlength1AsIntegerDimlength2AsIntegerlength1=0:length2=0num=Text1.Textlength=Len(num)Fori=1Tolengthc=Mid(num,i,1)Ifc<>"8"Thennum1=num1+clength1=length1+1ElseIflength1>length2Thenlength2=length1:num2=num1length1=0:num1=""Elselength1=0:num1=""EndIfEndIfNextiIflength1>length2Thennum2=num1EndIfText2.Text=num2EndSub窗體運行后，在文本框1中輸入圖中所示的字母和數(shù)字，單擊命令按鈕，那么在文本框2顯示的內(nèi)容是__________________。3．有如下VisualFoxPro程序：CLEARPUBLICC,DA=12345678B=10C=20D=30N=0DOSUB1WITHA,B?A,B,C,DPROCEDURESUB1PARAMETERSX,YPRIVATECY=0FLAG=.T.DOWHILEFLAGY=X%10+Y*10X=INT(X/10)N=N+1I=0E=Y%10DOWHILEI<=NE=E*10I=I+1ENDDOD=E+DIFX<100FLAG=.F.ENDIFENDDOC=STR(X)+STR(Y)RETURNENDPROC運行上面的程序，顯示的結果為：。4．現(xiàn)有表“CJB.DBF〞，結構為：BJ_NAME(C,30)、XM(C，8)、YW(N,4,1),表中數(shù)據(jù)如以下圖所示：有如下VisualFoxPro程序：ACCEPT"請輸入班級名："TOBJMUSECJB.DBFINDEXONYWTAGYWSXDIMETEMP(10)K=0SAV=0N=0DOWHILENOTEOF()IFTRIM(BJ_NAME)=TRIM(BJM)TEMP(K+1)=YWK=K+1ENDIFN=N+1SAV=SAV+YWSKIPENDDOFORM=1TO1ZH1=TEMP(M) ENDFORFORM=2TO2ZH2=TEMP(M)ENDFORFORM=3TO3IFK<3ZH3=ZH2ELSEZH3=TEMP(K)ENDIFENDFORP=ZH1*0.5+ZH2*0.35+ZH3*0.15-SAV/N?P運行上面的程序，輸入“高三〔1〕班〞，顯示的結果是：。5.數(shù)據(jù)庫文件ZKSCORE.DBC包含1個表“CJB.DBF〞，表結構為：準考證號(C,9)、姓名(C,8)、學校名稱(C,20)、班級名稱(C,20)、總分〔N,5,1〕。表數(shù)據(jù)如以下圖所示：有如下VisualFoxPro程序：ACCEPT"請輸入準考證號："TOZKZOPENDATABASEZKSCOREALTERTABLECJBADDX2N(2,0)SELECT準考證號,姓名,學校名稱,班級名稱,總分,X2FROMCJBORDERBY;學校名稱,班級名稱,總分DESCINTOTABLECJTMPGOTOPX=1Y=XNX1=CJTMP.總分BJ=CJTMP.班級名稱XX=學校名稱DOWHILENOTEOF()IFBJ=CJTMP.班級名稱ANDXX=CJTMP.學校名稱REPLACEX2WITHIIF(NX1=CJTMP.總分,Y,X)Y=CJTMP.X2X=X+1BJ=CJTMP.班級名稱XX=學校名稱NX1=CJTMP.總分ELSEX=1Y=XNX1=CJTMP.總分REPLACEX2WITHXX=X+1BJ=CJTMP.班級名稱XX=CJTMP.學校名稱ENDIFSKIPENDDOSELECT準考證號,姓名,X2WHERE準考證號=ZKZFROMCJTMPINTOTABLETMPJG?準考證號,姓名,X2運行上面的程序，輸入“801510114〞，顯示的結果是：。七、VisualBasic程序改錯(本大題共2小題，每題5分，共10分，每個小題的程序有兩個錯誤行，請在答題紙上寫出錯誤行代碼和對應的改正后代碼，錯誤行代碼和改正后代碼完全正確方可得分)1．下面的程序是利用InputBox函數(shù)依次輸入兩個長度小于20的、均由數(shù)字字符組成的字符串，依次存入到兩個字符串變量中，然后從兩個字符串的起始位置開始依次取出一個字符進行操作，操作的規(guī)那么是：〔1〕把取出的字符轉換成數(shù)字分別存入到數(shù)組a和數(shù)組b中，將兩個數(shù)組中下標相同的元素值相加，如果它們的和大于9，那么存入數(shù)組c中，否那么不存入。然后再分別取下一個字符，進行同樣的操作。〔2〕如果某個字符串中的字符已經(jīng)取完，那么把另一個未取完的字符串中的字符單個取出，轉換成數(shù)字后加上10直接存入到數(shù)組c中。例如輸入的字符串是：“123456789〞和“96666666666”O(jiān)ptionBase1PrivateSubCommand1_Click()Dima(20)AsIntegerDimb(20)AsIntegerDimc(20)AsIntegerDimiAsIntegerDimjAsIntegerDimlen1AsIntegerDimlen2AsIntegerDimstr1AsStringDimstr2AsStringstr1=InputBox("請輸入第一個數(shù)字字符串：")str2=InputBox("請輸入第二個數(shù)字字符串：")len1=Len(str1)len2=Len(str2)i=1:j=1DoWhilei<=len1Andi<=len2a(i)=Val(Mid(str1,i,1))b(i)=Val(Mid(str2,i,1))Ifa(i)+b(i)>9Thenc(j)=a(i)+b(i):j=j+1i=i+1LoopIflen1>len2Thenstr1=Mid(str1,i)ElseStr2=Mid(str2,i)EndIflen1=Len(str1)i=1DoWhilei<=len1c(j)=Val(Mid(str1,i,1))+10i=i+1:j=j+1LoopFori=1TojPrintc(i);NextiEndSub2．下面程序的功能是：定義一個4行4列的數(shù)組并賦值，要求第1行至第4行產(chǎn)生的數(shù)分別在10至19、20至29、30至39、40至49之間，再用Inputbox函數(shù)輸入一個1到4之間的數(shù)字，然后求該數(shù)字所對應行與列元素的和。如產(chǎn)生的數(shù)組是：10171819212425233532303841444742假設輸入一個數(shù)字2，那么求第2行與第2列元素的和，結果為210。OptionBase1PrivateSubCommand1_Click()Dima(4,4)AsIntegerDimnumAsIntegerDimsAsIntegerDimiAsInteger,jAsIntegerFori=1To4Forj=1To4a(i,j)=10+Int(Rnd*10)Printa(i,j);NextjPrintNextinum=InputBox("請輸入一個1至4的數(shù)字：")s=a(num,num)Fori=1To4Forj=1To4Ifi=numOrj=numThens=s+a(num,num)EndIfNextjNextiPrintsEndSub八、程序填空〔本大題共7個空，每空5分，共35分，按程序要求在答題紙上填入相應的內(nèi)容，使程序完整正確〕1．(VisualBasic試題)下面程序的功能是輸入一個大于等于10小于500的數(shù)字，然后把10到該數(shù)字之間的所有素數(shù)找出并存入到數(shù)組a中，并輸出此數(shù)組。請在劃線位置填寫正確的內(nèi)容。OptionBase1PrivateSubCommand1_Click()DimnumAsIntegerDima(100)AsIntegerDimnAsIntegerDimkAsIntegerDimiAsIntegerDimjAsIntegern=1num=InputBox("請輸入一個數(shù)字：")Fori=10Tonumk=Sqr(i)Forj=2TokIfiModj=0Then______________NextjIfj>kThen____________:n=n+1EndIfNextiIfn=1ThenPrint"一個也沒有"ElseFori=1Ton-1Printa(i);NextiEndIfEndSub2．(VisualBasic試題)窗體上有五個標簽(用來提示其右側的內(nèi)容，標題分別是數(shù)據(jù)1，數(shù)據(jù)2，滾動條，運算符，結果)。數(shù)據(jù)1右側是文本框1〔名稱為Text1〕，數(shù)據(jù)2右側是一列表框〔名稱為List1〕，運算符右側是一組合框〔名稱為Combo1〕，上述三個控件內(nèi)容如程序及圖所示。滾動條〔名稱為HS1〕最小值和最大值分別是10和50，滾動條的LargeChange屬性值為10。界面中目前顯示42的控件是文本框2〔名稱為Text2〕，其值由文本框1中局部數(shù)據(jù)、組合框中選定的運算符及列表框中數(shù)據(jù)進行某種運算產(chǎn)生。標題顯示“開始〞的是一命令按鈕〔名稱為Command1〕。有一定時器控件(名稱為Timer1)，初始設置Timer1.Enabled為False，Timer1.Interval=2000，定時器的Timer1_Timer事件主要功能是：程序中的變量a保存從Text1中選定的內(nèi)容，變量c保存從Combo1中選定的值，變量b保存List1及HS1的運算結果。這些變量按指定規(guī)那么運算，結果顯示在Text2中。以下圖是窗體啟動并單擊“開始〞按鈕后，滾動條的值到達30時的狀態(tài)。請在劃線位置填寫正確的內(nèi)容。PrivateSubForm_Load()List1.AddItem"10"List1.AddItem"20"List1.AddItem"30"List1.AddItem"40"List1.AddItem"50"Combo1.AddItem"+"Combo1.AddItem"-"Combo1.AddItem"*"Combo1.AddItem"/"Text1.Text="0123456789"EndSubPrivateSubCommand1_Click()Timer1.Enabled=TrueText1.SelStart=__________Text1.SelLength=2EndSubPrivateSubTimer1_Timer()DimaAsIntegerDimbAsIntegerDimsAsIntegerDimcAsStringStaticnAsIntegern=n+1HS1.Value=n*10a=Val(Text1.SelText)b=Val(List1.List((HS1.Value/10)-1))c=____________SelectCasecCase"+"s=a+bCase"-"s=a-bCase"*"s=a*bCase"/"s=a/bEndSelectText2.Text=sIfn=5Thenn=0EndSub3．(VisualFoxPro試題)有“KSSCORE.DBC〞數(shù)據(jù)庫，其中包含表“CJB.DBF〞，“CJB.DBF〞表的結構為準考證號〔C,9〕、姓名〔C,8〕、學校名稱〔C,20〕、班級名稱〔C,10〕、科目1〔C,4,1〕、科目2〔C,4,1〕……科目9〔C,4,1〕〔共9個科目〕。應用程序運行時界面如以下圖所示：設置控件屬性如下：有三個標簽，其Name屬性分別為Label1、Label2和Label3，Caption屬性分別為“學校選擇〞、“班級選擇〞、“結果：〞；有一個文本框，其Name屬性為Text1；兩個組合框，其Name屬性分別為Combo1和Combo2，其中分別列出了供選擇的學校和班級〔屬性中已設置，代碼中直接使用〕；一個命令按鈕，其Name屬性為Command1，Caption屬性為“確定〞。編寫VisualFoxPro程序，實現(xiàn)功能如下：在Combo1中選擇一個學校，在Combo2中選擇一個班級，單擊Command1(“確定〞按鈕)，那么在Text1中顯示該學校該班級9個科目優(yōu)秀率的相關數(shù)據(jù)〔每個科目優(yōu)秀的標準是相應科目>=90，優(yōu)秀率=相應科目優(yōu)秀的人數(shù)/該學校該班人數(shù)*100%〕。Command1〔“確定〞按鈕〕的Click事件代碼如下，請在劃線位置填寫正確的內(nèi)容?！泊a中行末的分號為邏輯行連接符〕OPENDATABASEKSSCORESELECT學校名稱,班級名稱,COUNT(準考證號)AS班級人數(shù)FROMCJBGROUPBY;學校名稱,班級名稱INTOTABLEYXLTJTMPSELECT*FROMCJB.DBFINTODBFBJYXLTJBZAPALTERTABLEBJYXLTJBDROPCOLUMN準考證號ALTERTABLEBJYXLTJBDROPCOLUMN姓名ALTERTABLEBJYXLTJBADD班級人數(shù)N(4,0)FORK=1TO9FKMRS="科目"+RTRIM(LTRIM(STR(K)))ALTERTABLEBJYXLTJBALTER&FKMRSN(4,0)E