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