




版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請進行舉報或認領(lǐng)
文檔簡介
1、計算機專業(yè)理論試題(A)注意事項:1本試卷共八道大題。總分240分。2第I卷“一、選擇題”、第II卷“二、判斷題”的答案涂在機讀卡上,其余各題答案寫在答題紙上,答在試卷上不得分。用藍黑鋼筆、碳素筆或圓珠筆答題。3答題前將密封線內(nèi)項目填寫清楚。第卷(選擇題 共100分)一、選擇題(本大題共50小題,每小題2分,共100分。在每小題所給出的四個選項中,只有一個符合題目要求,將正確選項填涂在機讀卡上)1下列關(guān)于計算機語言的敘述中,正確的是( )A計算機能直接識別并執(zhí)行用高級語言編寫的程序B用機器語言編寫的程序可讀性差C機器語言就是匯編語言D高級語言的編譯系統(tǒng)是應(yīng)用程序2下列計算機的外部設(shè)備中,屬于輸
2、出設(shè)備的是( )A鼠標(biāo) B鍵盤 C繪圖儀 D掃描儀3微處理器的字長是由( )決定的( )A地址總線的位數(shù) B數(shù)據(jù)總線的位數(shù)C控制總線的位數(shù)D時鐘頻率4計算機軟件包括( )A程序 B數(shù)據(jù)C有關(guān)文檔資料D以上都是510個16*16點陣的漢字字模,需要占用的存儲空間是( )A256B B256KB C320B D320KB6控制器的主要功能是( )A指揮計算機的各部件自動、協(xié)調(diào)的工作 B對數(shù)據(jù)進行算術(shù)運算C進行邏輯判斷 D控制數(shù)據(jù)的輸入和輸出7計算機啟動時運行的病毒稱為( )病毒( )A定時發(fā)作型 B良性 C惡性 D引導(dǎo)型8二進制數(shù)1100100101轉(zhuǎn)換成十六進制數(shù)是( )AC94H B325H
3、C1445H D6224H9“Windows 2000是一個具備多任務(wù)處理能力的操作系統(tǒng)”指的是它可以( )A同時存儲多個程序B供多個用戶同時使用C同時運行多個程序D同時只能運行一個程序,但這個程序能處理不同的任務(wù)10Windows 2000的資源管理器可以用來管理計算機中的文件,下列啟動資源管理器的方法錯誤的是( )A“開始”菜單-“程序”-“附件”-“Windows資源管理器”B鼠標(biāo)右鍵單擊桌面上的“我的電腦”,選擇“資源管理器”命令C按著鍵盤的“Shift”鍵,雙擊“我的電腦”D“開始”菜單的“運行”選項,在對話框中輸入“資源管理器”,然后“確定”11在Windows 2000中,可以使
4、用“回收站”進行恢復(fù)的文件是( )A直接使用 “DELETE”按鍵刪除的硬盤上的文件B直接使用 “DELETE”按鍵刪除的網(wǎng)絡(luò)驅(qū)動器上的文件C使用鼠標(biāo)左鍵選定U盤上的文件后拖動到“回收站”D使用鼠標(biāo)右鍵選定U盤上的文件后選擇“剪切”命令,然后“粘貼”到回收站12在Word 2000編輯狀態(tài)下,當(dāng)工具欄中的“剪切”和“復(fù)制”按鈕呈灰色時,表明( )A選定的對象是非文本 B選定的文本內(nèi)容太長C剪貼板上已經(jīng)存放了信息 D沒有選定任何對象13下列關(guān)于“Word 2000文檔窗口”的敘述,不正確的是( )A可以同時打開多個文檔B文檔窗口最多可以拆分為兩部分C同一個文檔不能在多個窗口中打開D可以同時關(guān)閉全
5、部窗口14在Word 2000編輯狀態(tài)下,對打開的文檔MyDoc.DOC進行編輯后,選擇“文件”下拉菜單中的“另存為”菜單項,進行換名保存為MyDocNew.DOC后,則( )A文件MyDoc.DOC中的內(nèi)容被MyDocNew.DOC內(nèi)容所覆蓋B文件MyDoc.DOC改名為MyDocNew.DOC C文件MyDoc.DOC被刪除,編輯后的內(nèi)容保存在MyDocNew.DOC中D文件MyDoc.DOC中的內(nèi)容不變,編輯后的內(nèi)容保存在MyDocNew.DOC中15打開Excel 2000工作簿一般是指( )A把工作簿內(nèi)容從內(nèi)存中讀出,并顯示出來B為指定工作簿開設(shè)一個新的空白文檔窗口C把工作簿的內(nèi)容從
6、外存讀入內(nèi)存,并顯示出來D顯示并打印工作簿的內(nèi)容16Excel 2000下的學(xué)生成績統(tǒng)計單,單元格B2:B31中內(nèi)容為全班30名同學(xué)的計算機成績,若要在單元格C2:C31中對成績90分以上(包括90分)的同學(xué)顯示“優(yōu)秀”,其他的顯示為空。在C2單元格中輸入函數(shù),然后對C列向下填充,則C2單元格中函數(shù)的正確寫法為( )A=IF(B2=90,優(yōu)秀, ) B=COUNTIF(B2=90,優(yōu)秀, )C=IF(B2=90,優(yōu)秀) D=COUNTIF(B2=90, 優(yōu)秀)17在Excel 2000中,對職工工資表進行高級篩選,如果條件區(qū)域設(shè)置如下所示,則對篩選結(jié)果的描述正確的是( )性別基本工資崗位工資女
7、900900A性別為女,并且基本工資、崗位工資均大于900的記錄B性別為女并且基本工資大于900的記錄,或者崗位工資大于900的記錄C性別為女并且崗位工資大于900的記錄,或者基本工資大于900的記錄D性別為女,或基本工資大于900,或崗位工資大于900的記錄18在Visual Basic中,LCASE(12ABcd34)的值是( )AabcdB1234 C12ABCD34 D12abcd34 19Visual Basic窗體模塊文件的擴展名是( )A.FRM B.WIN C.VBG D.BAS20. 下面選項中,哪個不是Visual Basic中的對象( )A窗體 B命令按鈕 C屬性 D定時
8、器21. 關(guān)于Visual Basic中對象的方法,說法不正確的是( )A方法是對象的動作B文本框有方法C窗體有方法D方法后必須跟有被操作的對象22. 關(guān)于Visual Basic中復(fù)選框的Value屬性的說法,不正確的是( )A可以有三個值0、1、2B其值不能通過賦值語句改變C其值是整數(shù)類型D當(dāng)值為1時表示被選中23在Visual Basic中,關(guān)于窗體中命令按鈕的說法,正確的是( )A通過指令可以改變位置,但大小不能改變B通過指令不能改變位置,但大小可以改變C位置、大小均不能改變D通過指令可以改變位置和大小24在Visual Basic中,產(chǎn)生5到35之間(含5和35)的隨機整數(shù),哪個公式
9、正確( )AInt(30*Rnd)+5 B5+Int(31*Rnd)CInt(5+31)*Rnd D40-5*Int(Rnd)25下面不是Visual Basic合法數(shù)據(jù)的是( )A2E2.1 B2% CA+A DTrue26Visual Basic中表示一個文本框(名稱為Text1)選定內(nèi)容的是哪個選項( )AText1.SelLength BText1.TextCText1.SelText DText1.SelStart27執(zhí)行Visual Basic語句PRINT 12+45的顯示結(jié)果是( )A1245 B57 C5421 D語句有語法錯誤28在Visual FoxPro6.0中,下列有
10、關(guān)數(shù)據(jù)庫的描述,正確的是( )A數(shù)據(jù)庫不能多用戶共享B在關(guān)系型數(shù)據(jù)庫系統(tǒng)中,關(guān)系型數(shù)據(jù)庫是通過一個二維表來表示數(shù)據(jù)之間的聯(lián)系的C數(shù)據(jù)庫中的最小訪問單位是記錄D數(shù)據(jù)庫中的數(shù)據(jù)不能是圖像29在Visual FoxPro6.0中,下列表達式結(jié)果為數(shù)值型的是( )A20+3=23 BAT(對口,河北對口升學(xué))CCTOD(09/10/99)-20 D123-2330在Visual FoxPro6.0中,下列表達式中不正確的是 ( )ADATE()+100 BDATE()-CTOD(04-24-2010)CDATE()-100 DDATE()+CTOD(04-24-2010)31在Visual FoxPr
11、o6.0中,關(guān)于索引的敘述正確的是 ( )A一個表中只能有一個主索引,主索引不僅適用于數(shù)據(jù)庫表,也適用于自由表B一個表中只能有一個主索引,建立主索引的關(guān)鍵字段值不允許重復(fù)C每個表可以建立多個候選索引,建立候選索引的關(guān)鍵字段值不允許重復(fù),但候選索引只適用于數(shù)據(jù)庫表D建立一個索引文件時,表中記錄的物理存儲順序也會發(fā)生變化32在Visual FoxPro6.0中,關(guān)于視圖的敘述正確的是 ( )A視圖文件是一個獨立的數(shù)據(jù)文件,不屬于任何的數(shù)據(jù)庫B視圖可以對源表中的數(shù)據(jù)進行更新C如果希望每次運行視圖時,根據(jù)輸入值的不同而檢索到不同的結(jié)果,可以建立遠程視圖 D視圖只能從一個表派生出來33在Visual F
12、oxPro6.0中,使用查詢設(shè)計器創(chuàng)建查詢時,查詢?nèi)ハ蛑胁话ǖ氖?( )A標(biāo)簽 B屏幕 C視圖 D臨時表34在Visual FoxPro6.0中,使用表單設(shè)計器創(chuàng)建表單時,如果將備注型字段拖到表單上,則會生成哪種類型的控件 ( )A. 文本框 B. 編輯框C. 復(fù)選框 D. 列表框35在Visual FoxPro6.0中,項目文件的擴展名是 ( )A.PRG B .PJX C.SCX D.QPR36計算機網(wǎng)絡(luò)中的計算機之間的關(guān)系是( )A主從關(guān)系B制約關(guān)系 C功能獨立D沒有聯(lián)系37“計算機網(wǎng)絡(luò)的主要目的是資源共享”,這里的“資源”指的主要是( )A軟件資源B硬件資源C數(shù)據(jù)資源D以上都是38關(guān)
13、于計算機網(wǎng)絡(luò)拓撲結(jié)構(gòu)的描述錯誤的是( )A總線型結(jié)構(gòu)網(wǎng)絡(luò)中,連接在總線上的主機可以同時發(fā)送數(shù)據(jù),互不影響B(tài)環(huán)型結(jié)構(gòu)網(wǎng)絡(luò)中,各個節(jié)點通過通信線路連接成一個閉合的環(huán)路C星型結(jié)構(gòu)網(wǎng)絡(luò)使用集中控制機制,中心節(jié)點就是控制中心D廣域網(wǎng)中一般使用網(wǎng)型拓撲結(jié)構(gòu)39計算機網(wǎng)絡(luò)的體系結(jié)構(gòu)是( )的集合( )A語法、語義和定時B協(xié)議和分層C服務(wù)器和客戶機D網(wǎng)絡(luò)操作系統(tǒng)和應(yīng)用軟件40提出開放系統(tǒng)互聯(lián)基本參考模型的組織是( )AOSIBISOCIEEEDTCP/IP41下面網(wǎng)絡(luò)服務(wù)與其所使用的應(yīng)用層協(xié)議的對應(yīng)關(guān)系錯誤的是( )AWWW服務(wù)-HTTP協(xié)議B郵件傳輸服務(wù)-SNMP協(xié)議C文件傳輸服務(wù)-FTP協(xié)議 D域名解析服
14、務(wù)-DNS協(xié)議42100Mbps以太網(wǎng)的傳輸速率比10Mbps以太網(wǎng)快,它們使用的協(xié)議或硬件可能不同,但一定會使用相同的( )A物理層協(xié)議 B數(shù)據(jù)幀格式 C以太網(wǎng)卡 D交換機43隨著通信技術(shù)的不斷發(fā)展,10 Gbps以太網(wǎng)已經(jīng)投入應(yīng)用,這種以太網(wǎng)使用的傳輸介質(zhì)通常是( )A屏蔽雙絞線B非屏蔽雙絞線 C同軸電纜 D光纖44下列選項中,能用作主機IP地址的是( )AB55C221.194.257.1D45互聯(lián)網(wǎng)上一臺提供WWW服務(wù)的主機,所在的域為,主機名為sxxy,端口號為80,用戶需要訪問服務(wù)器上的網(wǎng)站根目錄下的文件page.ht
15、ml,則使用的URL為( )ABCD46我國國民經(jīng)濟信息化建設(shè)的“金”字頭工程中,( )是其它“金”字頭工程的基礎(chǔ)( )A金卡工程B金關(guān)工程C金稅工程D金橋工程47當(dāng)個人計算機以撥號方式接入Internet時,下列哪項不是必需的( )A調(diào)制解調(diào)器 B路由器CTCP/IP協(xié)議DISP提供的上網(wǎng)賬號48下面列出的電子郵箱地址中,格式不合法的是( )Aa_b_cBCabcD49第三代移動通信技術(shù)俗稱“3G”,對于其描述錯誤的是( )A在我國能提供3G業(yè)務(wù)的服務(wù)提供商主要有中國電信、中國聯(lián)通和中國移動等B3G業(yè)務(wù)能夠同時傳送聲音及數(shù)據(jù)信息C3G業(yè)務(wù)的網(wǎng)絡(luò)接入功能只能在手機終端上使用,不能用于個人計算機
16、D3G業(yè)務(wù)的數(shù)據(jù)傳輸速率一般在幾百Kbps甚至更高50如果局域網(wǎng)的傳輸速率為100Mbps,那么傳輸25MByte的數(shù)據(jù),理論上需要的時間是( )左右( )A0.25秒B0.5秒C2秒D4秒 第卷(非選擇題 共140分)二、判斷題(本大題14小題,每小題1分,共14分。將答案涂在機讀卡上,正確的填涂“”格,錯誤的填涂“”格)1光盤分類中,WORM類型的光盤是指一次寫入型光盤。2將磁盤上的信息傳送到內(nèi)存儲器中的操作,稱為寫盤。3Windows 2000系統(tǒng)中的各級文件夾和文件都不允許同名。4Windows 2000的剪貼板中的內(nèi)容可以多次使用,但如果關(guān)機,剪貼板中的內(nèi)容會丟失。5在Word 20
17、00頁面視圖中, 左右邊距分別是指文本區(qū)域到顯示屏左右兩邊的距離。6在Word 2000中,對象可以鏈接到文檔中,被鏈接的對象必須是文本文件。7某個Excel 2000工作表C列所有單元格的數(shù)據(jù)是利用B列相應(yīng)單元格數(shù)據(jù)通過公式計算得到的,如果將該工作表B列的數(shù)據(jù)刪除,那么對C列不會產(chǎn)生影響。8在Excel 2000中,圖表生成之后,可以對圖表類型進行修改。9在Visual Basic中,一個窗體中的多個選項按鈕,不管通過什么方法設(shè)計,運行時每次只能選一個。10在Visual FoxPro6.0中,如果數(shù)據(jù)庫表文件有3個備注字段,則該數(shù)據(jù)庫表有3個.FPT文件。 11在計算機網(wǎng)絡(luò)中,交換機、路由
18、器、集線器等設(shè)備都屬于通信子網(wǎng)的設(shè)備。12進行網(wǎng)絡(luò)通信的雙方主機必須使用相同的應(yīng)用層協(xié)議,所以必須使用相同的應(yīng)用軟件。13TCP/IP是Internet上使用的協(xié)議,局域網(wǎng)中也可以使用。14調(diào)制解調(diào)器的主要功能,是實現(xiàn)通信線路中傳輸?shù)哪M信號和計算機使用的數(shù)字信號之間的轉(zhuǎn)換。三、填空題(本大題共13小題,每小題2分,共26分。請將答案填寫在答題紙上)1磁盤存儲信息的最小的編址單元是 。2數(shù)以某種表示方式存儲在計算機內(nèi)存中,稱為“機器數(shù)”,機器數(shù)的二進制位數(shù)稱為 。3微型計算機的硬件可分為 和外部設(shè)備兩大部分。4在“畫圖”工具中,選定了一個區(qū)域,用鼠標(biāo)左鍵拖動該區(qū)域的內(nèi)容時,如果希望保留該區(qū)域原
19、位置的內(nèi)容,則需要先按下 鍵后進行拖動操作。5在Word 2000中,快速將光標(biāo)移到文檔起始位置的快捷鍵是 。6在Excel 2000中,如果在單元格中輸入公式“=Hello&World”,則顯示結(jié)果為 。7在Visual Basic中,從順序文件中文件指針的當(dāng)前位置讀取指定長度的字符串的函數(shù)名是 。8代數(shù)式在Visual Basic中的算術(shù)表達式是 。9在Visual FoxPro6.0中,通過設(shè)置字段的 ,在輸入記錄時,可以判斷輸入的數(shù)據(jù)是否符合要求。10在Visual FoxPro6.0中,以獨占方式打開數(shù)據(jù)庫student.dbc的命令是: 。11OSI/RM協(xié)議模型中,數(shù)據(jù)鏈路層向
20、層提供服務(wù)。(請?zhí)顚懢唧w的層次名稱)12如果需要組建一個實驗室的局域網(wǎng),當(dāng)前有2臺24個RJ-45端口的交換機,實驗室與Internet的接口是一條超5類雙絞線,現(xiàn)要求所有的計算機都接入Internet,則在當(dāng)前的設(shè)備條件下該實驗室最多可同時接入的計算機數(shù)量為 臺。13域名可按機構(gòu)性質(zhì)命名,“gov”通常表示 。 四、根據(jù)已知的環(huán)境與題意,寫出相應(yīng)的Visual FoxPro操作命令或SQL語句,每小題按要求用一條命令或語句完成(本大題共5小題,每小題4分,共20分)已知數(shù)據(jù)庫文件STU_INFO.dbc,包括兩個數(shù)據(jù)庫表:“學(xué)生”表和“班級”表,表結(jié)構(gòu)如下:“班級”表:班級號(C,6),班級
21、名稱(C,10),班級人數(shù)(N,2,0),輔導(dǎo)員(C,8)“學(xué)生”表:班級號(C,6),學(xué)號(C,4),姓名(C,8),性別(C,2),出生日期(D),籍貫(C,20),入學(xué)成績(N,5,1),該數(shù)據(jù)庫已經(jīng)打開,并且在當(dāng)前工作區(qū)中打開了“學(xué)生”表,完成以下操作:1將“學(xué)生”表中所有“班級號”是“201001”的學(xué)生的“入學(xué)成績”加10分。(用Visual FoxPro命令)2使用“學(xué)生”表,建立以“出生日期”為關(guān)鍵字,索引名為“生日”的升序的候選索引,復(fù)合索引文件名為DA.cdx。(用Visual FoxPro命令)3查詢“學(xué)生”表中“籍貫”是“上海”的學(xué)生的班級號、學(xué)號、姓名和籍貫字段,按“
22、班級號”升序輸出。(用SQL語句)4在“班級”表中增加“入學(xué)日期”字段,字段類型為日期型。(用SQL語句)5邏輯刪除“學(xué)生”表中所有出生日期在1990年前(不包括1990)的記錄。(用SQL語句)五、程序分析(本大題共2小題,每小題5分,共10分,讀程序并分析結(jié)果)1閱讀下面的Visual Basic程序,分析程序中k=k+a的執(zhí)行次數(shù)是 Dim a As IntegerDim i As IntegerDim j As IntegerDim k As Integera = 0k = 0For i = 1 To 10 For j = 1 To i a = a + i + j k = k + a
23、k=k-1 Next jNext i2已知有數(shù)據(jù)庫文件職工工資.dbc,數(shù)據(jù)庫中包含表“工資.dbf”,工資.dbf的表結(jié)構(gòu)為:職工號(C,4),姓名(C,8),性別(C,2),職稱(C,8),基本工資(N,8,1)。有Visual FoxPro程序5_2.prg如下:CLEAROPEN DATABASE 職工工資USE 工資STORE 0 TO m,nGOTO TOPm=基本工資n=基本工資SCAN FOR 職稱=副教授 IF m=基本工資 n=基本工資 ENDIF ENDIFENDSCAN?m?n該程序的功能是: 六、寫出下列程序的運行結(jié)果(本大題共5小題,每小題5分,共25分)1分析下面
24、Visual Basic程序段 Dim i As IntegerDim j As IntegerDim s As IntegerDim a(2 To 4, 3 To 7) As Integers = 0For i = 1 To 2 For j = 1 To 2 If (i + j) Mod 2 = 0 Then s = s + LBound(a, j) Else s = s + UBound(a, j)End IfNext jNext iPrint s上面程序運行后,s的值是 。2分析下面Visual Basic程序段。如圖所示,圖中有兩個列表框,左邊的是List1,右邊的是List2,一個命
25、令按鈕Command1,窗體和命令按鈕的單擊事件中均有代碼,程序段如下:Private Sub Form_Click()List1.AddItem aaaaaList1.AddItem bbbbbList1.AddItem cccccEnd SubPrivate Sub Command1_Click()Dim k As Integerk = List1.ListCount - 1List2.AddItem List1.List(List1.ListIndex)List1.RemoveItem List1.ListIndexList1.RemoveItem k - 1End Sub窗體啟動后先單
26、擊窗體,然后選中如圖所示的列表框中的項目,再單擊命令按鈕,左邊列表框中顯示內(nèi)容是 。3有如下Visual FoxPro程序:SET TALK OFFSTORE 0 TO I,JX=3Y=0DO P1 WITH X,Y?X,YSET TALK ONRETURNPROCEDURE P1PARAMETERS X,YI=1DO WHILE I=3X=X+II=I+1ENDDOY=X+YDO P2 WITH XRETURNPROCEDURE P2PARAMETERS XX=1RETURN運行上面的程序,顯示的結(jié)果為: 4. 在Visual FoxPro的表單上添加一個標(biāo)簽,其Name屬性為:Label1
27、,添加一個命令按鈕,其Name屬性為:Command1,Caption屬性為:顯示。Command1的Click事件代碼如下:ThisForm.Label1.Caption=*For k=1 TO 2ThisForm.Label1.Caption= ThisForm.Label1.Caption+Str(k,3)EndForFor n=1 TO 3 FOR i=n TO 1 STEP -1ThisForm.Label1.Caption= ThisForm.Label1.Caption+Str(i*n,3)EndForEndFor運行上面的表單,單擊命令按鈕,則標(biāo)簽上顯示的結(jié)果為(要求按格式寫輸
28、出結(jié)果,空格用表示): 5有學(xué)生信息.dbf自由表,字段為:學(xué)號(C,8),姓名(C,8),性別(C,2),年齡(N,3,0),籍貫(C,20),入學(xué)成績(N,5,1),表中數(shù)據(jù)如下:Record# 學(xué)號 姓名 性別 年齡 籍貫 入學(xué)成績1 20100101 肖天海 男 19 河北保定 5602 20100102 王巖鹽 男 20 北京 6233 20100103 劉星魂 男 18 上海 5594 20100104 張月新 女 19 南京 6105 20100201 李明玉 男 20 江蘇常州 6236 20100202 季欣欣 女 19 遼寧沈陽 580 7 20100203 王吉吉 女 2
29、2 吉林長春 612 有如下Visual FoxPro程序SET TALK OFF STORE 0 TO M,NUSE 學(xué)生信息INDEX ON 年齡 TAGnl OF ABSEXSEEK 19DO WHILE 性別=男 AND .NOT.EOF()N=N+1M=M+年齡 SKIPENDDO?M/NSET TALK ON運行上面的程序,顯示的結(jié)果為: 七、程序改錯(本大題共2小題,每題5分,共10分。每個程序有兩處錯誤,請在答題紙上寫出錯誤行代碼和改正后的代碼。改錯不扣分)1下面的程序是將一個十進制整數(shù)轉(zhuǎn)換成二進制數(shù),轉(zhuǎn)換后按位放到一維數(shù)組a中,然后輸出。如輸入一個數(shù)據(jù)8,將輸出1 0 0 0
30、。程序中有兩處錯誤,請改正。Dim a(10) As IntegerDim k As IntegerDim yu As IntegerDim i As Integeri = 1k = InputBox(input k)Do While k 0yu = k/2a(i) = yuk = k 2i = i + 1LoopFor yu = i To 1 Step -1Print a(yu);Next yu_2窗體中有一定時器控件Timer1,有一命令按鈕command1,一文本框Text1。命令按鈕的作用是啟動定時器工作,每2秒鐘觸發(fā)一次定時器的Timer事件;定時器的Timer事件是使文本框的字號從
31、6開始增加,當(dāng)字號大于40后又重新從6開始。運行效果圖如下。程序中有兩處錯誤(每個事件中各有一處),請改正。 Private Sub Command1_Click()Timer1.Interval = 1000Timer1.Enabled = TrueEnd SubPrivate Sub Timer1_Timer()Dim a As Integera = a + 1Text1.FontSize = 6 * aIf Text1.FontSize 40 Then a = 0End Sub_八、程序填空(本大題共7個空,每空分,共35分。按程序要求在答題紙上填入相應(yīng)的內(nèi)容,使程序完整正確)1有10個
32、元素的一維數(shù)組a,已經(jīng)按由小到大的順序排列好,現(xiàn)輸入一個數(shù)據(jù),然后在數(shù)組中查找此數(shù),若找到則求小于等于它的元素之和。請?zhí)羁铡?Visual Basic題)Option Base 1Dim aDim k As IntegerDim s As IntegerDim i As IntegerDim b As Integer 要比較的數(shù)據(jù)a = Array(-2, 4, 7, 8, 12, 25, 26, 31, 89, 95)b = InputBox(請輸入數(shù)據(jù), , )s = 0For i = 1 To 10If b = a(i) Then Next iIf i = 10 ThenFor k =
33、1 To s = s+a(k)Next kEnd IfPrint s2窗體中有三個標(biāo)簽,三個文本框從上到下依次是Text1、Text2、 Text3,一個命令按鈕Command1。三個標(biāo)簽用來標(biāo)示右邊文本框的用途,Text1用來輸入數(shù)據(jù),數(shù)據(jù)之間用空格分開,Text2用來存放奇數(shù)和,Text3用來存放偶數(shù)和。在Text1中輸入一組數(shù)據(jù)后,單擊求和命令按鈕,Text2將顯示Text1中的奇數(shù)和,Text3中將顯示Text1中的偶數(shù)和。代碼如下。請?zhí)羁铡?Visual Basic題) Private Sub Command1_Click()Dim s As String 存放Text1中的字符串D
34、im c As StringDim c1 As String 每次取的一個字符Dim k As IntegerDim w As Integer Text1中字符串的長度Dim i As IntegerDim t1 As Integer 奇數(shù)和Dim t2 As Integer 偶數(shù)和i = 0t1 = 0t2 = 0s = Trim(Text1.Text)w = Len(s)c = c1 = Mid(s, 1, 1)i = i + 1Do While i = wDo While c1 Chr(32) And Chr(32)表示空格c = i = i + 1c1 = Mid(s, i, 1)Lo
35、opk = Val(c)If k Mod 2 0 Then t1 = t1 + k Else t2 = t2 + ki = i + 1c1 = Mid(s, i, 1)c = LoopText2.Text = t1Text3.Text = t2End Sub3設(shè)有數(shù)據(jù)庫文件“學(xué)生管理.dbc”,該庫中有“學(xué)生”表和“成績”表,表結(jié)構(gòu)如下:“學(xué)生”表:學(xué)號(C,8),姓名(C,8),性別(C,2),平均分(N,5,1)“成績”表:學(xué)號(C,8),課程名(C,20),成績(N,5,1)設(shè)計應(yīng)用程序界面如下:設(shè)置控件屬性如下:文本框的Name屬性為:Text1(Text1用于輸出平均分最高的課程的課
36、程名和平均分。)命令按鈕的Name屬性為:Command1,Caption屬性為:計算編寫Visual FoxPro程序?qū)崿F(xiàn)下述功能:(1)根據(jù)“成績”表計算每個學(xué)生的“平均分”,并將結(jié)果存入“學(xué)生”表的“平均分”字段。(2)根據(jù)上面的統(tǒng)計結(jié)果,生成一個新的自由表SC_AVG,該表的字段按順序取自“學(xué)生”表的“學(xué)號”、“姓名”、“平均分”,并按“平均分”升序排列。(3)根據(jù)“成績”表計算每門課程的平均分,并在文本框中顯示平均分最高課程的“課程名”和“平均分”(假設(shè)平均分最高的只有一門課程)。程序如下,請將程序填寫完整。(代碼中行末的分號為邏輯行連接符)Command1的Click事件SET T
37、ALK OFFSET SAFETY OFFDIMENSION PJ(1,1)OPEN DATABASE 學(xué)生管理USE 學(xué)生DO WHILE NOT EOF()SELECT AVG(成績) FROM 成績 WHERE 學(xué)號=學(xué)生.學(xué)號 PJREPLACE 平均分 WITH PJ(1,1) ENDDOSELECT 學(xué)號,姓名,平均分 FROM 學(xué)生 ORDER BY 平均分 INTO TABLE SC_AVGSELECT 課程名 AS 課程名,AVG(成績) AS 平均分 FROM 成績 GROUP BY 課程名; INTO TABLE MYNEWSELECT MAX(平均分) AS MAX_平均分 FROM MYNEW INTO TABLE MAX_AVGAUSE MAX_AVGAMAX_A=MAX_平均分SELECT 課程名 AS 課程名,平均分 AS 最高分 FROM MYNEW WHERE 平均分=MAX_A; INTO TA
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫網(wǎng)僅提供信息存儲空間,僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準確性、安全性和完整性, 同時也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。
最新文檔
- 合同范本制作方法
- 普通住宅房屋租賃合同范本
- 不可抗性 合同范本
- 廣告置換合作合同范本
- 廚房勞動合同范本
- 合同范本里買
- 委托驗收項目合同范本
- 加工磚合同范本
- 倉庫保底合同范本
- 廠家紅薯采購合同范本
- 酒店會議接待服務(wù)方案
- 2025年人教版新教材英語小學(xué)三年級下冊教學(xué)計劃(含進度表)
- 2025年山東商務(wù)職業(yè)學(xué)院高職單招高職單招英語2016-2024年參考題庫含答案解析
- 人工智能在企業(yè)人力資源招聘中的運用研究
- 2023年2024年演出經(jīng)紀人之演出經(jīng)紀實務(wù)考試題庫附答案(達標(biāo)題)
- DG-T 076-2024 采茶機標(biāo)準規(guī)范
- 《分娩機轉(zhuǎn)》課件
- 軍隊文職備考(面試)近年考試真題(參考300題)
- 金融業(yè)稅收優(yōu)惠政策指引
- 乳腺癌課件教學(xué)課件
- 第五期健康講座乳腺癌與宮頸癌防治知識
評論
0/150
提交評論