<small id="kntrr"><delect id="kntrr"></delect></small>
<sub id="kntrr"></sub>
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
 |
 |
2008年春江蘇省計算機等級考試VB試題 |
|
2008年春江蘇省計算機等級考試VB試題 第一部分計算機基礎知識 1． 在下列有關微電子技術與集成電路的敘述中，錯誤的是( 1 ) 。 A．微電子技術是以集成電路為核心的技術 B．集成度是指單個集成電路所含電子元件的數目 C．Moore定律指出，單個集成電路的集成度平均每18—24個月翻一番 D．IC卡僅有存儲器和處理器，卡中不可能存儲有軟件 2． 在下列有關通信技術的敘述中，錯誤的是( 2 ) 。 A．目前無線電廣播主要還是采用模擬通信技術 B．數字傳輸技術最早是被長途電話系統采用的 C．數字通信系統的信道帶寬就是指數據的實際傳輸速率(簡稱“數據速率”) D．局域網中廣泛使用的雙絞線既可以傳輸數字信號，也可以傳輸模擬信號 3． CPU的運算速度與許多因素有關，下面哪些是提高CPU速度的有效措施? ( 3 ) ①增加CPU中寄存器的數目 ②提高CPU的主頻 ③增加CPU中高速緩存(cache)的容量 ④優化BIOS的設計 A．①、③和④ B．①、②和③ C．①和④ D．②、③和④ 4． 下面是PC機常用的4種外設接口，其中鍵盤、鼠標、數碼相機和移動硬盤等均能連接的接口是( 4 ) A． RS-232 B． IEEE 5． 下列有關PC機外部設備的敘述中，錯誤的是 （ 5 ） 。 A．掃描儀的工作過程主要基于光電轉換原理，分辨率是其重要性能指標之一 B．制作3—5英寸的照片(圖片)，數碼相機的CCD像素必須在600萬以上 C．集成顯卡(指集成在主板上的顯卡)的顯示控制器主要集成在芯片組中 D．存折和票據的打印，目前主要是采用針式打印機 6． 下列有關PC機輔助存儲器的敘述中，錯誤的是( 6 ) 。 A．硬盤的盤片轉動速度特別快，目前一般為每秒數千轉 B. 近年來使用的串行ATA(SATA)接口硬盤，其傳輸速率比采用IDE接口的要快 C．目前移動硬盤大多采用USB 2．0接口，其傳輸速率可達每秒數十兆字節 D. 40倍速的CD-ROM驅動器的速率可達6MB／s左右 7． 在下列有關商品軟件、共享軟件、自由軟件及其版權的敘述中，錯誤的是 （ 7 ）。 A．通常用戶需要付費才能得到商品軟件的合法使用權 B．共享軟件是一種“買前免費試用”的具有版權的軟件 C．自由軟件允許用戶隨意拷貝，但不允許修改其源代碼和自由傳播 D．軟件許可證確定了用戶對軟件的使用方式，擴大了版權法給予用戶的權利 8． 下面有關Windows操作系統多任務處理的敘述中，正確的是 ( 8 ) 。 A．用戶如果只啟動一個應用程序工作(如使用Word寫作)，則該程序自始至終獨占CPU B． 由于CPU具有多個執行部件，所以操作系統才能同時進行多個任務的處理 C．前臺任務和后臺任務都能得到CPU的響應 D． 處理器調度程序根據各個應用程序運行所需要的時間多少來確定時間片的長短 9． 從算法需要占用的計算機資源角度分析其優劣時，應考慮的兩個主要方面是 （ 9 ）。 A．空間代價和時間代價 · C．可讀性和開放性 B． 正確性和簡明性 D． 數據復雜性和程序復雜性 10．接入因特網的每臺計算機的IP地址 （ 10 ）。 A． 由與該計算機直接連接的交換機及其端口決定 B． 由該計算機中網卡的生產廠家設定 C． 由網絡管理員或因特網服務提供商(ISP)分配 D． 由用戶自定 11．以下關于局域網和廣域網的敘述中，正確的是 （ 11 ）。 A．廣域網只是比局域網覆蓋的地域廣，它們所采用的技術是完全相同的 B． 局域網中的每個節點都有一個惟一的物理地址，稱為介質訪問地址(MAC地址) C．現階段家庭用戶的PC機只能通過電話線接入網絡 D．單位或個人組建的網絡都是局域網，國家或國際組織建設的網絡才是廣域網 12．目前在網絡互連中用得最廣泛的是TCP／IP協議。事實上，TCP／IP是一個協議系列，它已經包含了100多個協議。在TCP／IP協議中，遠程登錄使用的協議是( 12 ) 。 A．TELNET B．FTP C．HTTP D．UDP 13．關于電子郵件服務，下列敘述中錯誤的是 ( 13 ) 。 A． 網絡中必須有郵件服務器用來運行郵件服務器軟件 B． 用戶發出的郵件會暫時存放在郵件服務器中 C．用戶上網時可以向郵件服務器發出接收郵件的請求 D．發郵件者和收郵件者如果同時在線，則可不通過郵件服務器而直接通信 14·國際標準化組織(ISO)將世界各國和地區使用的主要文字符號進行統一編碼的方案稱為 （ 14 ）。 A． UCS／Unicode C． GBK B． GB2312 D．GBl8030 15·存放一幅1024×768像素的未經壓縮的真彩色(24位)圖像，大約需要多少字節的存儲空間?（ 15 ） A． 1024x768x B． 1024x768x3 D．1024x768x12 16·對帶寬為300—3400Hz的語音，若采樣頻率為8kHz、量化位數為8位且為單聲道，則未壓縮時的碼率約為( 16 )。 A.64kb／s B．64kB／s C．128kb／s D．128kB／s 17·彩色圖像所使用的顏色描述方法稱為顏色模型。在下列顏色模型中，主要用于彩色噴墨打印機的是( 17 ) 。 A·YUV B．HSB C．CMYK D．RGB 18·從信息處理的深度來區分，信息系統可分為業務信息處理系統、信息檢索系統、信息分析系統和專家系統。在下列相關敘述中，錯誤的是 18 。 A．業務信息處理系統是采用計算機進行日常業務處理的信息系統 B· 信息檢索系統就是指因特網上提供的各種搜索引擎，可以供各類用戶免費使用 C． 決策支持系統是一種常見的信息分析系統 D． 專家系統可模仿人類專家的思維活動，通過推理與判斷來求解問題 19·在下列有關Microsoft Excel 2000(中文版)功能的敘述中，錯誤的是 （ 19 ）。 A．可以將Excel工作簿或選定的工作表另存為網頁文件(．htm) B． 對數據清單進行排序時，最多可以選擇5個關鍵字 C·通過設置，可以實現在某單元格中輸入數據后按回車鍵，光標自動移動到上邊一單元格或左邊一單元格 。 D．在工作表中可以插入“藝術字” 20·在下列有關Microsoft FrontPage 2000(中文版)功能的敘述中，錯誤的是 20 。 A．執行菜單命令“新建”時，可以選擇是新建網頁還是新建站點 B． 用戶可以對框架網頁的框架進行拆分或刪除 C·如同Microsoft word中的表格，用戶可以在網頁中手繪表格或插入表格 D． 系統提供了“繪圖”工具欄，便于用戶在網頁中繪圖 第二部分Visual Basic程序設計 一、選擇題(用答題卡答題，答案依次填在21—30答題號內) 21．下列關于某對象SetFocus與GotFocus的描述中，正確的是21 。 A． SetFocus是事件，GotFocus是方法 B．SetFocus和GotFocus都是事件 C．SetFocus和GotFocus都是方法D．SetFocus是方法，GotFocus是事件 22．Print方法可在_______上輸出數據。 ①窗體②文本框③圖片框④標簽⑤列表框⑥立即窗口 A．①③⑥ B．⑦③⑤ C．①⑦⑤ D．③④⑥
23．數學表達： A．(x^5一Cos(29))／Sqr(e^X+In(Y))+5 B．(x^5一Cos(29))／(Sqr(Exp(x)+Log(Y))+5) C．(x^5一Cos(29*3．14159／180))／(Sqr(Exp(x)+Log(Y))+5) D．(x^5一Cos(29*3．14159／180))／(Sqr(e^X+Log(Y))+5) 24．以下有關數組參數的說明中，正確的是24。 A．在過程中也可用Dim語句對形參數組進行說明 B．動態數組作為實參時，可用ReDim語句在過程中改變對應形參數組的維界 24.下列有關數組參數的說明正確的是 (24) 。 A.在過程中也可用Dim語句對形參數組進行說明 B.動態數組作為實參時，可用ReDim語句在過程中改變對應形參數組的維界 C.調用過程時，數組名不能作為實參 D.數組可以按地址傳遞也可以按值傳遞 25.下列關于子過程或函數的定義正確的是 (25) A.Sub fl(n As String*1) B.Sub fl(n As Integer)As Integer C.Function fl(f1 As Integer) As Integer D.Function fl(ByVal n As Integer) 26.下列關于數值常量的說法錯誤的是 (26) A.八進制數的表示方法是在數字前面加&O B.十六進制數的表示方法是在數字前面加&H C.在浮點數值中使用D來分隔尾數和指數時，系統將把該數值作為單精度型數處理 D.32768是合法的數值常量 ’ 27.下列有關對象的敘述正確的是( 27 ) A.對象由屬性、事件和方法構成 B.對象的所有屬性既可以在屬性窗口設置，又可以在程序運行時用賦值語句設置 C.對象的事件一定就是由VB預先設置好的人工干預的動作 D.對象的方法是對象響應某個事件后所執行的一段程序代碼 28.已知X<Y，A>B，則下列表達式中，結果為True的是( 28 ) A.Sgn(x-Y)+Sgn(A-B)=-1 B.Sgn(X-Y)+Sgn(A-B)=-2 C.Sgn(Y-X)+Sgn(A-B)=2 D.Sgn(Y-X)+Sgn(A-B)=0 29.下列能夠正確表示條件"x≤Y<Z"的VB邏輯表達式是 ( 29 ) A.X≤Y<Z B.X<=Y And Y<Z C.X≤Y Or Y<Z D.X<=Y<Z 30.下列有關數組的說法正確的是( 30 ) A.數組的維下界不可以是負數 B.模塊通用聲明處有Option Base 1，則模塊中數組定義語句Dim A(O To 5)會與之沖突 C.模塊通用聲明處有Option Base l，模塊中有Dim A(O To 5)，則A數組第一維維下界為0 D.模塊通用聲明處有Option Base 1，模塊中有Dim A(O To 5)，則A數組第一維維下界為1 二、填空題 ， ’ 1.執行下面的程序，單擊Commandl，則窗體上顯示的第一行是 ( 1 ) ,第三行是 ( 2 ) , 最后一行是( 3 ) Option Explicit Private Sub Command1_Click() Dim X As Integer，Y As Integer X=12:Y=0 Do While X>0 . If X Mod 4=0 Then Y=Y+X Else y=Y-X End If X=X-3 Print X，Y End Sub . ， 2.執行下面的程序,單擊Commandl，窗體上顯示的第一行是(4) ，第二行是 (5) ，第 三行是( 6 ) Option Explicit . Option Base 1 Private Sub Command1_Click() Dim sa(3，3)As String*1，i As Integer，j As Integer，k As Integer k=1 For i=1 To 3 For j=1 To 3 sa(i，j)=Chr(Asc("A")+(k+i+j) Mod 26) Print sa(i，j);" "； k=k+3 Next J 、 Next i End Sub ， 3.執行下面的程序，單擊Commandl，在窗體上顯示的變量b的值為:( 7 )，變量c的值為 ( 8 ) ，變量z的值為( 9 ) Option Explicit Private Sub Command1_Click() Dim b As Integer，C As Integer，z As Integer b=2 C=1 Z=fun(b，fun(b+1，c))+b-c+1 Print b，c，z End Sub Private Function fun(X As Integer，ByVal Y As Integer)As Integer X=X-Y y=X+Y+2 fun=Y—X End Function 4.執行下面的程序，單擊Commandl，輸出的變量i的值是( 10 ) ，變量j的值是 ( 11 ) ， 變量k的值是( 12 ) Option Explicit Private Sub Command1_Click() Dim i As Integer，j As Integer Dim k As Integer i=10 j=4 k=Funk(i,j) Print i，j，k 、 End Sub • Private Function Funk(ByVal A As Integer，B As Integer) As Integer A=A+B B=B-2 . if B=0 Or B=1 Then Funk=1 Else Funk=A+Funk(A，B) End If End Function 5.執行下面的程序，單擊Commandl，在窗體上顯示的第一行的內容是( 13 ) ，第二行的內 容是( 14 ) ，第三行的內容是( 15 ) Option Explicit Private Sub Command1_Click() Dim n As Integer，i As Integer n=2 For i=7 To 1 Step -1 Call sub2(i，n) Print i,n Next i End Sub Private Sub sub2(x As Integer，y As Integer) Static n As Integer Dim i As Integer For i=2 To 1 Step -1 n=n+x x=x-1 Next i Y=Y+n End Sub
6.用以下公式求sin(x)的值。當級數通項的絕對值小于eps=10^-7時停止計算，x的值由鍵盤 輸入。
請完善如下程序: Option Explicit Private Sub Form_Click() Dim x As Double，t As Double，n As Integer，sum As Double Const eps=0.0000001 x=Val(InputBox("請輸入x:")) ( 16 ) sum=t n=1 Do Until ( 17 ) t=一t t= ( 18 ) sum=sum+t n=n+1 Loop 、 Print "Sin(";x;")=";Format(sum,"0.000") End Sub
7.下面程序的功能是隨機生成小于100的諸素數的數組,程序界面參見下圖 Option Explicit Private Sub Command1_Click() Dim P()As Integer，i As Integer，n as integer Dim st As String，k As Integer Randomize k=InputBox("元素個數:"，，20) ReDim P(k) Do n=Int(Rnd*90)+10 if ( 19 )Then i=i+1 P(i)=n End if For i=1 To UBound(P) st=st & Str(P(i)) if i Mod 10=0 Then st=st & Vbcrlf Next i Text1=st End Sub Private Function prime(n As Integer) As Boolean Dim i As Integer prime=True For i=2 To Sqr(n) If n Mod i=0 Then ( 21 ) Exit For End If Next i End Function 8.下面程序的功能是將給定整數N表示成若干個質數因子相乘的形式(分解質因數)。程序 界面參見下圖。 Option Explicit Option Base 1 Private Sub Command1_Click() Dim n As Integer，a() As Integer Dim st As String，i As Integer n=Text1 Call fenjie(n，a) st=CStr(n) & "=" For i=1 To UBound(a)-1 st=st & a(i) & "*' Next i Text2=st & a(i) End Sub Private Sub fenjie(( 22 ) ) Dim k As Integer，i As Integer k=2 Do If n Mod k=0 Then i=i+1 . ReDim Preserve a(i) a(i)=k (23) Else ( 24 ) End If End Sub
9.本程序的功能是把由4個用"."分隔的十進制數表示的IP地址轉換為由32位二進制數組成 的IP地址。例如十進制表示的IP地址為202.119.191.1，其中每個十進制數對應一個8位的二進制數，合起來構成一個32位二進制的IP地址11001010011101111011111100000001。過程Tiqu用于提取十進制IP地址中每個用"."分割的十進制數；過程Convert用于將十進制數轉換為相應的8位二進制數。程序界面參見下圖。 Option Explicit Private Sub Command1_Click() Dim strl As String，str2 As String strl=Text1.Text Call Tiqu(strl，a) For i=1 Tn 4 If a(i)<0 Or a(i)>255 Then MsgBox("IP地址錯誤!") Exit Sub j Else ( 26 ) End If Next i Text2.Text=str2 End Sub Private Sub Tiqu(st As String，a()As Integer) Dim n As Integer，k As Integer，S As String，d As String*1，i As Integer n=Len(st):k=0:s="" For i=1 To n (27) If d="." Then k=k+1 a(k)=Val(S) ( 28 ) Else s=S & d End If、 Next i a(4)=s End Sub
Private Function convert(ByVal n As Integer)As String Dim b As Integer，i As Integer，s As String Do While n>0 ‘ b=n Mod 2 . n=n\2 ( 29 ) For i=1 To 8-Len(s) . s="0" & s Next i ( 30 ) Fnd FunCtion 2008年(春)筆試試卷 |
|