|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
 |
 |
2009年春江蘇計(jì)算機(jī)等級(jí)考試二級(jí)vb試卷 |
|||
絕密★啟用前 2009年春 江蘇省高等學(xué)校非計(jì)算機(jī)專業(yè)學(xué)生 計(jì)算機(jī)基礎(chǔ)知識(shí)和應(yīng)用能力等級(jí)考試 二級(jí)試卷 試卷語種： Visual Basic 說 明： 1.本試卷包括計(jì)算機(jī)基礎(chǔ)知識(shí)部分和程序設(shè)計(jì)部分，考試時(shí)間共120分鐘 2.本試卷滿分為60分，分選擇題和填空題，試卷不分A、B類型； 3.計(jì)算機(jī)基礎(chǔ)知識(shí)部分全部是選擇題(20分)，程序設(shè)計(jì)部分分為選擇題(10分)和填空題(30分)兩種； 4.選擇題用答題卡答題。每一項(xiàng)有A、B、C、D四個(gè)可供選擇的答案，請選擇其中一個(gè)你認(rèn)為正確的答案，用HB鉛筆涂寫在答題卡的相應(yīng)答題號(hào)內(nèi)。每選對一項(xiàng)得1分，不選或選錯(cuò)不得分； 5.填空題用答題紙答題。請將答案用藍(lán)、黑色鋼筆或圓珠筆填寫在答題紙的相應(yīng)答題號(hào)內(nèi)，每個(gè)答案只占一行，不得換行。每填對一個(gè)答案得1分，不填或填錯(cuò)不得分； 6.請認(rèn)真填寫并仔細(xì)核對答題卡和答題紙上的學(xué)校名稱、準(zhǔn)考證號(hào)和姓名是否填寫正確。 7.考試結(jié)束時(shí)將試卷、答題卡和答題紙放在桌上，不得帶走。待監(jiān)考人員收點(diǎn) 第一部分計(jì)算機(jī)基礎(chǔ)知識(shí) 1. 在下列有關(guān)現(xiàn)代信息技術(shù)的一些敘述中，正確的是 1 。 A.集成電路是20世紀(jì)90年代初出現(xiàn)的，它的出現(xiàn)直接導(dǎo)致了微型計(jì)算機(jī)的誕生 B.集成電路的集成度越來越高，目前集成度最高的已包含幾百個(gè)電子元件 C.目前所有數(shù)字通信均不再需要使用調(diào)制解調(diào)技術(shù)和載波技術(shù) D.光纖主要用于數(shù)字通信，它采用波分多路復(fù)用技術(shù)以增大信道容量‘ . 2. 最大的10位無符號(hào)二進(jìn)制整數(shù)轉(zhuǎn)換成八進(jìn)制數(shù)是 2 .。 A.1023 B.1777 C.1000 D.1024 3. 在下列有關(guān)目前PC機(jī)CPU的敘述中，錯(cuò)誤的是 3 。 A.CPU芯片主要是由Intel公司和AMD公司提供的 B."雙核"是指PC機(jī)主板上含有兩個(gè)獨(dú)立的CPU芯片 C.Pentium 4微處理器的指令系統(tǒng)由數(shù)百條指令組成 D.Pentium 4微處理器中包含一定容量的Cache存儲(chǔ)器 4. 在下列有關(guān)當(dāng)前PC機(jī)主板和內(nèi)存的敘述中，正確的是 4 。 A.主板上的BIOS芯片是一種只讀存儲(chǔ)器，其內(nèi)容不可在線改寫 B.絕大多數(shù)主板上僅有一個(gè)內(nèi)存插座，因此PC機(jī)只能安裝一根內(nèi)存條 C.內(nèi)存條上的存儲(chǔ)器芯片屬于SRAM(靜態(tài)隨機(jī)存取存儲(chǔ)器) D.目前內(nèi)存的存取時(shí)間大多在幾個(gè)到十幾個(gè)ns(納秒)之間 5. 在下列有關(guān)PC機(jī)輔助存儲(chǔ)器的敘述中，正確的是 5 。 A.硬盤的內(nèi)部傳輸速率遠(yuǎn)遠(yuǎn)大于外部傳輸速率 B.對于光盤刻錄機(jī)來說，其刻錄信息的速度一般小于讀取信息的速度 C.使用USB 2.0接口的移動(dòng)硬盤，其數(shù)據(jù)傳輸速率大約為每秒數(shù)百兆字節(jié) D.CD-ROM的數(shù)據(jù)傳輸速率一般比USB 2.0還快 6. 在下列PC機(jī)I/O接口中，數(shù)據(jù)傳輸速率最快的是 6 。 A.USB 2.0 B.IEEE-1394 C.IrDA (紅外) D.SATA 7. 計(jì)算機(jī)軟件可以分為商品軟件、共享軟件和自由軟件等類型。在下列相關(guān)敘述中，錯(cuò)誤的是 7 。 A.通常用戶需要付費(fèi)才能得到商品軟件的使用權(quán)，但這類軟件的升級(jí)總是免費(fèi)的 B.共享軟件通常是一種"買前免費(fèi)試用"的具有版權(quán)的軟件 C.自由軟件的原則是用戶可共享，并允許拷貝和自由傳播 D.軟件許可證是一種法律合同，它確定了用戶對軟件的使用權(quán)限 8. 人們通常將計(jì)算機(jī)軟件劃分為系統(tǒng)軟件和應(yīng)用軟件。下列軟件中，不屬于應(yīng)用軟件類型的是 8 A.AutoCAD B.MSN C.Oracle D.Windows Media Player 9. 在下列有關(guān)Windows 98/2000/XP操作系統(tǒng)的敘述中，錯(cuò)誤的是 9 。 A.系統(tǒng)采用并發(fā)多任務(wù)方式支持多個(gè)任務(wù)在計(jì)算機(jī)中同時(shí)執(zhí)行 B.系統(tǒng)總是將一定的硬盤空間作為虛擬內(nèi)存來使用 C.文件(夾)名的長度可達(dá)200多個(gè)字符 D.硬盤、光盤、優(yōu)盤等均使用FAT文件系統(tǒng) 10. 在下列有關(guān)算法和數(shù)據(jù)結(jié)構(gòu)的敘述中，錯(cuò)誤的是 10 。 A.算法通常是用于解決某一個(gè)特定問題，且算法必須有輸入和輸出 B.算法的表示可以有多種形式，流程圖和偽代碼都是常用的算法表示方法 C.常用的數(shù)據(jù)結(jié)構(gòu)有集合結(jié)構(gòu)、線性結(jié)構(gòu)、樹形結(jié)構(gòu)和網(wǎng)狀結(jié)構(gòu)等 D.數(shù)組的存儲(chǔ)結(jié)構(gòu)是一種順序結(jié)構(gòu) 11•因特網(wǎng)的IP地址由三個(gè)部分構(gòu)成，從左到右分別代表 11 。 A.網(wǎng)絡(luò)號(hào)、主機(jī)號(hào)和類型號(hào) B.類型號(hào)、網(wǎng)絡(luò)號(hào)和主機(jī)號(hào) C.網(wǎng)絡(luò)號(hào)、類型號(hào)和主機(jī)號(hào) D.主機(jī)號(hào)、網(wǎng)絡(luò)號(hào)和類型號(hào) 12•在下列有關(guān)ADSL技術(shù)及利用該技術(shù)接入因特網(wǎng)的敘述中，錯(cuò)誤的是 12 。 A.從理論上看，其上傳速度與下載速度相同 B.一條電話線上可同時(shí)接聽/撥打電話和進(jìn)行數(shù)據(jù)傳輸 C.利用ADSL技術(shù)進(jìn)行數(shù)據(jù)傳輸時(shí)，有效傳輸距離可達(dá)幾公里 D.目前利用ADSL技術(shù)上網(wǎng)的計(jì)算機(jī)一般需要使用以太網(wǎng)網(wǎng)卡 13.人們往往會(huì)用"我用的是 指的是數(shù)據(jù)通信中的 13 指標(biāo)。 A.最高數(shù)據(jù)傳輸速率 B.平均數(shù)據(jù)傳輸速率 C.每分鐘數(shù)據(jù)流量 D.每分鐘IP數(shù)據(jù)包的數(shù)目 14•計(jì)算機(jī)局域網(wǎng)按拓?fù)浣Y(jié)構(gòu)進(jìn)行分類，可分為環(huán)型、星型和 14 型等。 A.電路交換 B.以太 C.總線 D.對等 15.網(wǎng)絡(luò)信息安全主要涉及數(shù)據(jù)的完整性、可用性、機(jī)密性等問題。保證數(shù)據(jù)的完整性就是 15 。 A.保證傳送的數(shù)據(jù)信息不被第三方監(jiān)視和竊取 B.保證發(fā)送方的真實(shí)身份 C.保證傳送的數(shù)據(jù)信息不被篡改 D.保證發(fā)送方不能抵賴曾經(jīng)發(fā)送過某數(shù)據(jù)信息 16.某計(jì)算機(jī)系統(tǒng)中，西文使用標(biāo)準(zhǔn)ASCII碼、漢字采用GB2312編碼。設(shè)有一段純文本，其機(jī)內(nèi)碼為CB F5 DO B4 50 43 CA C7 D6 B8，則在這段文本中含有： 16 。 A.2個(gè)漢字和1個(gè)西文字符 B.4個(gè)漢字和2個(gè)西文字符 C.8個(gè)漢字和2個(gè)西文字符 D.4個(gè)漢字和1個(gè)西文字符 17.以下關(guān)于漢字編碼標(biāo)準(zhǔn)的敘述中，錯(cuò)誤的是 17 。 A.GB 2312標(biāo)準(zhǔn)中所有漢字的機(jī)內(nèi)碼均用雙字節(jié)表示 B.我國臺(tái)灣地區(qū)使用的漢字編碼標(biāo)準(zhǔn)BIG 5收錄的是繁體漢字 C.GB 18030漢字編碼標(biāo)準(zhǔn)收錄的漢字在GB 2312標(biāo)準(zhǔn)中一定能找到 D.GB 18030漢字編碼標(biāo)準(zhǔn)既能與UCS(Unicode)接軌，又能保護(hù)已有中文信息資源 18.若波形聲音未進(jìn)行壓縮時(shí)的碼率為64kb/s，已知取樣頻率為8kHz，量化位數(shù)為8，那么它的聲道數(shù)是 18 。 A.1 B 19.從信息處理的深度來區(qū)分信息系統(tǒng)，可分為業(yè)務(wù)處理系統(tǒng)、信息檢索系統(tǒng)和信息分析系統(tǒng)等。在下列幾種信息系統(tǒng)中，不屬于業(yè)務(wù)處理系統(tǒng)的是 19 。 A.DSS B.CAI C.CAM D.OA 20.在下列有關(guān)信息系統(tǒng)開發(fā)、管理及其數(shù)據(jù)庫設(shè)計(jì)的敘述中，錯(cuò)誤的是 20 。 A.常用的信息系統(tǒng)開發(fā)方法可分為結(jié)構(gòu)化生命周期方法、原型法、面向?qū)ο蠓椒ê?/SPAN>CASE方法等 B.在系統(tǒng)分析中常常使用結(jié)構(gòu)化分析方法，并用數(shù)據(jù)流程圖和數(shù)據(jù)字典來表達(dá)數(shù)據(jù)和處理過程的關(guān)系 C.系統(tǒng)設(shè)計(jì)分為概念結(jié)構(gòu)設(shè)計(jì)、邏輯結(jié)構(gòu)設(shè)計(jì)和物理結(jié)構(gòu)設(shè)計(jì)，通常用E-R模型作為描述邏輯結(jié)構(gòu)的工具 D.從信息系統(tǒng)開發(fā)過程來看，程序 第二部分Visual Basic程序設(shè)計(jì) 一、選擇題(用答題卡答題，答案依次填在21—30答題號(hào)內(nèi)) 21．在列表框Listl中有若干列表項(xiàng)，可以刪除選定列表項(xiàng)的語句是 21 A．List1.text="" B．List1．List(Listl．ListIndex)="" C．List1.Clear D．List1.RemoveItem List1.ListIndex 22．執(zhí)行 22 語句時(shí)，會(huì)出現(xiàn)出錯(cuò)提示信息。 A．Print 5+7=14 B．Print 16384*2 C．Print 32768*2 D．Print "14"+32 23.數(shù)學(xué)表達(dá)式 A。(e^(2*∏*x—5)*Log(x)+(Sin(2x))^3)/Sqr(Sin(x)-Cos(x^2)) B．(Exp(2*3．14159*x一5)*Log(x)+(Sin(2*x))^3)/Sqr(Sin(x)一Cos(x^2)) C．(Exp(2*∏*x—5)*Ln(x)+(Sin(2*x))^3)/Sqr(Sin(x)—Cos(x^2)) D．e^(2*3.14159*x一5)*Ln(x)+(Sin(2*x))^3)/Sqr(Sing(x)—Cos(x^2)) 24．以下關(guān)于數(shù)組的說法中，錯(cuò)誤的是 24 。 A．使用了Preserve予句的ReDim語句，只允許改變數(shù)組最后一維的上界 B．對于動(dòng)態(tài)數(shù)組，ReDim語句可以改變其維界但不可以改變其數(shù)據(jù)類型 C．Erase語句的功能只是對固定大小的數(shù)組進(jìn)行初始化 D．LBound函數(shù)返回值是指定數(shù)組某一維的下界 25．下列有關(guān)過程的說法中，錯(cuò)誤的是 25 。 ‘ ． A．在Sub或Function過程內(nèi)部不能再定義其它Sub或Function過程 B．對于使用ByRef說明的形參，在過程調(diào)用時(shí)形參和實(shí)參只能按傳址方式結(jié)合 C．遞歸過程既可以是遞歸Function過程，也可以是遞歸Sub過程 D．可以像調(diào)用Sub過程一樣使用Call語句調(diào)用Function過程 26．以下有關(guān)對象屬性的說法中，錯(cuò)誤的是 26 。 A．工具箱中的控件并不是VB中所有的控件 B．若將Frame的Enabled屬性設(shè)置為False，則不能使用放置在Frame里面的控件 C．對象的Name屬性在運(yùn)行時(shí)不能改變 D．對象的所有屬性都可以在屬性窗口中設(shè)置 27．以下關(guān)于變量作用域的敘述中，正確的是： 2Z 。 A．窗體中凡用Private聲明的變量只能在某個(gè)指定的過程中使用 B．模塊級(jí)變量只能用Dim語句聲明 C.凡是在窗體模塊或標(biāo)準(zhǔn)模塊的通用聲明段用Public語句聲明的變量都是全局變量 D.當(dāng)不同作用域的同名變量發(fā)生沖突時(shí)，優(yōu)先訪問局限性小的變量 28.表達(dá)式CInt(4.5)+CInt(-4.51)+Int(4.9)+Int(-4.1)+Fix(-1.9)+0 Mod 2的運(yùn)算結(jié)果是 28 A.1 B. 29.若要使邏輯表達(dá)式x>y Xor Y A.X=3、Y=3、Z=4 B.X=2、Y=1、Z=2 C.x=1、Y=3、Z=2 D.x=2、Y=2、Z=2 30.在一個(gè)多窗體程序中，可以僅將窗體Form2從內(nèi)存中卸載的語句是 30 A.Form2.Unload B．Unload Form 二、填空題(請將答案填寫在答題紙的相應(yīng)答題號(hào)內(nèi)，每個(gè)答案只占一行) 1.執(zhí)行下面程序,單擊Commandl,則圖片框中顯示的第一行是(1)，顯示的第二行是(2) ，最后一行顯示的是 (3) 。 Private Sub Command1_Click() Dim a(3，3)As Integer Dim i As Integer,j As Integer For i=1 To 3 For j=3 To 1 Step -1 If i>=j Then a(i,j)=i-j Else a(i，j)=j-i End If Next j Next i For i=1 to 3 For j=3 To 1 Step -1 Picture1.Print a(i,j); Next j Picturel．Print Next i EndSub 2.運(yùn)行下面程序,如果連續(xù)三次單擊命令按鈕之后，A數(shù)組共有(4) 個(gè)元素；數(shù)組元素A(2)的值是(5)，A(5)的值是(6) Option Explicit Option Base l Private Sub Command1_Click() Static A() As Integer,N As Integer Dim I As Integer,K As Integer K=N N=N+2 ReDim Preserve A(N) For I=K+1 To N A(I)=I*N+1 Next I ForI=1 To N Print A(I)； Next I EndSub 3．運(yùn)行下面的程序，單擊commandl，在窗體上顯示的變量A的值為( 7 ),變量B的值為( 8 ) Option Explicit Dim A As Integer Private Sub Command1_Click() Dim B As Integer B=3 A=4 B=Fun(Fun(A,B+2),A)+B Print A,B EndSub Private Function Fun(N As Integer,K As Integer) N=N+A K=N-K Fun=N+K+A End Function 4．執(zhí)行下面的程序，單擊command1,窗體上顯示的第一行是( 9 )，第二行是( 10 ),第四行是( 11 ),最后一行是( 12 ) Option Explicit Private Sub Command1_Click() Dim n As Integer n=5 Call test(n) Print n End Sub Private Sub test(ByVal n As Integer) Dim i As Integer,S As String If n>0 Then For i=l To n S=S & CStr(i) Next i Print S Call test(n-2) Else Print "0VER" EndIf EndSub 5.運(yùn)行下列程序，單擊Command1，在窗體上顯示的第一行內(nèi)容是 ( 12 ),第二行的內(nèi)容是( 14 )，第三行的內(nèi)容是( 15 )("A"的ASCII碼是65,"z"是90) Option Explicit Private Sub Commandl_Click() Dim i As Integer,st As String，n As Integer,p As String*1 P="B" For i=3 To 1 Step -1 n=Asc(p)-i If n<65 Then n=n+26 st=Chr(n) st=st & F(i) Print st Next i EndSub Private Function F(n As Integer) Dim i As Integer Static S As Integer For i=1 To n s=s+i Nexti F=S End Function 6•用以下公式求f(x)的值。當(dāng)通項(xiàng)的絕對值小于10^-7時(shí)停止計(jì)算，x的值由鍵盤輸入。 f(x)=a1x1-a2x2+a3x3-…+(-1)n+1anxn+… |X| 1 其中 a1=1，a2=2，an= Option Explicit Private Sub Commandl_Click()、 Dim x As Single，fx As Single Dim a As Single，a1 As Single,a2 As Single Dim t As Single a1=l：a2=2 x=text1 If ( 16 ) Then MsgBox("x必須在-1---1之間") ExitSub End If fx=a1*x-a2*x*x t=(-1)*x*x DO a=1/(al+a2) t=(-1)*x*x fx=( 17 ) al=a2 ( 18 ) Loop Until Abs(a*t)<0.0000001 Text2=fx End Sub 7.學(xué)生的某次課程測驗(yàn)中，選擇題的答案已記錄在列表框list1中，其數(shù)據(jù)行格式是:學(xué)號(hào)為6個(gè)字符長度，2個(gè)空格，選擇題的答案為15個(gè)字符長度，程序根據(jù)標(biāo)準(zhǔn)答案進(jìn)行批改，每答對一題給1分，并將得分存放到列表框list1中，標(biāo)準(zhǔn)答案存放在變量Exact中。 Option Explicit Private Sub Command1_click() Dim Anw as string , StudId as string Dim Scor as Integer, Exact as string Dim I as Integer, J as integer Exact=”ABCCBAACBBDCCDA” For I=( 19 ) Anw=（ 20 ） StudId=Left(Anw,6) Anw=Right(Anw,Len(Anw)-8) ( 21 ) For J=1 to Len(Anw) If （ 22 ） Then Scor=Scor+1 End If Next J List2.AddItem StudId & “ “ & Scor Next I End Sub 8．下面程序的功能是：統(tǒng)計(jì)存放在數(shù)組A中的N個(gè)數(shù)有多少個(gè)是不同的。具體做法是：變量Left指向要被處理的數(shù)(從第2個(gè)元素開始)，Right指向數(shù)組最后一個(gè)元素。若A(Left)與排在它前面的某個(gè)數(shù)組元素值相同，就用數(shù)組元素A(Right)的值來替換A(Left)的值，同時(shí)將變量Right的值減1；否則將變量Left的值加1，處理數(shù)組下一個(gè)元素，重復(fù)以上過程，直到Left>Right為止。Right的值即為不同的數(shù)的個(gè)數(shù)。 Option Explicit OptionBase 1 Private Sub Commandl_Click()
Dim A() As Integer,N As Integer,I AS Integer Dim OP As Integer N=InputBox("請輸入數(shù)據(jù)個(gè)數(shù)", ,10) ReDim A(N) Randomize For I=1 To N A(I)=Int(Rnd*10)+1 Text1=Text1 & A(1) & " " Next I Call Statistic(A,OP) Text2="有" & oP & "個(gè)不同的數(shù):" For I=1 To OP Text2=Text2 & A(I) & " " Next I End Sub Private Sub Statistic(A() As Integer,Right As Integer) Dim Left As Integer,K As Integer,I As Integer Right=( 23 ) Left=2 Do While Left<=Right K=( 24 ) For I=K To 1 Step -1 If A(Left)=A(I) Then Exit For Next I If ( 25 )Then Left=Left+1 ． Else A(Left)=A(Right) ( 26 ) End If End Sub 9.在計(jì)算機(jī)中用一個(gè)字節(jié)(8位),來存儲(chǔ)一個(gè)字符的Ascii碼，其中低7位二進(jìn)制數(shù)對應(yīng)字符的編碼，每個(gè)字節(jié)的最高位一般保持為” Option Explicit Private Sub Commandl_Click()
Dim i As Integer，S As String Dim str As String，ch As String str=Text1.text For i=1 To Len(str) ( 27 ) Call convert(ch，s) List1.AddItem ch & "==>" & S Next i End Sub Private Sub convert(ch As String，S As String) Dim m As Integer,k As Integer,n As Integer,i As Integer s= ( 28 ) n=Asc(ch) Do While n>0 ( 29 )
S=m & S If m=1 Then k=k+1 End If n=n\2 For i=1 To 7-Len(s) '將字符的二進(jìn)制代碼補(bǔ)足7位 S="0" & S Next i If k Mod 2=0 Then ( 30 ) Else S="0" & S End If End Sub
|
|||