全國(guó)計(jì)算機(jī)等級(jí)考試二級(jí)筆試試卷Visual-Basic語(yǔ)言程序設(shè)計(jì)

1、2005年9月全國(guó)計(jì)算機(jī)等級(jí)考試二級(jí)筆試試卷VisualBasic語(yǔ)言程序設(shè)計(jì)一、選擇題以下各題A）、B）、C）、D）四個(gè)選項(xiàng)中，只有一個(gè)選項(xiàng)是正確的。下而表達(dá)正確的選項(xiàng)是。A）程序設(shè)計(jì)就是編制程序B）程序的測(cè)試必須由程序員自己去完成C）程序經(jīng)調(diào)試改錯(cuò)后還應(yīng)進(jìn)行再測(cè)試D）程序經(jīng)調(diào)試改錯(cuò)后不必進(jìn)行再測(cè)試（2）以下數(shù)據(jù)結(jié)構(gòu)中，能用二分法進(jìn)行查找的是。A）順序存儲(chǔ)的有序線性表B）線性鏈表C）二叉鏈表D）有序線性鏈表（3）以下關(guān)于棧的描述正確的選項(xiàng)是oA）在棧中只能插入元素而不能刪除元素B）在棧中只能刪除元素而不能插入元素C）棧是特殊的線性表，只能在一端插入或刪除元素D）棧是特殊的線性表，只能在一端插

2、入元素，而在另一端刪除元素（4）以下表達(dá)中正確的選項(xiàng)是oA）一個(gè)邏輯數(shù)據(jù)結(jié)構(gòu)只能有一種存儲(chǔ)結(jié)構(gòu)B）數(shù)據(jù)的邏輯結(jié)構(gòu)屬于線性結(jié)構(gòu)，存儲(chǔ)結(jié)構(gòu)屬于非線性結(jié)構(gòu)C）一個(gè)邏輯數(shù)據(jù)結(jié)構(gòu)可以有多種存儲(chǔ)結(jié)構(gòu)，且各種存儲(chǔ)結(jié)構(gòu)不影響數(shù)據(jù)處理的效率D）一個(gè)邏輯數(shù)據(jù)結(jié)構(gòu)可以有多種存儲(chǔ)結(jié)構(gòu)，且各種存儲(chǔ)結(jié)構(gòu)影響數(shù)據(jù)處理的效率（5）以下描述中正確的選項(xiàng)是oA）軟件工程只是解決軟件工程的管理問題B）軟件工程主要解決軟件產(chǎn)品的生產(chǎn)率問題C）軟件工程的主要思想是強(qiáng)調(diào)在軟件開發(fā)過程中需要應(yīng)用工程化原那么D）軟件工程只是解決軟件開發(fā)中的技術(shù)問題（6）在軟件設(shè)計(jì)中，不屬于過程設(shè)計(jì)工具的是oA）PDL（過程設(shè)計(jì)語(yǔ)言）B）PAD圖ON-S圖D

3、）DFD圖（7）以下表達(dá)中正確的選項(xiàng)是oA）軟件交付使用后還需要進(jìn)行維護(hù)B）軟件一旦交付使用就不需要再進(jìn)行維護(hù)C）軟件交付使用后其生命周期就結(jié)束D）軟件維護(hù)是指修復(fù)程序中被破壞的指令（8）數(shù)據(jù)庫(kù)設(shè)計(jì)的根本目標(biāo)是要解決oA）數(shù)據(jù)共享問題B）數(shù)據(jù)平安問題C）大量數(shù)據(jù)存儲(chǔ)問題D）簡(jiǎn)化數(shù)據(jù)維護(hù)（9）設(shè)有如下關(guān)系表。那么以下操作中，正確的選項(xiàng)是。A)T=RnsB)T=RUSC)T=RXSD)T=R/S(10)數(shù)據(jù)庫(kù)系統(tǒng)的核心是。A)數(shù)據(jù)模型B)數(shù)據(jù)庫(kù)管理系統(tǒng)C)數(shù)據(jù)庫(kù)D)數(shù)據(jù)庫(kù)管理員(11)假定一個(gè)VisualBasic應(yīng)用程序由一個(gè)窗體模塊和一個(gè)標(biāo)準(zhǔn)模塊構(gòu)成。為了保存該應(yīng)用程序，以下正確的操作是0A)

4、只保存窗體模塊文件B)分別保存窗體模塊、標(biāo)準(zhǔn)模塊和工程文件C)只保存窗體模塊和標(biāo)準(zhǔn)模塊文件D)只保存工程文件(12)為了去除窗體上的一個(gè)控件，以下正確的操作是.A)按回車鍵B)按Esc鍵c)選擇(單擊)要去除的控件，然后按Del鍵D)選擇(單擊)要去除的控件，然后按回車鍵(13)以下表達(dá)中錯(cuò)誤的選項(xiàng)是oA)翻開一個(gè)工程文件時(shí)，系統(tǒng)自動(dòng)裝入與該工程有關(guān)的窗體、標(biāo)準(zhǔn)模塊等文件B)當(dāng)程序運(yùn)行時(shí)，雙擊一個(gè)窗體，那么觸發(fā)該窗體的DblClick事件C)VisualBasic應(yīng)用程序只能以解釋方式執(zhí)行D)事件可以由用戶引發(fā)，也可以由系統(tǒng)引發(fā)(14)設(shè)a=2,b=3,c=4»d=5,以卜-表達(dá)式的

5、值是。Nota<=cOr4*c=bA2Andb<>a+cA)-lB)1C)TrueD)False(15)設(shè)a=5.b=10,那么執(zhí)行c=Iht(b-A)*Rnd+A)+l后，c值的范圍為。A)510B)69C)6-10D)59(16)在窗體上畫一個(gè)命令按鈕，名稱為Command1,然后編寫如下事件過程：PrivateSubCommandl_Click()aS="softwareandhardware"bS=Right(a$,8)cS=Mid(a$,1.8)MsgBoxa$,b$,c%,1EndSub運(yùn)行程序，單擊命令按鈕，那么在彈出的信息框的標(biāo)題欄中顯示的

6、是。A)softwareandhardwareB)softwarcC)hardwareD)1(17)在窗體上畫一個(gè)命令按鈕和一個(gè)文本框，其名稱分別為Command1和Tex”,把文本框的Text屬性設(shè)置為空白，然后編寫如下事件過程：PrivateSubCommandl_Click()a=InpulBox("Enteraninteger")b=InputBox("Enteraninteger")Text1.Text=b+aEndSub程序運(yùn)行后，單擊命令按鈕，如果在輸入對(duì)話框中分別輸入8和10,那么文本框中顯示的內(nèi)容是。A)108B)18C)810D)出錯(cuò)

7、(18)在窗體上畫兩個(gè)文本框，其名稱分別為Textl和Text2,然后編寫如下程序：PrivateSubForm_Load()ShowTextl.Text=HMText2.Text=,MTextl.SetFocusEndSubPrivateSubTextl_Change()Text2.Text=Mid(Textl.Text,8)EndSub程序運(yùn)行后，如果在文本框Textl中輸入BcijingChina,那么在文本框Text2顯示的內(nèi)容是。A)BcijingChinaB)ChimaC)BeijingD)BeijingC(19)在窗體上畫一個(gè)列表框和一個(gè)命令按鈕，其名稱分別為L(zhǎng)is”和Comma

8、ndl,然后編寫如下事件過程PrivateSubForm_Load()Listl.AddltemItemr,Listl.AddltemHItem2,'Listl.AddltemuItem3MEndSubPrivateSubCommandl_click()List1.List(Listl.ListCount)=HAAAAHEndSub程序運(yùn)行后，單擊命令按鈕，其結(jié)果為。A)把字符串“AAAA”添加到列表框中，但位置不能確定B)把字符串“AAAA人"添加到列表框的最后(即的后面)C)把列表框中原有的最后一項(xiàng)改為“AAAA"D)把字符串“AAAA”插入到列表框的最前而(即

9、“Iteml"的前面)(20)假定有如下事件過程：PrivateSubForm_Cilck()DimxAsInteger,nAsIntegerx=ln=0DoWhilex<28X=X*3n=n+lLoopPrintx.nEndSub程序運(yùn)行后，單擊窗體，輸出結(jié)果為OA)814B)563C)281D)2435(21)有如下程序：PtivateSubForm_Click()DimCheck,CounterCbeck=TrueCounter=0DoDoWhileCounter<20Counter=Counter+lIfCounter=10ThenCheck=FalseExitD

10、oEndIfLoopLoopUntilCheck=FalsePrintCounter,CheckEndSub程序運(yùn)行后，單擊窗體，輸出結(jié)果為OA)150B)20-1C)10TnieD)10False(22)有如下程序：PrivateSubForm_CHck()DimiAsInteger>sumAsIntegersum=0Fori=2TO10IfMod2<>AndiMod3=0Thensum=suni+iEndIfNextiPrintsumEndSub程序運(yùn)行后，單擊窗體，輸出結(jié)果為OA)12B)30C)24D)18(23)在窗體上畫一個(gè)名稱為Textl的文本框和一個(gè)名稱為Co

11、mmand1的命令按鈕，然后編寫.如下事件過程：PrivateSubCommandl_Click()Dimarrayl(10<10)AsIntegerDimiAsInteger,jAsIntegerFori=lTo3Forj=2To4arrayl(ij)=i+jNextjNextiTextl.Text=arrayl(2,3)+arrayl(3>4)EndSub程序運(yùn)行后，單擊命令按鈕，在文本框中顯示的值是OA)12B)13C)14D)15(24)在窗體上畫一個(gè)命令按鈕，其名稱為Command1,然后編寫如下事件過程：PrivateSubCommandl_Click()Dima1(4

12、,4)a2(4,4)DimiAsInteger,jAsIntegerFori=lTo4Forj=lTo4al(Lj)=i+ja2(ij)=al(ij)+i+jNextjNextiPrintal(3,3)；a2(33)EndSub程序運(yùn)行后，單擊命令按鈕，在窗體上輸出的是。A)66B)105C)721D)612(25)有如下程序：OptionBase1PrivateSubForm_Click()DimarrtSumSum=0alt=Array(L3,5,7,9,11,13,15,17,19)Fori=lTo10Ifarr(i)/3=arr(i)13ThenSum=Sum+alt(I)EndIfN

13、extiPrintSumEndSub程序運(yùn)行后，單擊窗體，輸出結(jié)果為OA)25B)26C)27D)28(26)在窗體畫一個(gè)命令按鈕，然后編寫如下事件過程：PrivateSubCommandl_CIick()Dima(5)AsStringFori=lTo5a(r)=Chr(Asc(HAM)+(i-1)NextiForEachbInaPrintb；NextEndSub程序運(yùn)行后，單擊命令按鈕，輸出結(jié)果是。A)ABCDEB)12345C)abcdeD)出錯(cuò)信息(27)以下關(guān)于函數(shù)過程的表達(dá)中，正確的選項(xiàng)是0A)如果不指明函數(shù)過程參數(shù)的類型，那么該參數(shù)沒有數(shù)據(jù)類型B)函數(shù)過程的返回值可以有多個(gè)。當(dāng)數(shù)組

14、作為函數(shù)過程的參數(shù)時(shí)，既能以傳值方式傳遞，也能以引用方式傳遞D)函數(shù)過程形參的類型與函數(shù)返回值的類型沒有關(guān)系(28)函數(shù)過程n的功能是：如果參數(shù)b為奇數(shù)，那么返回值為1,否那么返回值為0c以下能正確實(shí)現(xiàn)上述功能的代碼的是。A)FunctionFl(bAsInteger)IfbMod2=0ThenReturn0ElseReturn1EndIfEndFunctionB)FunctionFl(bAsInteger)IfbMod2=0ThenFl=0ElseFl=lEndIfEndFunctionC)FunctionFl(bAsInteger)IfbMod2=0ThenFl=lElseFl=0EndI

15、fEndFunctionD)Functionn(bAsInteger)IfbMod2<>0ThenReturn0ElseReturn1EndIfEndFunction(29)以下關(guān)于KeyPress事件過程中參數(shù)KeyAscii的表達(dá)中，正確的選項(xiàng)是。A)KeyAscii參數(shù)是所按鍵的ASCII碼BjKeyAscii參數(shù)的數(shù)據(jù)類型為字符串C)KeyAscii參數(shù)可以省略D)KeyAscii參數(shù)是所按鍵上標(biāo)注的字符(30)設(shè)窗體上有一個(gè)名為Textl的文本框，并編寫如下程序：PrivateSubForm_Load()ShowTextl.Text=HMTextl.SetFocusEnd

16、SubPrivateSubForm_MouseUp(ButtonAsInteger,ShiftAsIntegertXAsSingle,YAsSingle)Print”程序設(shè)計(jì)”EndSubPrivateSubText1_KcyDown(KeyCodeAsIntegerShiftAsInteger)PrinfVisualBasic"：EndSub程序運(yùn)行后，如果在文本框中輸入字母"a”,然后單擊窗體，那么在窗體上顯示的內(nèi)容是。A)VisualBasicB)程序設(shè)計(jì)C)VisualBasic程序設(shè)計(jì)D)a程序設(shè)計(jì)(31)假定有下表所列的菜單結(jié)構(gòu)：俵格)要求程序運(yùn)行后，如果單擊菜

17、單項(xiàng)“大圖標(biāo)”，那么在該菜單項(xiàng)前添加一個(gè)"J”。以下正確的事件過程是。A)PrivateSubbigicon_Click()bigicon.Checked=FalseEndSubB)PrivateSubbigicon_ClickOMe.appear.bigicon.Checked=TrueEndSubC)PrivateSubbigicon_Click()bigicon.Checked=TrueEndSubD)PrivateSubbigicon_ClickOappear.bigicon.Checkcd=TrueEndSub(32)假定通用對(duì)話框的名稱為ConunonDialogl,命令

18、按鈕的名稱為Command1那么單擊命令按鈕后，能使翻開的對(duì)話框的標(biāo)題為“NewTitle"的事件過程是。A)PrivateSubCommandl_Click()CommonDialog1.DialogTitle=HNewTitleHCommonDialog1.ShowPrinterEndSubB)PrivateSubCommandl_Click()CommonDialog1.DialogTitle=HNewTitleMCommonDialogl.ShowFontEndSubC)PrivateSubCommslld1_CUck()CommonDialog1.DialogTifie=,

19、lNewTitleHCommonDialog1.ShowOpenEndSubD)PrivateSubCommandl_Click()CommonDialogl.DialogTitle"NewTitle"CommonDialogl.ShowColorEndSub(33)如果一個(gè)工程含有多個(gè)窗體及標(biāo)準(zhǔn)模塊，那么以下表達(dá)中錯(cuò)誤的選項(xiàng)是oA)任何時(shí)刻最多只有一個(gè)窗體是活動(dòng)窗體B）不能把標(biāo)準(zhǔn)模塊設(shè)置成啟動(dòng)模塊C）用Hide方法只是隱版一個(gè)窗體，不能從內(nèi)存中去除該窗體D）如果工程中含有SubMain過程，那么程序一定首先執(zhí)行該過程（34）假定在工程文件中有一個(gè)標(biāo)準(zhǔn)模塊，其中定義了如下記

20、錄類型DpeBooksNameAsString*10TelNumAsString*20EndType要求當(dāng)執(zhí)行事件過程Command】.Click時(shí)，在順序文件Person.txt中寫入一條記錄。以下能夠完成該操作的事件過程是：A）PtivateSubCommandl_Click（）DimBAsBooksOpenMc:Person.txtHForOutputAs#lB.Name=InputBox（"輸入”）B.TelNum=InputBox（"輸入號(hào)碼”）Write#LB.Name,B.TelNumClose#lEndSubB）PrivateSubCommandl_CIic

21、k（）DimBAsBooksOpen°c:Person.txtHForInputAs#lB.Nanie=InputBox（“輸入”）B.TelNum=InputBox（"輸入號(hào)碼”）Print#l,B.Name,B.TelNumClose#1EndSubC）PrivateSubCommandl_Click（）DimBAsBooksOPQlHc:Person.txtnForOutputAs#lNallle=InputBox（"輸入“）TelNum=InputBox（"輸入號(hào)碼”）Write#I.BClose#1EndSubD）PrivateSubComma

22、ndl_Click（）DimBAsBooksOpenHc:Person.txtHForInputAs#lName=InputBox（"輸入“）TelNum=InputBox（"輸入號(hào)碼”）Write#hB.Name,B.TelNumClose#1EndSub（35）目錄列表框的Path屬性的作用是0A）顯示當(dāng)前驅(qū)動(dòng)器或指定驅(qū)動(dòng)器上的某目錄下的文件名B)顯示當(dāng)前驅(qū)動(dòng)器或指定驅(qū)動(dòng)器上的目錄結(jié)構(gòu)C)顯示根目錄下的文件名D)顯示指定路徑下的文件二、填空題數(shù)據(jù)管理技術(shù)開展過程經(jīng)過人工管理、文件系統(tǒng)和數(shù)據(jù)庫(kù)系統(tǒng)三個(gè)階段，其中數(shù)據(jù)獨(dú)立性最高的階段是【1】0(2)算法復(fù)雜度主要包括時(shí)間復(fù)雜

23、度和【2】復(fù)雜度。在進(jìn)行模塊測(cè)試時(shí)，要為每個(gè)被測(cè)試的模塊另外設(shè)計(jì)兩類模塊：驅(qū)動(dòng)模塊和承接模塊(樁模塊)。其中【3】的作用是將測(cè)試數(shù)據(jù)傳送給被測(cè)試的模塊,并顯示被測(cè)試模塊所產(chǎn)生的結(jié)果。一棵二叉樹第六層(根結(jié)點(diǎn)為第一層)的結(jié)點(diǎn)數(shù)最多為【4】個(gè)。(5)數(shù)據(jù)結(jié)構(gòu)分為邏輯結(jié)構(gòu)和存儲(chǔ)結(jié)構(gòu)，循環(huán)隊(duì)列屬于【5】結(jié)構(gòu)。(6)設(shè)有以下函數(shù)過程：Functionfun(mAsInteger)AsIntegerDimkAsInteger,sumAsIntegersum=0Fork=mTo1Step-2sum=sum+kNextkfun=stlmEndFunction假設(shè)在程序中用語(yǔ)句s=fun(10)調(diào)用此函數(shù)，那么

24、s的值為【610(7)在窗體上畫一個(gè)命令按鈕和一個(gè)文本框，然后編寫命令按鈕的Click事件過程。程序運(yùn)行后，在文本框中輸入一串英文字母(不區(qū)分大小寫)，單擊命令按鈕，程序可找出未在文本框中輸入的其他所有英文字母，并以大寫方式降序顯示到Tex"中。例如，假設(shè)在Textl中輸入的是abDfdb,那么單擊Command1按鈕后Textl中顯示的字符串是ZYXWVUTSRQPONMLKJIHGECo請(qǐng)?zhí)羁铡rivateSubCommandl_Click()DimstrAsString,sAsString,cAsStringstr=UCase(Textl)S=,u,c二zWhilec>

25、=MAMIflnStr(stnC)=OThens=7EndIfc=Chr$(Asc(C)8)WendIfsV"ThenTextl=SEndIfEndSub(8)在n個(gè)運(yùn)發(fā)動(dòng)中選出任意r個(gè)人參加比賽，有很多種不同的選法，選法的個(gè)數(shù)可以用公式計(jì)算。以下圖窗體中3個(gè)文本框的名稱依次是Textl、Text2、Text.程序運(yùn)行時(shí)在Textl.Text2中分別輸入n和r的值，單擊Command1按鈕即可求出選法的個(gè)數(shù)，并顯示在Tcxt3文本框中(見以下圖)。請(qǐng)?zhí)羁?。PrivateSubCommandl_Click()DimrAsIntegernAsIntegern=Textlr=Text2Text3=fun(n)/fun(9)/fun(r)EndSubFunctionfun(nAsInteger)AsLongDimtAsLong【10】，