版權說明:本文檔由用戶提供并上傳,收益歸屬內容提供方,若內容存在侵權,請進行舉報或認領
文檔簡介
1、2012年河北省普通高等學校對口招生考試計算機專業(yè)理論試題(a)注意事項:1本試卷共八道大題??偡?40分。2第i卷“一、選擇題”、第ii卷“二、判斷題”的答案填涂在機讀卡上,其余各題答案寫在答題紙上,答在試卷上不得分。用藍黑鋼筆、碳素筆或圓珠筆答題。3答題前將密封線內項目填寫清楚。第卷(選擇題 共100分)一、選擇題(本大題共50小題,每小題2分,共100分。在每小題所給出的四個選項中,只有一個符合題目要求,將正確選項填涂在機讀卡上)1下列計算機外部設備中,既屬于輸入設備又屬于輸出設備的是()a鼠標 c鍵盤 b硬盤 d掃描儀2以晶體管為主要元器件的計算機屬于第幾代計算機()a四 b三 c二
2、d一3關于計算機軟件描述錯誤的是()awindows 7是操作系統(tǒng),屬于系統(tǒng)軟件b. fortran語言是高級語言,屬于系統(tǒng)軟件ccai是計算機輔助教學軟件,屬于系統(tǒng)軟件d. wps是文字處理軟件,屬于應用軟件4二進制數1101111.11b轉換成十六進制數是()ade.ch bde.3h c6f.3h d6f.ch5下列關于計算機病毒敘述錯誤的是 ()a計算機病毒具有潛伏性 b計算機病毒是人為編制的計算機程序c計算機病毒對設置密碼較復雜的文件感染的幾率很低d殺毒軟件要不斷的升級病毒庫并時常查殺才能有效的保證計算機安全6計算機應用領域最廣泛的是()a科學計算 b輔助技術 c數據處理 d人工智能
3、7下列點陣的字模,需要占用存儲空間最小的是( )a10個16*16點陣的漢字字模b5個24*24點陣的漢字字模c. 10個32*32點陣的漢字字模d5個48*48點陣的漢字字模8計算機一次處理二進制位最長的是( )a8位微機 b16位微機c32位微機 d64位微機9在windows xp中,當按下“shift”鍵的同時,用鼠標左鍵在不同驅動器之間拖動對象,系統(tǒng)進行的操作是( )a復制 b移動c創(chuàng)建快捷方式 d無操作10在windows xp中查找文件時,可以使用通配符來匹配文件名中不能確定的字符。如果需要查找的文件主名長度為4個字符,且主名第一個字符為“f”的word2000格式的文件,下列輸
4、入的查找文件名得到的結果最精確的是( )af*.doc bf*.doccf?.doc df?.doc11對windows xp進行系統(tǒng)設置的功能組件都放置在( )a控制面板 b工具菜單 c系統(tǒng)屬性 d“開始”菜單12在word2000編輯狀態(tài)下,將字體效果設置成空心,使用的主菜單是( )a編輯 b插入 c格式 d表格13.在word2000中,不能實現的功能是( )a段落設置 b字體設置 c函數使用 d高級篩選14.在word2000中,使用表格菜單將表格轉換成文字功能時,分隔符不能是( )a分欄符 b段落標記 c逗號 d制表符15在excel2000文檔中,對高考分數進行高級篩選,如果條件是
5、性別為男,高考分數大于500并且小于540,則下述表示正確的是( ) ab性別高考分數高考分數男>500男<540性別高考分數高考分數男<540男>500性別高考分數男<540男>500c d性別高考分數高考分數男<540>50016打開excel2000工作簿,在單元格中輸入內容 “河北對口招生2012”,要在其下面連續(xù)單元格內出現內容為“河北對口招生2012”,下述操作錯誤的是( )a選中內容單元格及要填充的區(qū)域,點擊編輯菜單,點擊填充,選中向下填充b選中內容單元格,按住ctrl鍵,然后拉動向下填充句柄進行填充c選中內容單元格,直接拉動向下填
6、充句柄進行填充 d選中內容單元格,右鍵復制,選中要填充的區(qū)域,粘貼17在excel2000中進行成績統(tǒng)計,計算單元格b2:b31中的平均成績,下述方法不正確的是( )a指定區(qū)域輸入等號,使用函數average(b2:b31)求平均分b指定區(qū)域輸入等號,使用函數sum(b2:b31)求平均分c指定區(qū)域輸入等號,使用函數sum(b2:b31)/30求平均分d指定區(qū)域輸入等號,使用sum(b2:b20,b21:b31)/30求平均分18在visual basic中,print "12" + 45語句執(zhí)行的結果是( )a1245 b.57 c. "12" + 4
7、5 d.類型錯19在visual basic中,關于文件保存的說法正確的是( )a只保存擴展名是.frm的文件b. 只保存擴展名是.vbp的文件c. 只保存擴展名是.bas的文件d. 擴展名是.frm,.vbp,.bas這三類文件都可以保存20在visual basic中,設置窗體form1的標題為“vb程序窗體”的指令是( )af=”vb程序窗體” bform1.top=”vb程序窗體” c. form1.caption=”vb程序窗體” d. form1.topic=”vb程序窗體”21讀下面visual basic程序,最后一行輸出結果是( )a = -262: b =
8、 5c = len(str(a) + str(b)print ca 4 b5 c6 d722設a = 2: b = 4: c = 7: d = 8,visual basic表達式not a < b or c = 9 and d <> 9的值是( )a1 b-1 ctrue dfalse23在visual basic中,向圖片框(picture1)裝入圖片(” c:a.jpg”)正確的語句是( )apicture1.picture =load(” c:a.jpg”)bpicture1.picture.load(” c:a.jpg”)cpicture1.picture =load
9、picture(” c:a.jpg”)dpicture1.picture =loadpicture.load(” c:a.jpg”)24在visual basic中,關于控件說法不正確的是( )a可以創(chuàng)建控件數組 b控件都有名稱c控件都有單擊事件 d用visible屬性可以改變某些控件的可見性25下面visual basic中數據中,表示1978年10月20日正確的格式是( )a10-20-1978 b10/20/1978 c#1978.10.20# d#10-20-1978#26visual basic中文本框的默認屬性是哪個選項( )acaption btext cseltext dsel
10、start27在visual basic中,下面關于雙擊窗體要觸發(fā)的事件說法正確的是( )a 只觸發(fā)click事件 b只觸發(fā)dblclick事件c 可以觸發(fā)click和dblclick事件 d可以觸發(fā)load和dblclick事件28在關系型數據庫管理系統(tǒng)中有3種基本的關系操作,不包括下面哪種( )a篩選 b比較 c投影 d連接29在visual foxpro中,運算結果是“test”的表達式為 ( )a. left("yourtest",asc("f")-asc("a")b. right("yourtest",a
11、t("test","yourtest")c. substr("your"+upper("test"),5,4)d. substr("yourtest",at("test","yourtest"),4)30在下列關于visual foxpro變量的敘述中,正確的是( )a使用一個簡單變量之前要先聲明b在visual foxpro中,變量分為字段變量和內存變量c如果內存變量名與當前數據表中的字段變量名相同,則內存變量優(yōu)先被使用d不能將不同類型的數據賦給同一個變
12、量31在visual foxpro表設計器的“字段”選項卡中,字段有效性的設置項里不包括( )a. 規(guī)則 b. 信息 c. 默認值 d.標題32以下是在visual foxpro中設置系統(tǒng)菜單有關的命令,其中錯誤的是( )aset sysmenu to automatic bset sysmenu to defaultcset sysmenu on dset sysmenu to33下列在visual foxpro中關于視圖的說法中,不正確的是( )a. 視圖保存在數據庫中b. 視圖可以是本地的、遠程的,但不可以帶參數c. 通過視圖可以對表進行查詢d. 使用對視圖進行查詢時必須事先打開該視圖所
13、在的數據庫34在visual foxpro的do whileenddo 循環(huán)結構中,loop 命令的作用是( )a退出循環(huán)過程,返回程序開始處b轉移到do while 語句行,開始下一次判斷和循環(huán)c終止循環(huán),將控制轉移到本循環(huán)結構enddo 后面的第一條語句繼續(xù)執(zhí)行d終止程序執(zhí)行35在visual foxpro中,如果一個函數里只有一條return語句但沒有指定表達式,那么該函數的返回值為( )a.t. b.f. c空值 d沒有返回值36計算機網絡技術的發(fā)展方向不包括( )a高速網絡 b無線通信 c智能網絡d即時通信37當前計算機網絡使用的交換技術主要是( )a電路交換b報文交換 c分組交換d
14、端口交換38如果某局域網中任何一個節(jié)點出現故障都不影響整個網絡的工作,該局域網的拓撲結構是( )a總線型結構b樹型結構 c環(huán)型結構 d星型結構39在osi模型中,第n層與第n+1層的關系是( )a第n+1層把從第n層接收到的數據進行封裝b各自獨立完成相應的功能,各層相互沒有影響c第n+1層的協議數量一定比n層要多d第n層為第n+1層提供服務40在osi參考模型中,用于協商通信雙方字符編碼和壓縮格式的層次是( )a應用層 b表示層c會話層d傳送層41tcp/ip中的傳輸層負責解決網絡端到端的通信服務,其中“端”指的是( )a應用進程 b計算機主機 c網絡交換設備 d網卡42關于dhcp服務的描述
15、錯誤的是( )adhcp服務可以為客戶機分配ip地址、子網掩碼等常用的網絡參數b客戶機一般每次都會獲得不同的ip地址c由于dhcp服務主要配置的是ip地址,所以其使用的dhcp協議屬于tcp/ip的網際層d使用dhcp轉發(fā)代理可以讓不同子網的客戶機共用一臺dhcp服務器43ieee802委員會制定的局域網技術標準中,將osi參考模型的數據鏈路層分為兩個子層,分別是.( )allc和mhs bip和mac c mac和llc dip和llc44關于網絡操作系統(tǒng)的描述錯誤的是( )a網絡操作系統(tǒng)的開放性體現在不同類型的網絡操作系統(tǒng)能互連通信b網絡操作系統(tǒng)是專門用于運行網絡服務的操作系統(tǒng),客戶機不能
16、使用c網絡操作系統(tǒng)的基本任務是用統(tǒng)一的方法管理各主機之間的通信和資源共享d常用的網絡操作系統(tǒng)有windows server 2003、linux、unix等45在下列傳輸介質中,受外部電磁干擾影響最小的是.( )a同軸電纜 b. 光纜 c. 微波 d. 屏蔽雙絞線46關于互聯網“微博”的描述錯誤的是( )a是一種internet上的信息資源共享服務b一般用于組織或個人發(fā)布公開短信息c瀏覽信息的用戶可以針對某條信息發(fā)表評論d用戶必須安裝微博專用的客戶端軟件才能使用47可用于internet主機的合法ip地址是( )a b c d10.
17、1.20.148在我國四大骨干網絡中,以向教育和科研機構提供信息服務為目的是( )achinanet bchinagbn ccstnetdcernet49以下關于adsl描述錯誤的是( )a在電話線路上可以同時進行語音和數據傳輸badsl的非對稱性通常是指上行速率和下行速率不同cadsl在線路上傳輸的是數字信號dadsl的傳輸速率通常比在pstn上使用傳統(tǒng)的modem要高50用戶a使用usera的郵箱向用戶b的郵箱userb發(fā)送郵件,下列描述錯誤的是( )a如果用戶a向用戶b發(fā)送郵件,該郵件將首先保存在的郵件服務器上b如果用戶a通過的web界面登錄郵箱發(fā)送郵件,用戶a和126com的服務器之間
18、使用http協議通信c的郵件服務器向的郵件服務器轉發(fā)郵件時使用的是smtp協議d如果用戶a和b同時使用outlook收發(fā)郵件,則郵件會直接投遞,不轉交給郵件服務器第卷(非選擇題 共140分)二、判斷題(本大題14小題,每小題1分,共14分。將答案填涂在機讀卡上,正確的填涂“”格,錯誤的填涂“×”格)1字節(jié)是計算機內中央處理器(cpu)進行數據處理的基本單位。( )2中央處理器(cpu)能夠直接和硬盤交換數據。( )3windows xp桌面上的圖標大小是系統(tǒng)指定的,不能改變。( )4windows xp桌面上的任務欄由“開始”按鈕、快速啟動欄、打開的程序按鈕和通知區(qū)域構成。( )5在
19、word2000編輯狀態(tài)下,如果能看到頁眉、頁腳的編輯區(qū),一定是“頁面視圖”。( )6在word2000表格中,如果點擊“表格”菜單命令隱藏虛框,表格中一部分線條被隱藏,這部分線條在打印輸出時不會被打印。( )7在excel2000文檔中,工作表指的是工作簿。( )8在excel2000中,圖表生成后還能夠對圖表選項、圖表類型、圖表位置進行修改。( )9在visual basic中,write #語句是把數據寫入順序文件中,print #語句是把順序文件中的內容打印出來。( )10在visual foxpro中,定義一個4行6列的數組arrsum,使用的命令是:dimension arrsum
20、(4,6)。( )11osi參考模型的物理層傳輸數據的單位是幀。( )12主機如果有合法的ip地址,只需要在本機設置主機名,其它主機都能通過dns服務將該主機名解析到相應的ip地址。( )13用戶在ie地址欄輸入“ )14網卡tcp/ip參數中子網掩碼的作用是,和ip地址進行“與”運算以獲取網絡地址。( )三、填空題(本大題共13小題,每小題2分,共26分。請將答案填寫在答題紙上)1世界上第一臺電子計算機(英文字母大寫) 誕生于1946年。2現有無符號二進制數1111111b,則它的左數第一位1比后6位1的總和多 。3通常情況下,計算機的內部存儲器比外部存儲器的存取速度要 。4在windows
21、 xp的“資源管理器”窗口中,如果要顯示出系統(tǒng)屬性或隱藏屬性的文件或文件夾,可以選擇 菜單中的“文件夾選項”進行設置。5在word2000中,要同時關閉或保存打開的多個文檔,需按住 鍵。6在excel2000格式的高考成績文檔中,如果按照高考成績總分進行計算,能夠計算出高考成績大于500分的單元格數目的函數是 。7在visual basic中,獲得命令按鈕的標題使用的屬性是 。8代數式在visual basic中的相應表達式是 。9在visual foxpro中,通過表單設計器創(chuàng)建表單時使用 設計器定義和修改數據源。10在visual foxpro中,設x="11",y=&
22、quot;1122",則表達式:not(x=y)and(x$y) or (xy)的值為 。11計算機網絡協議的三要素中,用來規(guī)定通信雙方交換數據和控制信息格式的是 。12在對數據的傳輸效率要求高,但對數據傳輸可靠性要求不高的場合,一般使用的tcp/ip傳輸層協議是 。13ipv6協議中使用的二進制地址長度為 位。四、根據已知的環(huán)境與題意,寫出相應的visual foxpro操作命令或sql語句,要求每小題用一條命令或語句完成(本大題共5小題,每小題4分,共20分,請?zhí)顚懺诖痤}紙上)現有數據庫zggl,其中包含表“職工.dbf” 和“工資.dbf”,其中表 “職工.dbf”有字段:系部
23、名稱(c,20)、姓名(c,8)、職工號(c,9)、性別(c,2)、職稱(c,8)、年齡(n,2),表“工資.dbf”有字段:職工號(c,9)、基本工資(n,7,2)、津貼(n,7,2)、扣款(n,7,2),在相應數據庫和表已打開的前提下,寫出完成下述功能的命令。1將所有系部名稱為“計算機系”的職工的年齡加1。(用visual foxpro命令)2 以系部名稱+年齡降序建立唯一索引的復合索引,索引名為xn,索引文件名為xb.cdx。(用visual foxpro命令)3查詢系部名稱為“數理系”的職工的姓名、基本工資、津貼,結果保存表slx.dbf中。(用sql語句)4計算每個系部職工的平均年齡
24、,并顯示在屏幕上。(用sql語句)5刪除“職工.dbf”表中所有年齡大于55(不包括55)的記錄(用sql語句)五、程序分析(本大題共2小題,每小題5分,共10分,讀程序并分析結果,請?zhí)顚懺诖痤}紙上)1閱讀下面的visual basic程序,分析程序中n = n + 1的執(zhí)行次數是dim m as integer, n as integerdim j as integer, k as integerm = 3for j = 1 to m step 1 for k = -j to 3 step 2 n = n + 1 next k m=4next jprint n2有數據庫kshgl.dbc,包
25、含四個表: kshb.dbf、sscoreb.dbf、tabletj.dbf和lq.dbf,其中kshb.dbf的結構為:考生號(c,10)、姓名(c,6)、性別(c,2)、單位(c,20)、出生日期(d),sscoreb.dbf的結構為:考生號(c,10)、數學(n,5,1)、英語(n,5,1)、政治(n,5,1)、專業(yè)課(n,5,1),tabletj.dbf的結構為:考生號(c,10)、姓名(c,6)、課程名(c,8)、分數(n,5,1)),lq.dbf的結構為:考生號(c,10)、姓名(c,6)、總分(n,6,1),有如下程序:(代碼中行末的分號為邏輯行連接符)set talk off
26、open database kshglselect * from tabletj into table temp1select * from lq into table temp2select 1 use kshb index on 考生號 tag 考生號select 2use sscoreb index on 考生號 tag 考生號set relation to 考生號 into kshb go top do while .not. eof() if sscoreb.數學<60insert into temp1 values(kshb.考生號,kshb.姓名,'數學 '
27、,sscoreb.數學) else if sscoreb.英語<60 insert into temp1 values (kshb.考生號,kshb.姓名,'英語',sscoreb.英語) else if sscoreb.政治<60 insert into temp1 values (kshb.考生號,kshb.姓名,'政治',sscoreb.政治) else if sscoreb.專業(yè)課<60 insert into temp1 values (kshb.考生號,kshb.姓名,'專業(yè)課',;sscoreb.專業(yè)課) else
28、 insert into temp2 values(kshb.考生號,kshb.姓名,;sscoreb.數學+sscoreb.英語+sscoreb.政治+sscoreb.專業(yè)課) endif endif endif endif skip enddo select * from temp1 order by 分數,考生號 desc into array arr insert into tabletj from array arr select * from temp2 order by 總分,考生號 asc into array arrinsert into lq from array arrc
29、lose database close tables all drop table temp1 drop table temp2set talk on return該程序的功能是: 六、寫出下列程序的運行結果(本大題共5小題,每小題5分,共25分,請?zhí)顚懺诖痤}紙上)1窗體中有一命令按鈕,此按鈕單擊事件程序如下:private sub command1_click()dim m as integerdim a as integerdim b as integera = 1: b = 2: m = 0m = vb1(a, b)m = m + a+bprint mend sub函數:function
30、 vb1(w as integer, byval n as integer)w = 100: n = 200vb1 = w + nend function窗體啟動后單擊命令按鈕,最后m的值是 。2 如圖所示,圖中有一個文本框(名稱為t1),兩個選項按鈕(名稱分別為op1,op2),兩個復選框(名稱分別為ch1,ch2),兩個框架,一個命令按鈕(command1),命令按鈕的單擊事件中代碼如下:提示:函數instr(位置,字符串1,字符串2)的功能:返回字符串2在字符串1中的起始位置,如果找不到返回值是0,位置表示從第幾個字符開始查找。private sub command1_click()t1
31、.text = ""if op1.value = true thent1.text = t1.text + mid(op1.caption, instr(1, lcase(op1.value), "true"), 2)end ifif op2.value = true thent1.text = t1.text + mid(op2.caption, instr(1, lcase(op2.value), "true"), 2)end ift1.text = t1.text + mid(ch1.caption, 1, ch1.value
32、+ 1)t1.text = t1.text + mid(ch2.caption, 1, ch2.value + 1)end sub窗體啟動后,先選中如圖所示的各選項,然后再單擊命令按鈕,此時文本框中顯示內容是3有如下visual foxpro程序:cleara=12345c=0b=0do while a>0 b=a do tub with a,b a=a-1 c=c+benddo?cprocedure tub parameter x,y flag=.t. do while flag y=x%10+y*10 x=int(x/10) if x=0 flag=.f.endifenddoretu
33、rn運行上面的程序,顯示的結果為: 4在visual foxpro的表單上添加一個標簽,其name屬性為:lba,caption屬性為:請輸入字符串,添加一個文本框,其name屬性為:txt,添加一個標簽,其name屬性為:lbb,caption屬性為:空,添加一個命令按鈕,其name屬性為:command1,caption屬性為:確定。command1的click事件代碼如下:mystr=thisform.txt.valuemystr=trim(mystr)n=len(mystr)dime arr(n)for i=1 to n arr(i)=substr(mystr,i,1)endform=
34、3j=0for i=n to 1 step -1 if arr(i)=* j=j+1 else exit endifendforb= c= s=0if j>m s=melses=jendiffor i=1 to n-s if (arr(i)>=0 and arr(i)<=9) b=b+arr(i) else c=c+arr(i) endifendformystr=c+bthisform.lbb.caption=mystrreturn運行上面的表單,在文本框中輸入:d12&%#ef34*,單擊“確定“按鈕,在lbb標簽中顯示的是: 5設有數據庫文件shangpin.db
35、c,包含3個表,分別是goods、orderlist、orderitem。其中goods的結構為:商品號(c,6)、商品名(c,20)、單價(n,6,2),orderlist的結構為:訂單號(c,4)、客戶名(c,8)、簽訂日期(d),orderitem的結構為:訂單號(c,4)、商品號(c,6)、數量(n,2),其表中數據如下:goods.dbf記錄號商品號商品名單價1 a00001 數據庫原理 23.802 a00002 計算機操作系統(tǒng) 31.003 a00003 匯編語言 33.504 a00004 c+程序設計 23.90orderlist.dbf記錄號訂單號 客戶名 簽訂日期1 00
36、01 zhangby 02/29/002 0002 haom 03/14/003 0003 liuyj 03/18/004 0004 liubing 03/21/005 0005 lixing 03/25/006 0006 hailan 04/01/00orderitem.dbf記錄號訂單號 商品號 數量1 0001 a00001 22 0002 a00002 23 0003 a00003 34 0004 a00003 45 0005 a00004 36 0006 a00003 2有如下程序:(代碼中行末的分號為邏輯行連接符)dime arr(1)sum1=0alter table order
37、list add 總金額 n(7,2)select orderitem.訂單號,sum(goods.單價*orderitem.數量) as 總金額from;goods,orderitem where goods.商品號 = orderitem.商品號 group by;orderitem.訂單號 order by orderitem.訂單號 into table temp.dbfclose allselect 1use tempindex on 訂單號 to ddh1sele 2use orderlistindex on 訂單號 to ddh2set relation to 訂單號 into
38、ado while .not.eof() replace 總金額 with temp.總金額 skipenddodo whil .t. acce "請輸入商品名(輸入0退出)" to shang if shang ='0' exit else select 商品號 from goods where 商品名=shang into array arr sno=arr(1) select 訂單號 from orderitem where 商品號=sno into table wj use wj do while not eof() mm=訂單號 select 總金
39、額 from orderlist where 訂單號=mm into array arr sum1=sum1+arr(1) skip enddo ?sum1 endifenddo運行上面的程序,輸入“匯編語言”,顯示的結果是: 七、程序改錯(本大題共2小題,每題5分,共10分。每個程序有兩處錯誤,請在答題紙上寫出錯誤行代碼和修改后的正確代碼,改錯不扣分,請將答案填寫在答題紙上) 1下面的程序是將一輸入的字符串進行分類賦值,方法:從字符串的最左端開始截取一字符,然后進行判斷,數字字符放入數組a中,將其它字符放入數組b中,然后繼續(xù)處理下一個字符,直至全部處理完,最后分類打印,程序中有兩處錯誤,請將
40、錯誤行和正確的全行寫在答題紙相應的橫線上。( visual basic題)dim a(100) as integerdim b(100) as integerdim c as stringdim i as integerdim j as integerdim k as integerdim m as integerdim w as stringc = inputbox("c=", "", "")k = len(c)for i = 1 to kw = right(c, 1)c = right(c, k - 1)if w >= &q
41、uot;0" and w <= "9" thena(j) = w: j = j + 1elseb(m) = asc(w): m = m + 1end ifc=c-wnext iprintfor i = 0 to j - 1print a(i);next iprintfor i = 0 to m - 1print chr(b(i);next iprint2窗體中(如圖所示)有一定時器控件(名稱timer1), 每2秒鐘觸發(fā)一次timer事件,有兩個標簽用于提示后面的控件名稱,一文本框text1,一滾動條(名稱hs1)。窗體啟動后(此圖為窗體剛啟動時的狀態(tài)),滾
42、動框根據計時器事件向右移動,但當單擊滾動框左端后,滾動框開始向左移動,當單擊滾動框右端后,滾動框開始向右移動,文本框中的文字大小隨滾動條的值變化。窗體通用部分聲明了兩個變量,后面給出了三個事件過程。程序中共有兩處錯誤分布在三個事件過程中(每個事件過程中最多有一處錯誤),請將錯誤行和正確行寫在答題紙相應的橫線上。( visual basic題)(提示:form_activate()表示窗體變?yōu)榛顒哟绑w后觸發(fā)的事件)窗體通用部分聲明代碼:dim a as integer 變量a用于確定滾動框向左(為0)還是向右(為1)滾動dim w as integer private sub form_acti
43、vate()w = hs1.valuea=0end subprivate sub hs1_change()if w <hs1.value thena = 0elsea = 1end ifw = hs1.valueend subprivate sub timer1_timer()if text1.fontsize < 10 then text1.fontsize = 11if text1.fontsize > 80 then text1.fontsize = 79if a = 1 thentext1.fontsize = text1.fontsize + 1elsetext1.
44、fontsize = text1.fontsize - 1end ifend sub八、程序填空(本大題共7個空,每空5分,共35分。按程序要求在答題紙上填入相應的內容,使程序完整正確,請將答案填寫在答題紙上)1下面的程序前部分功能考生自己分析,后部分功能是輸入一數據,然后在數組中找此數據,若找不到則程序結束,若找到將數組元素下標小于此數據下標的數據由大到小排列并輸出,請在空白位置填寫正確的命令(visual basic題)。dim a(9) as integerdim i as integerdim t as integera(0) = 20 + int(rnd * 91)for i = 1
45、 to 9t = 20 + int(rnd * 91)if t < a(i - 1) theni = i - 1elsea(i) = tend ifnext ifor i = 0 to 9print a(i);next iprintt = inputbox("input t=", "")for i = 0 to 9if t = (1) thenexit forend ifnext iif i = 10 then endi = i - 1for k = 0 to i / (2) t = a(k)a(k) = a(i - k)a(i - k) = tnext kfor i = 0 to 9print a(i);next i2下面程序可以打印一個九九表完整九行或部分行,思路是在窗體中加入兩個文本框,第一個文本框(text1)用于指定輸出九九表的起始行,第二個文本框用于指定輸出九九表的結束行,如在第一個文本框中輸入2,第二個文本框中輸入6,打印出如圖所示的2到6行。命令按鈕的單擊事件中有打印九九表的程序,請在空白位置填寫正確的命令(
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯系上傳者。文件的所有權益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網頁內容里面會有圖紙預覽,若沒有圖紙預覽就沒有圖紙。
- 4. 未經權益所有人同意不得將文件中的內容挪作商業(yè)或盈利用途。
- 5. 人人文庫網僅提供信息存儲空間,僅對用戶上傳內容的表現方式做保護處理,對用戶上傳分享的文檔內容本身不做任何修改或編輯,并不能對任何下載內容負責。
- 6. 下載文件中如有侵權或不適當內容,請與我們聯系,我們立即糾正。
- 7. 本站不保證下載資源的準確性、安全性和完整性, 同時也不承擔用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。
最新文檔
- 如何應對班級突發(fā)事件計劃
- 生鮮食品采購合同三篇
- 建立企業(yè)內外部溝通平臺計劃
- 《集團高層激勵方案》課件
- 《言語語言障礙概論》課件
- 《數據與數據獲取》課件
- 《音標講解教程》課件
- 面試報告范文
- 刑法研修計劃報告范文
- 報告范文大全
- 家庭財務管理系統(tǒng)
- 逆向思維的含義與作用課件教學
- 冠寓運營管理手冊
- 2023年上海市15區(qū)物理中考一模分類匯編6伏安法測電阻、測電功率含答案
- 解剖學講腦干
- 仙桃市自然災害救助應急預案操作手冊
- 2023國家開放大學:人文英語4邊學邊練1-6答案
- “小哥白尼杯”科普知識競賽題庫
- 2024名校版人教語文一年級上冊《比尾巴》同步練習含答案
- 統(tǒng)編版高中語文選擇性必修中冊 實踐是檢驗真理的唯一標準 新教學課件
- XXXXX風電場工程移交驗收模板
評論
0/150
提交評論