全國計算機等級考試二級VB真題(2005-2011)

2005年4月全國計算機等級考試二級VB筆試試卷一、選擇題((1)-(35)每小題2分，共70分)(1)數(shù)據(jù)的存儲結構是指TOC\o"1-5"\h\zA)存儲在外存中的數(shù)據(jù) B)C)數(shù)據(jù)在計算機中的順序存儲方式 D)(2)下列關于棧的描述中錯誤的是A)棧是先進后出的線性表 B)C)棧具有記憶作用 D)數(shù)據(jù)所占的存儲空間量數(shù)據(jù)的邏輯結構在計算機中的表示棧只能順序存儲對棧的插入與刪除操作中，不需要改變棧底指針(3)對于長度為n的線性表，在最壞情況下，下列各排序法所對應的比較次數(shù)中正確的是A)冒泡排序為n/2B)冒泡排序為nC)快速排序為n D)快速排序為n(n-D/2(4)對了長度為n的線性表進行順序查找，在最壞情況下所需耍的比較次數(shù)為D)n+1A)log2n B)n/2 C)nD)n+1(5)下列對于線性鏈表的描述中正確的是A)存儲空間不?定是連續(xù)，且各元素的存儲順序是任意的B)存儲空間不一定是連續(xù)，且前件元素一定存儲在后件元素的前面C)存儲空間必須連續(xù)，且前件元素一定存儲在后件元素的前面D)存儲空間必須連續(xù)，且各元素的存儲順序是任意的(6)(6)下列對于軟件測試的描述中正確的是A)軟件測試的目的是證明程序是否正確B)軟件測試的目的是使程序運行結果正確C)軟件測試的C)軟件測試的目的是盡可能多地發(fā)現(xiàn)程序中的錯誤D)軟件測試的目的是使程序符合結構化原則(7)為了使模塊盡可能獨立，要求A)模塊的內聚程度要盡量高，且各模塊間的耦合程度要盡量強B)模塊的內聚程度要盡量高，且各模塊間的耦合程度要盡量弱C)模塊的內聚程度要盡量低，且各模塊間的耦合程度要盡量弱D)模塊的內聚程度要盡量低，且各模塊間的耦合程度要盡量強(8)卜.列描述中正確的是A)程序就是軟件 C)軟件既是邏輯實體，又是物理實體軟件是程序、數(shù)據(jù)與相關文檔的集合不同的數(shù)據(jù)只能被對應的應用程序所使用以上三種說法都不對D)以上三個都是TOC\o"1-5"\h\zB)軟件是程序、數(shù)據(jù)與相關文檔的集合不同的數(shù)據(jù)只能被對應的應用程序所使用以上三種說法都不對D)以上三個都是(9)數(shù)據(jù)獨立性是數(shù)據(jù)庫技術的重耍特點之一。所謂數(shù)據(jù)獨立性是指A)數(shù)據(jù)與程序獨立存放 C)B)不同的數(shù)據(jù)被存放在不同的文件中 D)(10)用樹形結構表示實體之間聯(lián)系的模型是A)關系模型 B)網(wǎng)狀模型 C)層次模型(11)在窗體(名稱為Forml)上畫一個名稱為Tbxtl的文本框和一個名稱為Commandl的命令按鈕，然后編寫?個事件過程。程序運行以后，如果在文本框中輸入一個字符，則把命令按鈕的標題設置為“計算機等級考試”。以下能實現(xiàn)上述操作的事件過程是：PrivateSubCommandl_Click()Caption』'PrivateSubCommandl_Click()Caption』'計算機等級考試”EndSubD)PrivateSubCommandl_Click()Textl.lbxt="計宣機等級考試”EndSubAndb<>cOrc>dFalse D)2Commandl.Caption="計算機等級考試”EndSubC)PrivateSubForml_Click()TextLCaption="計算機等級考試”EndSub(12)設a=5,b=4,c=3,d=2,下列表達式的值是3>2*bOrA)1 B)True(13)設a="MicrosoftVisualBasic"，則以下使變量b的值為“VisualBasic”的語句是A)b=Left(a,10) B)b=Mid(a,10) C)b=Right(a,10) D)b=Mid(a,ll,10)(14)假定有如下的窗體事件過程，程序運行后單擊窗體，則在彈出的信息框中的標題欄中顯示的信息是：PrivateSubForm_Click()a$="MicrosoftVisualBasic"b$=Righl(a$,5)c=Mid(a$,1,9)MsgBoxa$,34,b$,c$,5EndSubA)MicrosoftVisual B)Microsoft C)Basic D)5

(15)設a="a"，b="b"，c="c"，d="d"，執(zhí)行語句x=IIf((a<d)A“，“B")后，x的值為：A)"a" B)Mb" C)wB" D)MA”(16)為了使命令按鈕(名稱為Command1)右移200,應使用的語句是A)Command1.Move-200 B)Command1.Move200C)Command1.Left=Command1.Left+200 D)Command1.Left=Command1.Left-200(17)在窗體上畫?個文本框，然后編寫如下事件過程，程序運行時，在文本框中輸入456,然后單擊窗體，在輸入對話框中輸入123,單擊“確定”按鈕后，在窗體上顯示的內容是：PrivateSubForm_Click()x=lnputBox("請輸入一個整數(shù)”)Printx+Text1.TextEndSubA)123 B)456 C)579 D)123456(18)在窗體上畫一個文本框和一個計時器控件，名稱分別為Textl和Timeri,在屬性窗口中把計時器的Interval屬性設置為1000,Enabled屬性設置為False,程序運行后，如果單擊命令按鈕，則每隔?秒鐘在文本框中顯示?次當前的時間。以下是實現(xiàn)上述操作的程序，在處應填入的內容是PrivateSubCommand1_Click()Timerl. EndSubPrivateSubTimerl_Timer()Textl.lext=TimeEndSubA)Enabled=Tnie B)Enabled=False C)Visible=True D)Visible=False(19)假定在圖片框Piclurel中裝入了一個圖形，為了清除該圖形(不刪除圖片框)，應采用的正確方法是：A)選擇圖片框，然后按Del鍵B)執(zhí)行語句Picture1.Picture=LoadPicture()C)執(zhí)行語句Picture1.Picture=””D)選擇圖片框，在屬性窗口中選擇Picture屬性，然后按回車鍵(20)在窗體上畫一個Listl的列表框，一個名稱為Label1的標簽，列表框中顯示若干個項目，當單擊列表框中的某個項目時，在標簽中顯示被選中的項口的名稱，卜.列能正確實現(xiàn)上述操作的程序是A)PrivateSubListl_Click()Label1.CaptionA)PrivateSubListl_Click()Label1.Caption=Listl.ListindexEndSubB)PrivateSubListl_Click()Label1.Name=Listl.ListindexEndSub(21)在窗體上畫一個命令按鈕，名稱為Commandl,然后編寫如下事件過程：PrivateSubCommandl_Click()DimiAsInteger,xAsIntegerFori=1Tb6Ifi=1Thenx=iIfi<=4Thenx=x+1Elsex=x+2EndIfNextiPrintxEndSub程序運行后，單擊命令按鈕，其輸出結果為A)9 B)6C)12 D)15(23)執(zhí)行以下程序段后，x的值為DimxAsInteger,iAsIntegerx=0Fori=20lb1Step-2x=x+i\5NextIA)16 B)17PrivateSubListl_Click()Label1.Name=Listl.TextEndSubPrivateSubListl_Click()Label1.Caption=Listl.TextEndSub(22)在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下事件過程：PrivateSubCommandl_Click()c="ABCD”Forn=1lb4Print NextEndSub程序運行后，單擊命令按鈕，要求在窗體上顯示如下內容：DCDBCDABCD則在處應填入的內容為A)Left(c,n)C)Mid(cnl)B)Right(c,n)D)Mid(c,n,n)C)18 D)19(24)在VisualBasic工程中，可以作為啟動對象的程序是(24)在VisualBasic工程中，可以作為啟動對象的程序是A)任何窗體或標準模塊B)任何窗體或過程C)SubMain過程或其他任何模塊 D)SubMain過程或任何窗體(25)假定建立了一個名為Command1的命令按鈕數(shù)組，則以下說法中錯誤的是A)數(shù)組中每個命令按鈕的名稱(名稱屬性)均為Command1B)數(shù)組中每個命令按鈕的標題(Caption屬性)都一樣C)數(shù)組中所有命令按鈕可以使用同?個過程D)用名稱Command"下標)可以訪問數(shù)組中的每個命令按鈕(26)把窗體的KeyPreview屬性設置為True,然后編寫如卜,事件過程：PrivateSubForm_KeyPress(KeyAsciiAsInteger)DimchAsStringch=Chr(KeyAscii)KeyAscii=Asc(UCase(ch))PrintChr(KeyAscii+2)EndSub程序運行后,按鍵盤上的“A”鍵，則在窗體上顯示的內容是A)A B)B C)C D)D(27)在窗體上畫一個命令按鈕和一個文本框，名稱分別為Command1和Tbxtl,然后編寫如卜.程序:PrivateSubCommand1_Click()a=InputBox("請葡入日期(1~31)")t="旅游景點:"&IIf(a>0Anda<=10,"長城&IIf(a>10Anda<=20,"故宮&nf(a>20Anda<=30J頤和園"J")Text1.Text=tEndSub程序運行后，如果從鍵盤輸入16,則在文本框中顯示的內容是：A)旅游景點：長城故宮 B)旅游景點：長城頤和園C)旅游景點：頤和園 D)旅游景點：故宮程序運行后，單擊窗體，在標簽中顯示的內容是(28)在窗體上畫一個名稱為Labell的標簽，然后編寫如下事件過程，PrivateSubForm_Click()程序運行后，單擊窗體，在標簽中顯示的內容是Dimarr(10,10)AsIntegerDimiAsInteger,jAsIntegerFori=2lb4Forj=2lb4arr(i,j)=i*jNextjNextiD)15(30)閱讀程序：OptionBase1Dimarr()AsIntegerPrivateSubForm_Click()D)15(30)閱讀程序：OptionBase1Dimarr()AsIntegerPrivateSubForm_Click()DimiAsInteger,jAsIntegerReDimarr(3,2)Fori=1lb3Forj=1lb2arr(ij)=i*2+jNextjNextiReDimPreservearr(3,4)Forj=3lb4arr(3,j)=j+9NextjPrintarr(3,2)+arr(3,4)EndSub程序運行后，單擊窗體,輸出結果為：A)21B)13C)8D)25(29)在窗體上畫一個名稱為Comamndl的命令按鈕，然后編寫如下通用過程和命令按鈕的事件過程：PrivateFunctionfun(ByValmAsInteger)IfmMod2=0Thenfun=2Elsefun=1EndIfEndFunctionPrivateSubCommandl_Click()DimiAsInteger,sAsIntegers=0Fori=1lb5s=s+fun(i)NextPrintsEndSub程序運行后，單擊命令按鈕,則窗體上顯示的是:A)6B)7C)8D)931)在窗體上畫?個名稱為Command1的命令按鈕,然后編寫如下程序:OptionBase1PrivateSubCommandI_Click()DimcAsInteger,dAsIntegerd=0:c=6x=Array(2,4,6,8,10,12)Fori=11b6Ifx(i)>cThend=d+x(i):c=x(i)Elsed=d-cEndIfNextiPrintdEndSub程序運行后，如果單擊命令按鈕，則在窗體上輸入的內容為A)10 B)16C)12 D)20(32)設有如下程序:PrivateSubCommandl_Click()DimcAsInteger,dAsIntegerc=4d=InputBox("請輸入一個整數(shù)")DoWhiled>0Ifd>cThenc=c+1EndIfd=InputBox。'請輸入一個整數(shù)”)LoopPrintc+dEndSub程序運行后，單擊命令按鈕如果在輸入對話框中依次輸入1、2、3、4、5、6、7、8、9、0,則輸出結果是：A)12 B)11C)10 D)9(33)在窗體上畫一個名稱為Command1的命令按鈕和一個名稱為生xtl的文本框，在文本框中輸入以下字符串:MicrosoftVisualBasicProgramming,然后編寫如卜事件過程：PrivateSubCommandl_Click()Open"d:\temp\outf.txt"ForOutputAs#1Fori=1TbLen(Textl.lext)c=Mid(lextl.Text,i,1)Ifc>=MAHAndc<=MZ"ThenPrint#1,LCase(c)；EndIfNextiCloseEndSub程序運行后,單擊命令按鈕，文件outf.txt中的內容是：A)MVBP B)mvbpTOC\o"1-5"\h\zC)M D)mV vB bP P(34)在窗體上畫一個名稱為Command1的命令按鈕,然后編寫如下程序：DimSWAsBooleanFunctionfunc(XAsInteger)AsIntegerIfX<20ThenY=XElseY=20+XEndIffunc=YEndFunctionPrivateSubCommandl_Click()DimintNumAsIntegerintNum=InputBox(,M,)IfSWThenPrintfunc(intNum)EndIfEndSubPrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)SW=FalseEndSubPrivateSubForm_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)SW=TrueEndSub程序運行后,單擊命令按鈕，將顯示一個輸入對話框,如果在對話框中輸入25,則程序的執(zhí)行結果是：A)輸出0 B)輸出25C)輸出45 D)無任何輸出(35)設有如下通用過程：PublicSubfun(a()AsInteger,xAsInteger)Fori=1Tb5x=x+a(i)NextEndSub在窗體上畫一個名稱為Tbxtl的文本框和一個名稱為Command1的命令按鈕，然后編寫如下事件過程：PrivateSubCommandl_Click()Dimarr(5)AsInteger,nAsIntegerFori=1lb5arr(i)=i+iNextfunarr,nText1.Text=Str(n)EndSub程序運行后，單擊命令按鈕,則在文本框中顯示的內容是A)30B)25C)20 D)15二、填空題(每空2分，共30分)請將每一個空的正確答案寫在答題卡［1】?【15】序號的橫線上，答在試卷上不得分。注意：以命令關鍵字填空的必須拼寫完整。(1)某二叉樹中度為2的結點有18個，則該二樹中有【1】個葉子結點。(2)在面向對象方法中，類的實例稱為【2】o(3)診斷和改正程序中錯誤的工作通常稱為【3】o(4)在關系數(shù)據(jù)庫中，把數(shù)據(jù)表示成二維表，每一個二維表稱為【4】o(5)問題處理方案的正確而完整的描述稱為【5】o(6)以下語句PrintIm(12345.6789*104。5)/100的輸出結果是：【6】(7)在窗體上畫一個文本框和一個圖片框,然后編寫如卜.兩個事件過程：PrivateSubForm_Click()Text1.Text=”VB程序設計”EndSubPrivateSublextl_Change()PictureI.Print"VBProgramming'1EndSub程序運行后，單擊窗體，在文本框中顯示的內容是【7］，而在圖片框中顯示的內容是［8】(8)閱讀卜.面的程序，程序運行后，單擊窗體，輸出結果是［9】PrivateSubForm_Click()DimCheckAsBoolean,CounterAsIntegerCheck=TrueCounter=5DoDoWhileCounter<20Counter=Counter+1IfCounter=10ThenCheck=FalseExitDoEndIfLoopLoopUntilCheck=FalsePrintCounterEndSub(9)設有如下程序：PrivateSubForm_Click()DimaAsInteger,sAsIntegern=8s=0Do

n=n-1LoopWhilen>0PrintsEndSub以上程序的功能是【10】，程序運行后，單擊窗體，輸出結果為【11】(10)設有如下程序：OptionBase1PrivateSubCommand1_Click()DimarrlDimMinAsInteger,iAsIntegerarrl=Array(12,435,76,-24,78,54,866,43)Min=[12]Fori=2Tb8Ifarrl(i)<MinThen[13]NextiPrint”最小值是:";MinEndSub以上程序的功能是用Array函數(shù)建立一個含有8個元素的數(shù)組，然后查找并輸出該數(shù)組中的最小值,請?zhí)羁?11)在名稱為Forml的窗體上畫一個文本框，其名稱為Ifextl,在屬性窗口中把文本框的MultiLine屬性設置為True,然后編寫如下事件過程：PrivateSubForm_Click()Open"d:\test\smtextl.txt1'ForInputAs#1DoWhileNot[14]LineInput#1,aspect$whole$=whole$+aspects+Chr(13)+Chr(10)LoopText1.Text=whole$Close#1Open"d:\test\smtext2.txt,'ForOutputAs#1Print#1,[15]Close#1EndSub上述程序的功能是，把磁盤文件smtextl.txt的內容讀到內存并在文本框中顯示出來，然后把該文本框中的內容存入磁盤文件smlext2.txt.請?zhí)羁铡?005年4月全國計算機等級考試二級VB筆試參考答案象序系法19對程關算[6]象序系法19對程關算[6]12345.68VB程序設計VBProgramming(9]10[10]求1?8的和[11]36[12]arrl(l)[13]min=arrl(i)[14]EOF(l)(151text1.text(或whole$)選擇題：1—5DBDCA6—10CBDDC11-15ABBCD16--20CDABD21-25ABCDB26-30CDBBA31-35CDBDA填空題：2005年9月全國計算機等級考試二級VB筆試試卷一、選擇題（每小題2分，共70分）下列各題A）、B）、C）,D）四個選項中,試卷上不得分。（1）下列敘述中正確的是A）程序設計就是編制程序C）程序經(jīng)調試改錯后還應進行再測試只有一個選項是正確的。請將正確選項填涂在答題卡相應位置匕答在B）程序的測試必須由程序員自己去完成D）程序經(jīng)調試改錯后不必進行再測試（2）卜列數(shù)據(jù)結構中，能用：分法進行在找的是A）順序存儲的有序線性表（3）下列關于棧的描述正確的是B）線性鏈表C）二2005年9月全國計算機等級考試二級VB筆試試卷一、選擇題（每小題2分，共70分）下列各題A）、B）、C）,D）四個選項中,試卷上不得分。（1）下列敘述中正確的是A）程序設計就是編制程序C）程序經(jīng)調試改錯后還應進行再測試只有一個選項是正確的。請將正確選項填涂在答題卡相應位置匕答在B）程序的測試必須由程序員自己去完成D）程序經(jīng)調試改錯后不必進行再測試（2）卜列數(shù)據(jù)結構中，能用：分法進行在找的是A）順序存儲的有序線性表（3）下列關于棧的描述正確的是B）線性鏈表C）二叉鏈表D）有序線性鏈表A)B)C)D)在棧中只能插入元素而不能刪除元素在棧中只能刪除元素而不能插入元素棧是特殊的線性表，只能在一端插入或刪除元素棧是特殊的線性表，只能在?端插入元素，而在另端刪除元素（4）下列敘述中正確的是A)B)C)D)一個邏輯數(shù)據(jù)結構只能有一種存儲結構數(shù)據(jù)的邏輯結構屬于線性結構，存儲結構屬于非線性結構一個邏輯數(shù)據(jù)結構可以有多種存儲結構，且各種存儲結構不影響數(shù)據(jù)處理的效率一個邏輯數(shù)據(jù)結構可以有多種存儲結構，且各種存儲結構影響數(shù)據(jù)處理的效率（5）下列描述中正確的是A)B)C)D)軟件工程只是解決軟件項目的管理問題軟件工程主:要解決軟件產(chǎn)品的生產(chǎn)率問題軟件工程的主要思想是強調在軟件開發(fā)過程中需要應用工程化原則軟件.1：程只是解決軟件開發(fā)中的技術問題（6）在軟件設計中，不屬于過程設計工具的是A）PDL（過程設計語言）PAD圖N-S圖DFD圖（7）卜.列敘述中正確的是A）軟件交付使用后還需要進行維護C）軟件交付使用后其生命周期就結束（8）數(shù)據(jù)庫設計的根本目標是耍解決B）軟件一旦交付使用就不需要再進行維護D）軟件維護是指修復程序中被破壞的指令D）簡化數(shù)據(jù)維護A）數(shù)據(jù)共享問題B）數(shù)據(jù)安全問題C）大鼠數(shù)據(jù)存儲問題A)T=RnsB)T=RUST=RxS（10）數(shù)據(jù)庫系統(tǒng)的核心是D)T=R/SA）數(shù)據(jù)模型B）數(shù)據(jù)庫管理系統(tǒng)C）數(shù)據(jù)庫D）數(shù)據(jù)庫管理員（11）假定一個VisualBasic應用程序由一個窗體模塊和一個標準模塊構成。為保存該應用程序，以卜.正確的操作是A）只保存窗體模塊文件B）分別保存窗體模塊、標準模塊和工程文件

（12）為了清除窗體上的一個控件，下列正確的操作是C）只保存窗體模塊和標準模塊文件D）只保存工程文件A）按回車鍵B）按Esc鍵（13）以下敘述中錯誤的是C）選擇（單擊）要清除的控件，然后按Del鍵D）選擇（單擊）耍清除的控件，然后按回車鍵A)B)C)D)打開一個工程文件時，系統(tǒng)自動裝入與該工程有關的窗體、標準模塊等文件當程序運行時，雙擊?個窗體，則觸發(fā)該窗體的DblClick事件VisualBasic應用程序只能以解釋方式執(zhí)行事件可以由用戶引發(fā)，也可以由系統(tǒng)引發(fā)(14)設a=2,b=3,c=4,d=5,卜,列表達式Nota<=cOr4*c=bA2Andboa+c的值是A)-1B)1(15)設aA)-1B)1(15)設a=5,b=10,則執(zhí)行cC)TrueIht((b-a)*Rnd+a)D）False+1后，c值的范圍為A)5?10 B)6?9 C)6?10 D)5?9(16)在窗體上畫一個命令按鈕，名稱為Commandl,然后編寫如下事件過程：PrivateSubCommand1Click()a$="softwareandhardware"b$=Right(a$,8)c$=Mid(a$,1,8)MsgBoxa$,,b$,c$,1EndSub運行程序，單擊命令按鈕，則在彈出的信息框的標題欄中顯示的是A)softwareandhardwareB)software C)hardware D)1(17)在窗體上畫一個命令按鈕和一個文本框，其名稱分別為Commandl和血xtl,把文本框的Ext屬性設置為空白,然后編寫如下事件過程：PrivateSubCommand1_Click()a=InputBox("Enteraninteger1')b=InputBox(MEnteraninteger")Text1.Text=b+aEndSub程序運行后，單擊命令按鈕，如果在輸入對話框中分別輸入8和10,則文本框中顯示的內容是A)108B)18 C)810 D)出錯(18)在窗體上畫兩個文本框，其名稱分別為Textl和Text2,然后編寫如下程序：PrivateSubFormLoad()ShowTextl.Text="":Text2.1ext=Textl.SeFocusEndSubPrivateSubTextlChangeOText2.7ext=Mid(lextl.Text,8)EndSub程序運行后，如果在文本框Tbxtl中輸入BeijingChina,則在文本框論xl2中顯示的內容是A)BeijingChinaB)ChinaC)BeijingD)BeijingC(19)在窗體上畫一個列表框和一個命令按鈕，其名稱分別為Listl和Command］，然后編寫如下事件過程：PrivateSubFoimLoad()List1.Additem"Item1MListl.Additem"Item2"Listl.Additem"Item3"EndSubPrivateSubCommandl_Click()List1.List(List1.ListCount)="AAAA”EndSub程序運行后，單擊命令按鈕，其結果為A)把字符串“AAAA”添加到列表框中，但位置不能確定B)把字符串“AAAA”添加到列表框的最后(即“Item3”的后面)C)把列表框中原有的最后一項改為“AAAA”D)把字符串“AAAA”插入到列表框的最前面(即“hem1”的前面)(20)假定有如下事件過程：PrivateSubForm_Click()DimxAsInteger,nAsIntegerx=1n=0DoWhilex<28x=x*3n=n+1LoopPrhtx,nEndSub程序運行后，單擊窗體，輸出結果是A)814 B)563C)281 D)2435(21)有如下程序：PrivateSubFourClick()Dii)Check,CounterCheck=TrueCounter=0DoDoWhileCounter<20Counter=Counter+1IfCounter=10ThenCheck=FalseExitDoEndIfLoopLoopUntilCheck=FalsePrhtCountei;CheckEndSub程序運行后，單擊窗體，輸出結果為A)150 B)20-1C)10True D)10False(22)有如下程序：PrivateSubFonnClick。DiniAsInteger;sumAsIntegersum=0Fori=2To10IfiMod2oOAndiMod3=0Thensum=sum+iEndIfNextiPrhtsumEndSub程序運行后，單擊窗體，輸出結果為A)12B)30C)24D)18(23)在窗體上畫?個名稱為Textl的文本框和一個名稱為Commandl的命令按鈕，然后編寫如下事件過程:PrivateSubCommandl_Click()Dinanayl(10,10)AsIntegerDiniAsInteger;jAsIntegerFori=1To3Forj=2lb4arrayl(i,j)=i+jNextjNextiTextl.Text=array1(2,3)+array1(3,4)EndSub程序運行后，單擊命令按鈕，在文本框中顯示的值是A)12 B)13 C)14 D)15(24)在窗體上畫一個命令按鈕，其名稱為Commandl,然后編寫如下事件過程：PrivateSubCommandlClick()Dimal(4,4),a2(4,4)Fori=1Tb4Forj=1lb4al(i,j)=i+ja2(i,j)=al(i,j)+i+jNextjNextiPrintaI(3,3);a2(3,3)EndSub程序運行后，單擊命令按鈕，在窗體上輸出的是A)66 B)105 C)721 D)612(25)有如下程序：0ptbnBase1PrivateSubFormClick()Dimarr,SumSum=0arr=Anay(1,3,5,7,9,11,13,15,17,19)Fori=1To10Ifarr(i)Z3=arr(i)\3ThenSum=Sum+arr(i)EndIfNextiPrritSumEndSub程序運行后，單擊窗體，輸出結果為A)25B)26027D)28(26)在窗體上畫一個命令按鈕，然后編寫如下事件過程：PrivateSubCommandlClick()Dina6)AsStringFori=1To5a(i)=Chr(Asc(nAM)+(i-D)NextiForEachbInaPrintb;NextEndSub程序運行后，單擊命令按鈕，輸出結果是A)ABCDEB)12345C)abcdeD)出錯信息(27)以下關于函數(shù)過程的敘述中，正確的是A)如果不指明函數(shù)過程參數(shù)的類型，則該參數(shù)沒有數(shù)據(jù)類型B)函數(shù)過程的返回值可以有多個C)當數(shù)組作為函數(shù)過程的參數(shù)時，既能以傳值方式傳遞，也能以引用方式傳遞D)函數(shù)過程形參的類型與函數(shù)返回值的類型沒有關系(28)函數(shù)過程F1的功能是：如果參數(shù)b為奇數(shù)，則返回值為1,否則返回值為0。以下能iE確實現(xiàn)上述功能的代碼是:A)FunctionFl(bAsInteger)B)FunctionFl(bAsInteger)IfbMod2=0ThenIfbMod2=0ThenReturn0FI=0ElseElseReturn1Fl=1EndIfEndIfEndFunctionEndFunctionC)FunctionFl(bAsInteger)D)FunctionFl(bAsInteger)IfbMod2=0ThenIfbMod2<>0ThenFl=1Return0ElseElseFl=0Return1EndIfEndIfEndFunctbnEndFunctbn(29)以下關于KeyPress事件過程中參數(shù)KeyAscii的敘述中正確的是A)KeyAscii參數(shù)是所按犍的ASCII碼B)KeyAscii參數(shù)的數(shù)據(jù)類型為字符串C)KeyAscii參數(shù)可以省略D)KeyAscii參數(shù)是所按鍵上標注的字符(30)設窗體上有一個名為Textl的文本框，并編寫如下程序：PrivateSubFormLoad()ShowTextl.Text=Textl.SetFocusEndSubPrivateSubFonn_MouseUp(ButtonAsIntegerShiftAsInteger,XAsSingle,YAsSingle)Print"程序設訃’EndSubPrivateSubTextlKeyDown(KeyCodeAsInteger;ShiftAsInteger)Print"VisualBasic";EndSub程序運行后，如果在文本框中輸入字母“a”，然后單擊窗體，則在窗體上顯示的內容是A)VisualBasicB)程序設計 C)VisualBasic程序設計D)a程序設計(31)假定有卜表所列的菜單結構：標題名稱層次顯示appear1(主菜單)大圖標bigicon2(子菜單)小圖標smallicon2(子菜單)要求程序運行后，如果單擊菜單項“大圖標”，則在該菜單項前添加一個“一’.以卜正確的事件過程是A)PrivateSubbigicon_Click() B)PrivateSubbigicon_Click()bigicon.Checked=False Me.appeanbigicon.Checked=TiueEndSub EndSub

C)C)PrivateSubbigicon_Click()bigicon.Checked=TrueEndSubD)PrivateSubbigicon_Click()appear.bigicon.Checked=TrueEndSub（32）假定通用對話框的名稱為CommonDialogl,命令按鈕的名稱為Commandl,則單擊命令按鈕后，能使打開的對話框的標題為“NewFile”的事件過程是C)PrivateSubCommandl_Click()CommonDialog1.DialogTitle="NewTitleC)PrivateSubCommandl_Click()CommonDialog1.DialogTitle="NewTitle1'CommonI)iabgl.Show0penEndSubD)PrivateSubCommandl_Click()CommonDiabgl.DiabgTitle=*NewTitle*CommonDiabgl.ShowCobrEndSubCommonDiabgl.DiabgTitle=ewTitle”CommonDiabgl.ShowPriiterEndSubB)PrivateSubCommandl_Click()CommonDiabgl.DiabgTitle=*NewTitle”CommonDiabgl.ShowFontEndSub（33）如果一個工程含有多個窗體及標準模塊，則以下敘述中錯誤的是A）任何時刻最多只有一個窗體是活動窗體B）不能把標準模塊設置為啟動模塊C）用Hi加方法只是隱藏一個窗體，不能從內存中清除該窗體D）如果工程中含有SubMain過程，則程序?定首先執(zhí)行該過程（34）假定在工程文件中有一個標準模塊，其中定義了如下記錄類型TypeBooksNameAsString*10TclNumAsString*20EndType要求當執(zhí)行事件過程Commandl_Click時，在順序文件Person.txt中寫入?條記錄。下列能夠完成該操作的事件過程是C)PrivateSubCommandl_Click()DinBC)PrivateSubCommandl_Click()DinBAsBooks0pen"cAPerson.txt"ForOutputAs#1Name=InputBox("輸入姓名J)TeNum=InputBoxC輸入電話號碼”)Writettl,BCbse#lEndSubD)PrivateSubCommandl_Click()DinBAsBook0penAPerson.txt"ForInputAs#1Name=InputBoxC輸入姓名")TeNum=InputBox("輸入電話號碼")Prht#l,B.Name,B.TelNumCbse#lEndSubC)顯示根目錄下的文件名D)顯示指定路徑下的文件DinBAsBooks0pen"cAPerson.txt"ForOutputAs#IB.Name=InputBoxC輸入姓名”)B.TeNum=InputBoxC輸入電話號碼")Writettl,B.Name,B.TeNumCbse#lEndSubB)PrivateSubCommandl_Click()DinBAsBooks0pen"c:\Person.txt"ForInputAs#1B.Name=InputBoxC輸入姓名")B.TeNum=InpulBoxC輸入電話號碼”)Prht#l,B.Name,B.TeMumCbse#1EndSub(35)目錄列表框的Path屬性的作用是A)顯示當前驅動器或指定驅動器上的某目錄下的文件名B)顯示當前驅動器或指定驅動器上的目錄結構二、填空題（每空2分，共30分）請將每空的正確答案寫在答題卡【I】?【15】序號的橫線上，答在試卷上不得分。（1）數(shù)據(jù)管理技術發(fā)展過程經(jīng)過人工管理、文件系統(tǒng)和數(shù)據(jù)庫系統(tǒng)三個階段，其中數(shù)據(jù)獨立性最高的階段是［1】O<2）算法復雜度主要包括時間復雜度和【2】復雜度。（3）在進行模塊測試時，要為每個被測試的模塊另外設計兩類模塊：驅動模塊和承接模塊（樁模塊）。其中【3】的作用是將測試數(shù)據(jù)傳送給被測試的模塊，并顯示被測試模塊所產(chǎn)生的結果。一棵二叉樹第六層（根結點為第一層）的結點數(shù)最多為【4】個。（5）數(shù)據(jù)結構分為邏輯結構和存儲結構，循環(huán)隊列屬于【5】結構。（6）設有以下函數(shù)過程：FunctbnRin<mAsInteger)AsIntegerDimkAsInteger,sumAsIntegersum=0Fork=mTo1Step-2sum=sum+kNextkfun=sumEndFunctbn若在程序中用語句s=fun（10）調用此函數(shù)，則s的值為【6】o（7）在窗體上畫一個命令按鈕和一個文本框，然后編寫命令按鈕的Click事件過程。程序運行后，在文本框中輸入一串英文字母（不區(qū)分大小寫），單擊命令按鈕，程序可找出未在文本框中輸入的其他所有英文字母，并以大寫方式降

序顯示到lextl序顯示到lextlupo例如，若在Textl中輸入的是abDfdb,則單擊Command1按鈕后lextl中顯示的字符串是ZYXWVUTSRQPONMLKJIHGECo請?zhí)羁铡rivateSubCommand1Click()DinstrAsString,sAsStrhg,cAsStrhgsir:UCase(Textl)s=**Whilec>=IfInStr(str,c)=0Thens=[7]IfInStr(str,c)=0Thens=[7]EndIfc=Chr$(Asc(c) [8])WendIfsO"ThenTextl=sEndIfEndSub(8)在n個運動員中選出任意r個人參加比賽，有很多川種不同的選法，選法的個數(shù)可以用公式 :—計算。rl(n-r)!卜.圖窗體中3個文本框的名稱依次是Textl>Text2.Text3?程序運行時在Ibxtl、Text2中分別輸入n和r的值，單擊Command1按鈕即可求出選法的個數(shù)，并顯示在Text3文本框中(見下圖)。請?zhí)羁铡?9)以卜是一個比賽評分程序。在窗體上建立一個名為Textl的文本框數(shù)組，然后畫一個名為Texl2的文本框和名為Commandl的命令按鈕。運行時在文本框數(shù)組中輸入7個分數(shù)，單擊“計算得分”命令按鈕，則最后得分顯示在Text2文本框中(去掉一個最高分和一個最低分后的平均分即為最后得分)，如圖所示。請?zhí)羁?。PrivateSubCommandl_Click()DimrAsInteger,nAsIntegern=Text!r=Text2Text3=fun(n)/fun([9])/fun(r)EndSubFunctionfun(nAsInteger)aslongDintAsLong[10]Fork=1Tont=t*kNextfun=tEndFunctionPrivateSubCommand1Click()DimkAsIntegerDimsumAsSingle,maxAsSingle,minAsSinglesum=lextl(O)max=lextl(O)min=[11]Fork=[12]To6Ifmax<lextl(k)Thenmax=lextl(k)EndIfIfmin>lextl(k)Thenmin=lextl(k)EndIfsum=sum+lextl(k)NextkText2=([13])/5EndSub(10)如圖所示，在列表框Listl中已經(jīng)有若干人的簡單信息，運行時在Textl文本框(即“查找對象''右邊的文本框)輸入一個姓或姓名，單擊“查找”按鈕，則在列表框中進行查找，若找到，則把該人的信息顯示在Text2文本框中.若有多個匹配的列表項，則只顯示第1個匹配項；若未找到，則在Text2中顯示“查無此人'請?zhí)羁?。?□!x|查找對象：女男男男女女男男聲借兵紅成淮東方信克立張李馬李陳劉郝黃，!□!x|查找對象：女男男男女女男男聲借兵紅成淮東方信克立張李馬李陳劉郝黃?.ForalPrivateSubCommandlClick()PrivateSubCommandlClick()DinkAsInteger,nAsInteger,foundAsBooleanfound=Falsen=Len([14])k=0Whitek<1.istl.LisCountAndNotfoundIfTextl=Left$(Listl.List(k),n)ThenTex12=[15]found=TrueEndIfk=k+1WendIfNotfoundThenText2="查無此人"EndIfEndSub2005年9月全國計算機等級考試二級VB筆試參考答案選擇題[1-5]CACDC[6-10]DAABB[11-15]BCCDC[16-20]CABBA[21-25]DAADC[26-30]ADBAC[31-35]CCDAB填空題【1】數(shù)據(jù)庫系統(tǒng)【2】空間【3】驅動模塊32[5]存儲結構【6】30s&c[8]-1[9]n-rt=l[II]Textl(O)[12]1(sum-max-min)[14]text1.text[15]listl.list(k)

2006年4月全國計算機等級考試二級VB筆試試卷一、選擇題(每小題2分，共70分)下列各題A),B)、C)、D)四個選項中，只有一個選項是正確的。請將正確選項填涂在答題卡相應位置上，答在試卷上不得分。(1)下列選項中不屬了結構化程序設計方法的是。A)(1)下列選項中不屬了結構化程序設計方法的是。A)自頂向下 B)逐步求精 C)模塊化(2)兩個或兩個以上模塊之間關聯(lián)的緊密程度稱為。A)耦合度 B)內聚度 C)復雜度(3)卜.列敘述中正確的是.A)軟件測試應該由程序開發(fā)者來完成B)程序經(jīng)調試后一般不需要再測試(4)按照“后進先出''原則組織數(shù)據(jù)的數(shù)據(jù)結構是。A)隊列B)棧 C)雙向鏈表(5)下列敘述中正確的是。A)線性鏈表是線性表的鏈式存儲結構B)棧與隊列是非線性結構(6)對如下二叉樹D)可復用D)數(shù)據(jù)傳輸特性C)軟件維護只包括對程序代碼的維護D)以上三種說法都不對D)二叉樹C)雙向鏈表是非線性結構D)只有根結點的二叉樹是線性結構進行后序遍歷的結果為。A)ABCDEFB)DBEAFCC)ABDECFD)DEBFCA(7)在深度為7進行后序遍歷的結果為。A)ABCDEFB)DBEAFCC)ABDECFD)DEBFCA(7)在深度為7的滿二義樹中，葉子結點的個數(shù)為。A)32 B)31C)64 D)63“商品”與"顧客”兩個實體集之間的聯(lián)系一般是。A)一對一 B)一對多 C)多對一(9)在E-R圖中，用來表示實體的圖形是.A)矩形 B)橢圓形 C)菱形D)多對多D)三角形(10)數(shù)據(jù)庫DB、數(shù)據(jù)庫系統(tǒng)DBS、數(shù)據(jù)庫管理系統(tǒng)DBMS之間的關系是。DB包含DB包含DBS和DBMSC)DBS包含DB和DBMSDBMS包含DB和DBSD)沒有任何關系(11)以下關于VisualBasic特點的敘述中，錯誤的是。VisualBasic是采用事件驅動編程機制的語言VisualBasic程序既可以編譯運行，也可以解釋運行C)構成VisualBasic程序的多個過程沒有固定的執(zhí)行順序D)VisualBasic程序不是結構化程序，不具備結構化程序的一:種基本結構(12)以下敘述中，錯誤的是。一個VisualBasic應用程序可以含有多個標準模塊文件C)標準模塊文件可以屬于某個指定的窗體文件一個VisualBasic工程可以含有多個窗體文件 D)標準模塊文件的擴展名是.bas(13)以下敘述中，錯誤的是。A)在VisualBasic中，對象所能響應的事件是由系統(tǒng)定義的B)對象的任何屬性既可以通過屬性窗口設定，也可以通過程序語句設定VisualBasic中允許不同對象使用相同名稱的方法VisualBasic中的對象具有自己的屬性和方法(14)設有如F語句：Dima,bAsIntegerc="VisualBasic"d=#7/20/2005#以下關于這段代碼的敘述中，錯誤的是。a被定義為Integer類型變量 C)c中的數(shù)據(jù)是字符串b被定義為Integer類型變量 D)d中的數(shù)據(jù)是日期類型(15)以下能從字符串"VisualBasic"中直接取出子字符串"Basic”的函數(shù)是。

A)Left B)MidC)StringD)Instr(16)設a=4,b=3,c=2?d=l,下列表達式a>b+lOrcvdAndbModc的值是。A)True B)1 C)-1D)0(17)以下可以作為VisualBasic變量名的是。A)A#A B)counstAC)3AD)?AA(18)設x=4,y=6,則以下不能在窗體上顯示出“A=10”的語句是。A)PrintA=x+y B)Print*'A=H;x+yC)Print“A="+SRx+y) D)Print"A=H&x+y(19)假定有如卜.的命令按鈕(名稱為Commandl)事件過程：PrivateSubCommandl_Click()x=InputBox("輸入：%"輸入整數(shù)”)MsgBox”輸入的數(shù)據(jù)是：“，，”輸入數(shù)據(jù)：”+xEndSub程序運行后，單擊命令按鈕，如果從鍵盤上輸入整數(shù)10,則以卜敘述中錯誤的是。A)x的值是數(shù)值A)x的值是數(shù)值10B)輸入對話框的標題是“輸入整數(shù)”C)信息框的標題是“輸入數(shù)據(jù)：10”D)信息框中顯示的是“輸入的數(shù)據(jù)是：”(20)在窗體上畫(20)在窗體上畫1個命令按鈕(名稱為Command1)和1個文本框(名稱為Tbxtl),然后編寫如下事件過程：PrivateSubCommandl_Click()x=Val(lextl.Text)SelectCasexCase1,3y=x*xCaseIs>=10?Is<=-10y=xCase-10lb10y=-xEndSelectEndSub程序運行后，在文本框中輸入3,然后單擊命令按鈕，則以下敘述中正確的是。A)執(zhí)行y=x*x B)執(zhí)行y=-xC)先執(zhí)行y=x*x,再執(zhí)行y=-xD)程序出錯(21)設有命令按鈕Command1單擊事件過程，代碼如下:PrivateSubCommandl_Click()Dima(30)AsIntegerFori=l7b30a(i)=Int(Rnd*100)NextForEacharrltemInaIfarrltemMod7=0ThenPrintarrltem：IfarrItem>90ThenExitForNextEndSub對于該事件過程，以卜敘述中錯誤的是。A)a數(shù)組中的數(shù)據(jù)是30個100以內的整數(shù)B)語句ForEacharrltemIna有語法錯誤IfarrltemMod7=0……語句的功能是輸出數(shù)組中能夠被7整除的數(shù)Ifarr!tem>90……語句的作用是當數(shù)組元素的值大于90時退出For循環(huán)(22)設有命令按鈕(22)設有命令按鈕Commandl的單擊事件過程，代碼如下，PrivateSubCommandl_Click()Dima(3?3)AsIntegerFori=l7b3Forj=llb3a(i,j)=i*j+iNextjNextiSum=0Fori=lTb3Sum=Sum+a(i?4-i)NextiPrintSumEndSub運行程序，單擊命令按鈕，輸出結果是。A)20B)7C)16 D)17(23)在窗體上畫1個名稱為Command1的命令按鈕，然后編寫如下事件過程：PrivateSubCommandl_Click()a=0Fori=lTb2Forj=llb4IfjMod2o0Thena=a-lEndIfa=a+lNextjNextiPrintaEndSub程序運行后，單擊命令按鈕，輸出結果是A)0B)2C)3 D)4(24)窗體上有名稱分別為Ibxtl、Text2的2個文本框，有一個由3個單選按鈕構成的控件數(shù)組Option1，如圖1所示。程序運行后，如果單擊某個單選按鈕，則執(zhí)行Rxti中的數(shù)值與該單選按鈕所對應的運算(乘以1、io或loo),m結果顯示在Tbxt2中，如圖2所示。為了實現(xiàn)上述功能，在程序中的問號(?)處應填入的內容是。

PrivateSubOptionl_Click(IndexAsInteger)Iflextl.Texto,M,ThenSelectCase?Case0Text2.1ext=Val(lext1.Text)Text2.1ext=Val(lext1.Text)*10Text2.1ext=Val(lext1.Text)*100EndSelectEndIfEndSubOption1(Index)OptionI(Index).ValueA)Index B)Option1.IndexOption1(Index)OptionI(Index).Value(25)在窗體上畫1個命令按鈕，其名稱為Commandl,然后編寫如下程序:PrivateSubCommandl_Click()Dima(10)AsIntegerDimxAsIntegerFori=llb10a(i)=8+iNextx=2Printa(f(x)+x)EndSubFunctionf(xAsInteger)x=x+3f=xEndFunction程序運行后，單擊命令按鈕，輸出結果為。A)12B)15C)17D)18A)12B)15C)17D)18（26）以下關于過程的敘述中，錯誤的是。A）（26）以下關于過程的敘述中，錯誤的是。A）事件過程是由某個事件觸發(fā)而執(zhí)行的過程B）函數(shù)過程的返回值可以有多個（27）在窗體上畫3個標簽、3個文本框（名稱分別為TextH如圖所示。編寫如下程序：C）可以在事件過程中調用通用過程D）不能在事件過程中定義函數(shù)過程Text2和Tbxl3）和1個命令按鈕（名稱為Command］）,外觀PrivateSubForm_Load()Text1.Text=MText2.Text="7ext3.1ext=,'EndSubPrivateSubCommandl_Click()x=Val(lextl.Text)y=Val(lext2.Text)Text3.1ext=f(x,y)EndSubFunctionf(ByVaixAsInteger,ByVaiyAsInteger)DoWhiley<>0tmp=xModyx=yy=tmpLoopf=xEndFunction運行程序，在Ibxtl文本框中輸入36,在Text2文本框中輸入24,然后單擊命令按鈕，則在Text3文本框中顯示的內容是。A)4 B)6 C)8 D)12(28)窗體上有名稱分別為Textl、Text2的2個文本框，要求文本框Ibxtl中輸入的數(shù)據(jù)小于500,文本框Tbxt2中輸入的數(shù)據(jù)小于1000,否則重新輸入。為了實現(xiàn)上述功能，在以下程序中問號(?)處應填入的內容是PrivateSub7extl_LostFocus()CallChecklnput(lextl,500)EndSubPrivateSubText2_LostFocus()CallCheckInput(lext2,1000)EndSubSubChecklnput(tAs?,xAsInteger)IfVal(t.Text)>xThenMsgBox”請重新輸入!”EndIfEndSubA)Text B)Sellext C)Control D)Form(29)在窗體上.畫1個文本框，其名稱為Textl,然后編寫如下過程：PrivateSubText1_KeyDown(KeyC(xleAsInteger,ShiftAsInteger)PrintChr(KeyCode)EndSubPrivateSubTexll_KeyUp(KeyCodeAsInteger,ShiftAsInteger)PrintChr(KeyCode+2)EndSub程序運行后，把焦點移到文本框中，此時如果敲擊“A”鍵，則輸出結果為。A)A B)A C)A D)AA B C D(30)為了使列表框中的項目呈多列顯示，需要設置的屬性為。A)Columns B)Style C)List D)MultiSelect(31)在窗體上畫1個命令按鈕，名稱為Commands然后編寫如下程序：DimFlagAsBooleanPrivateSubCommandl_Click()DimintNumAsIntegerinlNum=InpulBox("請輸入：M)IfFlagThenPrintf(intNum)EndSubFunctionRXAsInteger)AsIntegerIfX<10Then

Y=XElseY=X+10EndIff=YEndFunctionPrivateSubForm_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle.YAsSingle)Flag=TrueEndSub運行程序，首先單擊窗體，然后單擊命令按鈕，在輸入對話框中輸入5,則程序的輸出結果為。A)0 B)5 C)15 D)無任何輸出(32)在菜單編輯器中建立1個名稱為Menu。的菜單項，將其“可見”屬性設置為False,并建立其若干子菜單，然后編寫如下過程：PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)IfButton=lThenPopupMenuMenuOEndIfEndSub則以下敘述中錯誤的是。A)該過程的作用是彈出一個菜單B)單擊鼠標右鍵時彈出菜單C)Menu。是在菜單編輯器中定義的彈出菜單的名稱D)參數(shù)X、Y指明鼠標當前位置的坐標(33)窗體上有1個名稱為CD1的通用對話框，1個名稱為Commandl的命令按鈕。命令按鈕的單擊事件過程如下：PrivateSubCommandl_Click()CDl.FileName=,M,CDLFiltei^"AllFilesl*.*l(*.DoC)l*.Docl(*.Txt)CDl.FilterIndex=2CDl.Action=lEndSub關于以上代碼，錯誤的敘述是。A)執(zhí)行以上事件過程，通用對話框被設置為“打開”文件對話框 C)通用對話框的默認文件類型為*.TxtB)通用對話框的初始路徑為當前路徑 D)以上代碼不對文件執(zhí)行讀寫操作(34)以下敘述中錯誤的是。A)用Shell函數(shù)可以執(zhí)行擴展名為.exe的應用程序B)若用Static定義通用過程，則該過程中的局部變量都被默認為Static類型C)Static類型的變量可以在標準模塊的聲明部分定義D)全局變量必須在標準模塊中用Public或Global聲明(35)以下關于文件的敘述中，錯誤的是。A)使用Append方式打開文件時，文件指針被定位于文件尾B)當以輸入方式(Input)打開文件時，如果文件不存在，則建立?個新文件C)順序文件各記錄的長度可以不同D)隨機文件打開后，既可以進行讀操作，也可以進行寫操作二、填空題(每空2分，共30分)請將每空的正確答案寫在答題標【1】?［15］序號的橫線上，答在試卷上不得分。(1)對長度為10的線性表進行冒泡排序，最壞情況下需要比較的次數(shù)為［11.(2)在而向對象方法中，【2】描述的是具有相似屬性與操作的一組對象。(3)在關系模型中，把數(shù)據(jù)看成是二維表，每?個二維表稱為一個［31(4)程序測試分為靜態(tài)分析和動態(tài)測試。其中【4】是指不執(zhí)行程序，而只是對程序文本進行檢查，通過閱讀和討論，分析和發(fā)現(xiàn)程序中的錯誤。(5)數(shù)據(jù)獨立性分為邏輯獨立性與物理獨立性。當數(shù)據(jù)的存儲結構改變時，其邏輯結構可以不變，因此，基于邏輯結構的應用程序不必修改，稱為【5】。(6)卜.列語句的輸出結果是(6LPrintFormat(Int(12345.6789*1004-0.5)/100,"0000.0.00")(7)在窗體上畫(7)在窗體上畫1個命令按鈕，其名稱為Command1,然后編寫如下事件過程：PrivateSubCommandl_Click()Dimarr(llb100)AsIntegerFori=llb100arr(i)=Int(Rnd*1000)NextiMax=arr(1)：Min=arr(1)Fori=llb100If[7]Then Max=arr(i)If[8]Then Min=arr(i)NextiPrint"Max=M：Max,"Min=M；MinEndSub程序運行后，單擊命令按鈕，將產(chǎn)生100個1000以內的隨機整數(shù)，放入數(shù)組arr中，然后查找并輸出這100個數(shù)中的最大值Max和最小值Min,請?zhí)羁铡?8)在窗體上畫1個名稱為Command1的命令按鈕和2個名稱分別為Ibxtl、Text2的文本框，如圖所示，然后編寫如下程序：FunctionFun(xAsInteger,ByVaiyAsInteger)AsIntegerx=x+yIfx<0ThenFun=xElseFun=yEndIfEndFunctionPrivateSubCommandl_Click()DimaAsInteger,bAsIntegera=-10：b=5lextl.lext=Fun(a,b)Text2.Text=Fun(a>b)EndSub程序運行后，單擊命令按鈕，Textl和Texl2文本框顯示的內容分別是【9】和【101(9)在窗體上畫1個命令按鈕和1個文本框，其名稱分別為Commandl和Tbxll,然后編寫如下代碼:DimSaveAllAsStringPrivateSubCommandl_Click()Text1.lext=Lcft(UCase(SaveAll),4)EndSubPrivateSubText1_KeyPress(KeyAsciiAsInteger)SaveAll=SaveAll+Chr(KeyAscii)EndSub程序運行后，在文本框中輸入abcdefg,單擊命令按鈕，則文本框中顯示的內容是【11】。18(10)在窗體上畫1個命令按鈕和1個通用對話框，其名稱分別為Commandl和CommonDialogl,然后編寫如下事件過程：PrivateSubCommandl_Click()CommonDialogl.[12]="打開文件"CommonDialogl.Filter="AllFiles(*.*)1*.*”CommonDialog1.InitDir=HC：\"CommonDialog1.ShowOpenEndSub該程序的功能是，程序運行后，單擊命令按鈕，將顯示“打開”文件對話框，其標題是“打開文件”，在"文件類型''欄內顯示“AIlFiles(*.*)“，并顯示C盤根目錄下的所有文件，請?zhí)羁铡?11)在窗體上畫1個文本框，名稱為Tbxtl,然后編寫如下程序：PrivateSubForm_Load()Opened：\temp\dat.txt"ForOutputAs#Ilextl.lext=,M,EndSubPrivateSubTextl_KeyPress(KeyAsciiAsInteger)If[13]=13ThenIf