|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
 |
 |
2011年秋江蘇省計(jì)算機(jī)二級VB考試真題 |
絕密★ 啟用前 2011年秋 江蘇省高等學(xué)校非計(jì)算機(jī)專業(yè)學(xué)生 計(jì)算機(jī)基礎(chǔ)知識和應(yīng)用能力等級考試 二級試卷 試卷語種:VB語言 說 明： 1．本試卷包括計(jì)算機(jī)基礎(chǔ)知識部分和程序設(shè)計(jì)部分,考試時(shí)間共12 0分鐘； 2．本試卷滿分為60分,分選擇題和填空題,試卷不分A、B類型； 3．計(jì)算機(jī)基礎(chǔ)知識部分全部是選擇題(20分),程序設(shè)計(jì)部分分為選擇題(1 0 分)和填空題(30分)兩種； 4．選擇題用答題卡答題。每一項(xiàng)有A、B、C、D四個(gè)可供選擇的答案,請選 擇其中一個(gè)你認(rèn)為正確的答案,用HB鉛筆涂寫在答題卡的相應(yīng)答題號內(nèi)。 每選對一項(xiàng)得1分,不選或選錯(cuò)不得分； 5．填空題用答題紙答題。請將答案用藍(lán)、黑色鋼筆或圓珠筆填寫在答題紙的 相應(yīng)答題號內(nèi),每個(gè)答案只占一行,不得換行。每填對一個(gè)答案得1分, 不填或填錯(cuò)不得分； 6．請認(rèn)真填寫并仔細(xì)核對答題卡和答題紙上的學(xué)校名稱、準(zhǔn)考證號和姓名是 否填寫正確。 7．考試結(jié)束時(shí)將試卷、答題卡和答題紙放在桌上,不得帶走。待監(jiān)考人員收 畢清點(diǎn)后,方可離場。 第一部分 計(jì)算機(jī)基礎(chǔ)知識 1. 下列有關(guān)信息、信息處理、信息技術(shù)的敘述中,錯(cuò)誤的是 ___(1)___。 A.信息與物質(zhì)、能量是客觀世界的三大構(gòu)成要素 B.與信息處理相關(guān)的行為和活動(dòng)主要指信息的分類、計(jì)算、分析等,但不包含信息的收集和傳遞 C.現(xiàn)代信息技術(shù)的主要特征之一是以數(shù)字技術(shù)為基礎(chǔ) D.計(jì)算機(jī)技術(shù)、通信技術(shù)均屬于信息技術(shù) 2. 下列有關(guān)數(shù)字技術(shù)與微電子技術(shù)的敘述中,錯(cuò)誤的是___(2)___ A.數(shù)字技術(shù)是采用有限個(gè)狀態(tài)(主要是兩個(gè)狀態(tài))來表示、處理、存儲和傳輸信息的技術(shù) B.比特是信息的基本單位,1個(gè)比特可以表示8位二進(jìn)制數(shù) C.集成電路芯片是微電子技術(shù)的結(jié)晶,是現(xiàn)代信息產(chǎn)業(yè)的基礎(chǔ) D.Moore定律是指"單塊集成電路的集成度平均每18-24個(gè)月翻一番" 3. 下列有關(guān)計(jì)算機(jī)發(fā)展與分類的敘述中,錯(cuò)誤的是___(3)___。 A.數(shù)字電子計(jì)算機(jī)誕生于20世紀(jì)40年代,個(gè)人計(jì)算機(jī)(微型計(jì)算機(jī))產(chǎn)生子20世紀(jì)80年代初 B.第4代計(jì)算機(jī)的CPU主要采用中小規(guī)模集成電路,第5代計(jì)算機(jī)采用超大規(guī)模集成電路 C.計(jì)算機(jī)分類有多種方法,按其內(nèi)部邏輯結(jié)構(gòu)通常分為16位機(jī)、32位機(jī)或64位機(jī)等,目前使用的PC機(jī)大多是32位機(jī)或64位機(jī) D.巨型計(jì)算機(jī)一般采用大規(guī)模并行處理的體系結(jié)構(gòu),我國國防科技大學(xué)研制的"天 河1號,,巨型計(jì)算機(jī),其性能可在全球巨型機(jī)排行榜中位居前10名 4. 下列有關(guān)PC機(jī)微處理器的敘述中,錯(cuò)誤的是___(4)___ A.目前PC機(jī)所用的各種微處理器均由Intel公司設(shè)計(jì)和生產(chǎn) B.微處理器通常由單片集成電路制成 C.一臺高性能PC機(jī)中通常包含多個(gè)微處理器 D.臺式PC機(jī)與筆記本PC機(jī)采用的微處理器通常有所不同 5. 下列有關(guān)PC機(jī)主板與芯片組的敘述中,錯(cuò)誤的是 ___(5)___。 A.臺式PC機(jī)主板的物理尺寸已經(jīng)標(biāo)準(zhǔn)化 B.有些主板將聲卡、網(wǎng)卡、顯卡的功能均集成在其中 C.芯片組是PC機(jī)各組成部分相互連接和通信的樞紐,它們與CPU芯片以及IO接 口同步發(fā)展 D.PC機(jī)主板上可安裝的內(nèi)存條類型及內(nèi)存最大容量與芯片組無關(guān) 6. 下列是PC機(jī)常用的四種外設(shè)接口,其中適用于連接硬盤和光驅(qū)的是___(6)___ A.RS-232 B.SATA C.IEEE-1394 D.VGA 7. 下列有關(guān)顯示器、顯示卡、打印機(jī)的敘述中,錯(cuò)誤的是___(7)___ 。 A.目前常見的"寬屏"LCD顯示器,其屏幕的寬度與高度之比為4:3 B.對于集成顯卡來說,顯卡的功能主要是由主板上的芯片組來實(shí)現(xiàn) C.無論是針式打印機(jī),還是激光/噴墨打印機(jī),均有黑白打印機(jī)與彩色打印機(jī)之分 D.打印機(jī)的主要性能指標(biāo)之一是打印速度,其單位為PPM 8. 下列有關(guān)光盤存儲器的敘述中,錯(cuò)誤的是 ___(8)___ A.DVD光盤刻錄機(jī)可以刻錄的光盤有CD-R、CD-RW、DVD-R和DVD-RW等類型 B.組合光驅(qū)("康寶")組合了CD刻錄機(jī)與DVD刻錄機(jī)的功能 C.藍(lán)光光驅(qū)(BD)使用藍(lán)色激光在光盤上讀寫信息 D.光盤刻錄機(jī)的讀/寫速度通常是不同的,一般來說讀取信息的速度快于刻錄的速度 9. 按照軟件著作權(quán)益的處置方式,軟件可以分為商品軟件、共享軟件、自由軟件等類型• 在下列相關(guān)敘述中,錯(cuò)誤的是___(9)___。 A.商品軟件需要用戶付費(fèi)才能得到其使用權(quán) B.共享軟件是具有版權(quán)的軟件,允許用戶有條件的使用 C.自由軟件允許使用者隨意拷貝、傳播,允許修改其源代碼但必須公開修改內(nèi)容 D.共享軟件、自由軟件均屬于免費(fèi)軟件 10.下列有關(guān)Windows操作系統(tǒng)的敘述中,錯(cuò)誤的是___(10)___ 。 A.Windows XP和Windows 7均分為32位版本和64位版本 B.一般來說,能安裝Windows 7的PC機(jī)也能安裝Windows XP C.無論是Windows XP還是Windows 7,其家庭版(基本版)均不支持多核處理器 D.目前來看,Windows比UNIX更容易受到病毒的侵?jǐn)_ 11.在下列有關(guān)算法的敘述中,錯(cuò)誤的是___(11)___。 A.通俗地說,算法就是解決問題的方法和步驟 B.算法總是在執(zhí)行了有限步的操作后終止 C.程序是算法的實(shí)現(xiàn),程序與算法是一一對應(yīng)的 D.算法解決的往往是一類問題而不是一個(gè)特定的問題 12.下列有關(guān)Microsoft Office 2000(及其后續(xù)版本)的敘述中,錯(cuò)誤的是___(12)___ • A.由Word創(chuàng)建的文檔,用戶可以直接將其保存為HTML文件(即網(wǎng)頁) B.在Excel中用戶可以直接打開一些數(shù)據(jù)庫中的表文件(例如DBF文件) C.在FrontPage的"代碼"視圖中,用戶可以直接對HTML網(wǎng)頁進(jìn)行編輯 D.在Access數(shù)據(jù)庫中每個(gè)表可以有多個(gè)主鍵 13.下列是與通信傳輸介質(zhì)相關(guān)的敘述,其中錯(cuò)誤的是___(13)___。 A.目前家用的電話線屬于五類雙絞線 B.目前入戶的有線電視電纜屬于寬帶同軸電纜 C.光纖是光導(dǎo)纖維的簡稱,光纖的纖芯是細(xì)石英玻璃絲 D.微波是一種電磁波,它具有類似光波的特性,在空間主要是直線傳播 14.因特網(wǎng)中的IP地址可以分為A類、B類、C類、D類等。在下列4個(gè)IP地址中,屬 于C類地址的是___(14)___ 。 A.28.129.200.19 B.88.129.200.19 C.188.129.200.19 D.222.129.200.19 15.在下列有關(guān)IP地址與域名的敘述中,錯(cuò)誤的是___(15)___ • A.目前使用的IP協(xié)議主要是IPv4協(xié)議,其IP地址長度為32位 B.因特網(wǎng)是多個(gè)網(wǎng)絡(luò)互聯(lián)而成的,不同網(wǎng)絡(luò)中的主機(jī)可以具有相同的IP地址 C.域名是IP地址的文字表述形式,但不是所有的IP地址均有相應(yīng)的域名 D.一個(gè)IP地址可以有多個(gè)對應(yīng)的域名 16.通常所說的TCP/IP協(xié)議,是指由100多個(gè)協(xié)議組成的協(xié)議系列(包含下列幾個(gè)協(xié)議)• 在下列協(xié)議中,發(fā)送電子郵件主要依賴___(16)___. A.HTTP協(xié)議 B.FTP協(xié)議 C.Telnet協(xié)議 D.SMTP協(xié)議 17.下列有關(guān)采用ADSL技術(shù)接入因特網(wǎng)的敘述中,錯(cuò)誤的是___(17)___ A.計(jì)算機(jī)中需要安裝(集成)以太網(wǎng)網(wǎng)卡 B.需要使用專用的ADSL MODEM設(shè)備 C.上行與下行傳輸速率相同,傳輸速率可達(dá)100Mbps D.可傳送數(shù)據(jù)、音頻、視頻等信息 18.下列有關(guān)漢字字符集及其編碼的敘述中,錯(cuò)誤的是___(18)___ • A.GB2312是我國頒布的第一個(gè)漢字編碼國家標(biāo)準(zhǔn),該標(biāo)準(zhǔn)包含了6000多個(gè)漢字 B.GB2312的所有字符在計(jì)算機(jī)內(nèi)都采用2個(gè)字節(jié)來表示 C.GBK收錄了包括繁體字在內(nèi)的20000多個(gè)漢字和符號,它向下兼容GB2312 D.GB18030是我國最新頒布的漢字編碼標(biāo)準(zhǔn),它與GB2312和GBK均不兼容 19.語音在數(shù)字化時(shí)常用的取樣頻率為8kHz、量化位數(shù)為8bits。若聲道數(shù)為2,則每分鐘 的數(shù)字語音數(shù)據(jù)量在未壓縮時(shí)大約為 ___(19)___ A.64KB B.128KB C.1MB D.2MB 20.數(shù)字圖像文件有多種文件類型,不同類型的文件各有其特點(diǎn)。在下列4種文件類型中, 能夠?qū)⒍鄰垐D片保存在一個(gè)文件中且能產(chǎn)生動(dòng)畫效果的是___(20)___ A.BMP B.JPG C.GIF D. PNG 第二部分 Visual Basic程序設(shè)計(jì) 一、選擇題(用答題卡答題,答案依次填在21～30答題號內(nèi)) 21.VB應(yīng)用程序設(shè)計(jì)的一般步驟是___(21)___。 A.分析-->設(shè)計(jì)-->界面-->編碼-->測試 B.界面-->設(shè)計(jì)-->編碼-->分析-->文檔 C.分析-->界面-->編碼-->設(shè)計(jì)-->測試 D.界面-->編碼-->測試-->分析-->文檔 22.若在程序運(yùn)行時(shí),需要將焦點(diǎn)主動(dòng)設(shè)置到指定的對象上,應(yīng)調(diào)用該對象的___(22)___方法。 A.Move B.SetFocus C.Refresh D.Drag 23.窗體通用聲明部分的"Option Base 1"語句,決定本窗體中數(shù)組下標(biāo)___(23)___。 A.維下界必須為1 B.缺省的維下界為1 C.維下界不能為0 D.缺省的維下界為0 24.Select Case X結(jié)構(gòu)中(X為Integer類型),如果判斷條件為X=5,正確的Case語句應(yīng)該是 至___(24)___ 。 A.Case X=5 B.Case Is 25.表達(dá)式3*5^2 Mod 23\3的值是___(25)___。 A.2 B 26.數(shù)學(xué)表達(dá)式 對應(yīng)的VB表達(dá)式是___(26)___。 A.a*b/(Sqr(c*d)*e^x*Log(y)) B.a*b/(Sqr(c*d)*Exp(x)*Log(y)) C.a*b/(Sqr(c*d)*Exp(x)*Log(y)/Log(10)) D.a+b/(Sqr(c*d)*e^x*Log(y)/Log(10)) 27.以下說法中錯(cuò)誤的是___(27)___ 。 A.在過程中用Dim、Static聲明的變量都是局部變量 B.執(zhí)行過程時(shí),給所有局部變量分配內(nèi)存并進(jìn)行初始化;過程執(zhí)行結(jié)束,釋放它們所占的內(nèi)存 C.局部變量可與模塊級或全局變量同名,且在過程中,其優(yōu)先級高于同名的模塊級或全局變量 D.在模塊通用聲明部分,可使用Dim聲明模塊級變量或數(shù)組 28.以下有關(guān)數(shù)組的說法中,錯(cuò)誤的是___(28)___。 A.定義固定大小數(shù)組時(shí),維界定義中不可以包含變量 B.可以使用常數(shù)表達(dá)式或已經(jīng)定義過的符號常數(shù)說明數(shù)組的維界 C.定長字符串類型的數(shù)組不可以作為過程的形式參數(shù) D.只能在標(biāo)準(zhǔn)模塊中用Public語句定義一個(gè)全局?jǐn)?shù)組 29.下面有關(guān)自定義過程的說法中,錯(cuò)誤的是___(29)___ 。 A.可以用Call語句調(diào)用自定義函數(shù),也可以用函數(shù)名直接調(diào)用自定義函數(shù) B.可以定義沒有形式參數(shù)的Sub過程和Function過程 C.調(diào)用過程時(shí),可以用常數(shù)或表達(dá)式作為實(shí)在參數(shù)與被調(diào)過程的按地址傳遞的形參結(jié)合 D.主調(diào)程序與被調(diào)用的函數(shù)過程之間,只能依靠函數(shù)名把被調(diào)過程的處理結(jié)果傳遞給主調(diào)程序 30.以下關(guān)于MsgBox函數(shù)的說法中,正確的是___(30)___ 。 A.MsgBox函數(shù)有返回值,且返回值類型為數(shù)值型 B.MsgBox函數(shù)沒有返回值 C.MsgBox函數(shù)有返回值,且返回值類型為字符型 D.通過MsgBox函數(shù)中的第一個(gè)參數(shù),可以設(shè)置信息框中的圖標(biāo)以及按鈕的個(gè)數(shù)與類型 二、填空題(請將答案填寫在答題紙的相應(yīng)答題號內(nèi),每個(gè)答案只占一行) 1.執(zhí)行下面程序,單擊命令按鈕Command1,窗體上顯示的第一行內(nèi)容是___(1)___,第二行內(nèi) 容是___(2)___,第三行內(nèi)容是___(3)___ Option Explicit Private Sub Command1_Click() Dim a As Integer, b As Integer, i As Integer a = 1 b = 5 For i = b To a Step -1 a = a + i b = b + a If b > 30 Then Exit For Print a, b Next i Print a, b End Sub 2.執(zhí)行下面程序,單擊命令按鈕Command1,最終A(2,2)的值是___(4)___,A(3,1)的值是 ___(5)___,A(4,2)的值是___(6)___。 Option Explicit Option Base 1 Private Sub Commandl_Ciick() Dim A(4,4)As Integer,i As Integer,j As Integer,k As Integer For i=1 To 4 For j=1 To 4 k=k+1 A(i,j)=k Next j Next i Call Transform(A) For i=1 To 4 For j=l To 4 Text1=Text1 & Right(" " & A(i,j),3) Next j Text1=Text1 & vbCrLf Nexti End Sub Private Sub Transform(A() As Integer) Dim i As Integer,j As Integer,n As Intege,t As Integer,k As Integer n=UBound(A,1) k=n+1 For i=1 To n/2 For j=1 To n If i<>j And j<>k-i Then t=A(i,j) A(i,j)=A(k-i,k-j) A(k-i,k-j)=t End If Next j Next i End Sub 3.執(zhí)行下面程序,單擊命令按鈕Cmd1后,窗體上顯示的第一行內(nèi)容是___(7)___,第二行內(nèi)容 是___(8)___,第三行內(nèi)容是___(9)___。 Option Explicit Private Sub Cmd1_Click() Dim st As String,ch As String*1,t As Integer Dim i As Integer st="2,3,8,12,32,65#" For i=1 To Len(st) ch=Mid(st,i,1) If ch<>"," And ch<>"#" Then t=t*10+Val(ch) Else If pd(t) Then Print t t=0 End If Next i End Sub Private Function pd(ByVal n As Integer)As Boolean Do While n<>1 If n Mod 2<>0 Then Exit Function EndIf n=n\2 pd=True End Function 4.執(zhí)行下面程序,單擊命令按鈕CmdRun后,圖片框Pic1第一行顯示內(nèi)容是___(10)___,第二 行顯示內(nèi)容是___(11)___,最后一行顯示內(nèi)容是___(12)___。 Option Explicit Private Sub CmdRun_Click() Dim N As Integer,M As Integer M=135 N=8 Pic1.Print Fun(M,N) EndSub Private Function Fun(ByVal N As Integer,ByVal R As Integer)As String Dim L As Integer If N Fun=N Else L=N\R Fun=Fun(L,R) Fun=Fun & N Mod R End If Pic1.Print N End Function 5.執(zhí)行下面程序,單擊命令按鈕CmdRun后,文本框Text1中第一行顯示的內(nèi)容是___(13)___ , 第二行顯示的內(nèi)容是___(14)___。第三行顯示的內(nèi)容是___(15)___ 。 Option Explicit Private Sub CmdRun_Click() Dim S As String,Subs As String,P As Integer S="100101 010110 110101" Do P=InStr(S," ") If P<>0 Then Subs=Left(S,P-1) Else Subs=S End If S=Mid(S,P+1) Text1=Text1 & Complement(Subs) & vbCrLf Loop Until Len(S)=0 Or P=0 End Sub Private Function Complement(S As String)As Integer Dim P As Integer,L As Integer L=Len(S) If Left(S,1)=1 Then Complement=-32 End If P=1 Do Until P=0 P=InStr(P+1,S,"1") If P<>0 Then Complement=Complement+2^(L-P) End If End Function 6.本程序的功能是按公式求S的近似值(計(jì)算到第n項(xiàng)的絕對值小于等于10^-7為止)。 S=x- 請完善本程序。 Option Explicit Private Sub Command1_Click() Dim x As Single,n As Single,T As Single,S As Single x=Val(Text1) S=x Do ___(16)___ T=afun(x,n) S=S+T Loop Until ___(17)___ Text2=Format(S,"0.#######") End SUb Private Function afun(x As Single,n As Single)As Single Dim i As Single,p As Single P=1 For i=1 To n p= ___(18)___ Next i afun=(-1)^n*p*x^(2*n+1)/(2*n+1) End Function 7.本程序的功能是找出10到60之間所有不可以表示成兩個(gè)平方數(shù)之和的數(shù),請完善本程序• Option Explicit Private Sub CmdFind_Click() Dim i As Integer,j As Integer,k As Integer Dim p As Integer,q As Integer For i=10 To 60 For j=1 To Int(Sqr(i)) ___(19)___ q=i-P If q<>0 And judge(q) Then Exit For Next j If ___(20)___ Then k=k+1 Text1.Text=Text1.Text & i & " " If k Mod 5=0 Then Text1.Text=Text1.Text & vbCrlf End If Next i EndSub Public Function judge(ByVal x As Integer)As Boolean If ___(21)___ Then judge=True Else judge=False End If End Function 8.本程序的功能是:找出所有滿足各位數(shù)字之和正好是其所有質(zhì)因子之和的三位數(shù)。例如378,其各 位數(shù)字之和為18,而其質(zhì)因子2,3,3,3,7之和也是18,所以378是滿足條件的數(shù)。 Option Explicit Private Sub CmdFind_Click() Dim i As Integer,p As String,st As String,st1 As String For i=100 To 999 ___(22)___ If csum(i)=zyz(i,st) Then p=CStr(i) st1=Left(p,1) & "+" & Mid(p,2,1) & "+" & Right(p,1) List1.AddItem i & ": " & st1 & "=" & Left(st,Len(st)-1) End If Next i If List1.ListCount=0 Then List1.AddItem "無滿足要求的數(shù)!" End If End Sub Private Function csum(m As Integer)As Integer '求各位數(shù)字之和 Dim i As Integer,p As String p=CStr(m) For i=1 To Len(p) ___(23)___ Next i End Function Private Function zyz(ByVal m As Integer,st As String)As Integer '求所有質(zhì)因子之和 Dim i As Integer i=2 Do If m Mod i=0 Then zyz=zyz+i st=st & i & "+" m=m\i EIse ___(24)___ End If Loop Until ___(25)___ End Function 9.本程序的功能是,按"年/月/日"格式輸入日期,計(jì)算出該日期是該年份中的第幾天,過程leap_year 用于判斷該年份是否為閏年(能被4整除且不能被100整除或能被400整除的年份為閏年)。 Private Sub Commandl_Click() Dim st As String,rq(3)As Integeb k As Integer,d As Integer Dim p As String*1,q As String,i As Integer,dt As Integer st=Trim(Text1) i=1 Do p=Mid(st,i,1) If p<>"/" Then q=q & p Else k=k+1 rq(k)=Val(q) ___(26)___ End If i=___(27)___ Loop Until i>Len(st) k=k+1 rq(k)=q For i=___(28)___ To 1 Step -1 Select Case i Case 1,3,5,7,8,10 dt=31 Case 2 If leap_year(rq(1))Then dt=29 Else dt=28 End If Case Else dt=30 End Select d= ___(29)___ Next i Text2=d+rq(3) End Sub Private Function leap_year(n As Integer)As Boolean If ___(30)___ Then leap_year=True ElseIf n Mod 400=0 Then leap_year=True End If End Function 2011年秋季( (1)B (2)B (3)B (4)A (5)D (6)B(7)A (8)B (9)D (10)C (11)C(12)D (13)A (14)D (15)B(16)D (17)C (18)D (19)C (20)C (21)A (22)B (23)B (24)C (25)B (26)B (27)B (28)C (29)D (30)A 二、填空題 (1)6 11 (2)10 21 (3)13 34(4)6 (5)8 (6)3 (7)2 (8)8 (9)32 (10)2 (11)16 (12)207(13)-27 (14)22 (15)-11(16)n=n+1 (17)abs(t)<=1e-7 (18)p*(2*i-1)/(2*i) (19)p=j*j (20)j=int(sqr(i))+1 或j>int(sqr(i))(21)int(sqr(x))=sqr(x) (22)st="" (23)csum=csum+val(mid(p,i,1))(24)i=i+1 (25)m=1(26)q="" (27)i+1 (28)rq(2)-1 (29)d+dt (30)n mod 4=0 and n mod 100<>0
|