2010年3月VB筆試試卷及參考答案

1、2010年3月全國(guó)計(jì)算機(jī)等級(jí)考試二級(jí)VB筆試試卷(含參考答案)一、選擇題（每題2分，共70分）（1）下列敘述中正確的是()A)對(duì)長(zhǎng)度為n的有序鏈表進(jìn)行查找，最壞情況下需要比較次數(shù)為nB)對(duì)長(zhǎng)度為n的有序鏈表進(jìn)行對(duì)分查找，最壞情況下需要比較次數(shù)為（n/2）C)對(duì)長(zhǎng)度為n的有序鏈表進(jìn)行對(duì)分查找，最壞情況下需要的比較次數(shù)（log2n）D)對(duì)長(zhǎng)度為n的有序鏈表進(jìn)行對(duì)分查找，最壞情況下需要的比較次數(shù)（nlog2n）（2）算法的時(shí)間復(fù)雜是指()A)算法的執(zhí)行時(shí)間B)算法所處理的數(shù)據(jù)量C)算法程序中的語(yǔ)句或指令條數(shù)D)算法在執(zhí)行過(guò)程中所需要的基本運(yùn)算次數(shù)（3）軟件按功能可以分為：應(yīng)用軟件、系統(tǒng)軟件和支持軟件

2、（或工具軟件），下面屬于系統(tǒng)軟件的是()A)編輯軟件B)操作系統(tǒng)C)教務(wù)管理系統(tǒng)D）瀏覽器（4）軟件（程序）調(diào)試的任務(wù)是()A)診斷和改正程序中的錯(cuò)誤B)進(jìn)肯能多的發(fā)現(xiàn)程序中的錯(cuò)誤C)發(fā)現(xiàn)并改正程序中的所有錯(cuò)誤D)確定程序中錯(cuò)誤的性質(zhì)（5）數(shù)據(jù)流程圖（DFD圖）是()A)軟件概要設(shè)計(jì)的工具B)軟件詳細(xì)設(shè)計(jì)的工具C)機(jī)構(gòu)化方法的需求分析工具D)面向?qū)ο蠓椒ǖ男枨蠓治龉ぞ撸?）軟件生命周期可以分為定義階段，開(kāi)發(fā)階段和維護(hù)階段。詳細(xì)設(shè)計(jì)屬于()A)定義階段B)開(kāi)發(fā)階段C)維護(hù)階段D)上述三個(gè)階段（7）數(shù)據(jù)庫(kù)管理系統(tǒng)中負(fù)責(zé)數(shù)據(jù)模式定義的語(yǔ)言是A）數(shù)據(jù)定義語(yǔ)言B）數(shù)據(jù)管理語(yǔ)言C）數(shù)據(jù)操縱語(yǔ)言D）數(shù)據(jù)控制

3、語(yǔ)言（8）在學(xué)生管理的關(guān)系數(shù)據(jù)庫(kù)中，存取一個(gè)學(xué)生信息的數(shù)據(jù)單位是A）文件B）數(shù)據(jù)庫(kù)C）字段D）記錄（9）數(shù)據(jù)庫(kù)設(shè)計(jì)中，用E-R圖來(lái)描述信息結(jié)構(gòu)但不涉及信息在計(jì)算機(jī)中的表示，它屬于數(shù)據(jù)庫(kù)設(shè)計(jì)的A）需求分析階段B）邏輯設(shè)計(jì)階段C）概念設(shè)計(jì)階段D）物理設(shè)計(jì)階段（10）有兩個(gè)關(guān)系R和T如下：則由關(guān)系R得到關(guān)系T的操作是A）選擇B）投影C）交D）并（11）在VB集成環(huán)境中要結(jié)束一個(gè)正在運(yùn)行的工程，可單擊工具欄上的一個(gè)按鈕，這個(gè)按鈕是（12）設(shè)x是整型變量，與函數(shù)f(x0,-x,x)有相同結(jié)果的代數(shù)式是A）|x|B）-|x|C）xD）-x（13）設(shè)窗體文件中有下面的事件過(guò)程：PrivateSubComma

4、nd1_Click（）Dimsa%=100PrintaEndSub其中變量a和s的數(shù)據(jù)類(lèi)型分別是A）整型，整型B）變體型，變體型C）整型，變體型D）變體型，整型（14）下面哪個(gè)屬性肯定不是框架控件的屬性A）TextB）CaptionC）LeftD）Enabled（15）下面不能在信息框中輸出“VB”的是A）MsgBoxVBB）x=MsgBox（VB）C）MsgBox（VB）D）CallMsgBoxVB（16）窗體上有一個(gè)名稱(chēng)為Option1的單選按鈕數(shù)組，程序運(yùn)行時(shí)，當(dāng)單擊某個(gè)單選按鈕時(shí)，會(huì)調(diào)用下面的事件過(guò)程PrivateSubOption1_C1ick（IndexAsInteger）EndS

5、ub下面關(guān)于此過(guò)程的參數(shù)Index的敘述中正確的是A）Index為1表示單選按鈕被選中，為O表示未選中B）Index的值可正可負(fù)C）Index的值用來(lái)區(qū)分哪個(gè)單選按鈕被選中D）Index表示數(shù)組中單選按鈕的數(shù)量（17）設(shè)窗體中有一個(gè)文本框Text1，若在程序中執(zhí)行了Text1.SetFocus，則觸發(fā)A）Text1的SetFocus事件B）Text1的GotFocus事件C）Text1的LostFocus事件D）窗體的GotFocus事件（18）VB中有3個(gè)鍵盤(pán)事件：KeyPress、KeyDown、KeyUp，若光標(biāo)在Text1文本框中，則每輸入一個(gè)字母A）這3個(gè)事件都會(huì)觸發(fā)B）只觸發(fā)Key

6、Press事件C）只觸發(fā)KeyDown、KeyUp事件D）不觸發(fā)其中任何一個(gè)事件（19）下面關(guān)于標(biāo)準(zhǔn)模塊的敘述中錯(cuò)誤的是A）標(biāo)準(zhǔn)模塊中可以聲明全局變量B）標(biāo)準(zhǔn)模塊中可以包含一個(gè)SubMain過(guò)程，但此過(guò)程不能被設(shè)置為啟動(dòng)過(guò)程C）標(biāo)準(zhǔn)模塊中可以包含一些Public過(guò)程D）一個(gè)工程中可以含有多個(gè)標(biāo)準(zhǔn)模塊（20）設(shè)窗體的名稱(chēng)為Form1，標(biāo)題為Win，則窗體的MouseDown事件過(guò)程的過(guò)程名是A）Form1_MouseDownB）Win_MouseDownC）Form_MouseDownD）MouseDown_Form1（21）下面正確使用動(dòng)態(tài)數(shù)組的是A）Dimarr()AsIntegerReDi

7、marr(3,5)B）Dimarr()AsIntegerReDimarr(50)AsStringC）Dimarr()ReDimarr(50)AsIntegerD）Dimarr(50)AsIntegerReDimarr(20)（22）下面是求最大公約數(shù)的函數(shù)的首部Functiongcd(ByValxAsInteger,ByValyAsInteger)AsInteger若要輸出8、12、16這3個(gè)數(shù)的最大公約數(shù)，下面正確的語(yǔ)句是A）Printgcd(8,12)，gcd(12,16)，gcd(16,8)B）Printgcd(8,12,16)C）Printgcd(8)，gcd(12)，gcd(16)D

8、）Printgcd(8,gcd(12,16)（23）有下面的程序段，其功能是按圖1所示的規(guī)律輸出數(shù)據(jù)Dima(3,5)AsIntegerFori=1To3Forj=1To5A(i,j)=i+jPrinta(i,j);NextPrintNext若要按圖2所示的規(guī)律繼續(xù)輸出數(shù)據(jù)，則接在上述程序段后面的程序段應(yīng)該是A）Fori=1To5Forj=1To3Printa（j,i）;NextPrintNextB）Fori=1To3Forj=1To5Printa（j,i）;NextPrintNextC）Forj=1To5Fori=1To3Printa（j,i）;NextPrintNextD）Fori=1To

9、5Forj=1To3Printa（i,j）;NextPrintNext（24）窗體上有一個(gè)Text1文本框，一個(gè)Command1命令按鈕，并有以下程序PrivateSubCommandl_Click（）DimnIfText1.Text23456Thenn=n1Print口令輸入錯(cuò)誤&n&次EndIfEndSub希望程序運(yùn)行時(shí)得到左圖所示的效果，即：輸入口令，單擊“確認(rèn)口令”命令按鈕，若輸入的口令不是“123456”，則在窗體上顯示輸入錯(cuò)誤口令的次數(shù)。但上面的程序?qū)嶋H顯示的是右圖所示的效果，程序需要修改。下面修改方案中正確的是A）在Dimn語(yǔ)句的下面添加一句：n=OB）把Print口令輸入錯(cuò)誤&

10、n&次改為Print口令輸入錯(cuò)誤+n+次C）把Print口令輸入錯(cuò)誤&n&次改為Print口令輸入錯(cuò)誤&Str(n)&次D）把Dimn改為Staticn（25）要求當(dāng)鼠標(biāo)在圖片框P1中移動(dòng)時(shí)，立即在圖片框中顯示鼠標(biāo)的位置坐標(biāo)。下面能正確實(shí)現(xiàn)上述功能的事件過(guò)程是A）PrivateSubP1_MouseMove（ButtonASInteger,ShiftAsInteger,XAsSingle,YAsSingle）PrintX,YEndSubB）PrivateSubP1_MouseDown（ButtonASInteger,ShiftAsInteger,XAsSingle,YAsSingle）Pict

11、ure.PrintX,YEndSubC）PrivateSubP1_MouseMove（ButtonASInteger,ShiftAsInteger,XAsSingle,YAsSingle）P1.PrintX,YEndSubD）PrivateSubForm_MouseMove（ButtonASInteger,ShiftAsInteger,XAsSingle,YAsSingle）P1.PrintX,YEndSub（26）計(jì)算二的近似值的一個(gè)公式是。某人編寫(xiě)下面的程序用此公式計(jì)算并輸出的近似值：PrivateSubComand1_Click（）PI1Sign1n=20000Fork=3TonSign

12、=-Sign/kPI=PI+Sign/kNextkPrintPI*4EndSub運(yùn)行后發(fā)現(xiàn)結(jié)果為3.22751，顯然，程序需要修改。下面修改方案中正確的是A）把Fork=3Ton改為Fork=1TonB）把n=20000改為n=20000000C）把Fork=3Ton改為Fork=3TonStep2D）把PI=1改為PI=0（27）下面程序計(jì)算并輸出的是PrivateSubComand1_Click（）a=10s=0Dos=s+a*a*aa=a-1LoopUntila=0PrintsEndSubA）13+23+33+103的值B）10!+3!+2!+1!的值C）（1+2+3+10）3的值D）1

13、0個(gè)103的和（28）若在窗體模塊的聲明部分聲明了如下自定義類(lèi)型和數(shù)組PrivateTyperecCodeAsIntegerCaptionAsStringEndTypeDimarr（5）Asrec則下面的輸出語(yǔ)句中正確的是A）Printarr.Code(2),arr.Caption(2)B）Printarr.Code,arr.CaptionC）Printarr(2).Code,arr(2).CaptionD）PrintCode(2),Caption(2)（29）設(shè)窗體上有一個(gè)通用對(duì)話(huà)框控件CD1，希望在執(zhí)行下面程序時(shí)，打開(kāi)如圖所示的文件對(duì)話(huà)框PrivateSubComand1_Click（）C

14、D1.DialogTitle=打開(kāi)文件CD1.InitDir=C:CD1.Filter=所有文件|*.*|Word文檔|*.doc|文本文件|*.TxtCD1.FileName=CD1.Action=1IfCD1.FileName=ThenPrint未打開(kāi)文件ElsePrint要打開(kāi)文件&CD1.FileNameEndIfEndSub但實(shí)際顯示的對(duì)話(huà)框中列出了C:下的所有文件和文件夾，“文件類(lèi)型”一欄中顯示的是“所有文件”。下面的修改方案中正確的是A）把CD1.Action=1改為CD1.Action=2B）把“CD1.Filter=”后面字符串中的“所有文件”改為“文本文件”C）在語(yǔ)句CD1

15、.Action=1的前面添加：CD1.FilterIndex=3D）把CD1.FileName=改為CD1.FileName=文本文件（30）下面程序運(yùn)行時(shí)，若輸入395，則輸出結(jié)果是PrivateSubComand1_Click（）Dimx%x=InputBox(請(qǐng)輸入一個(gè)3位整數(shù))PrintxMod10,x100,(xMod100)10EndSubA）395B）539C）593D）359（31）窗體上有List1、List2兩個(gè)列表框，List1中有若干列表項(xiàng)（見(jiàn)圖），并有下面的程序：PrivateSubComand1_Click（）Fork=List1.ListCount-1To0Ste

16、p-1IfList1.Selected（k）ThenList2.AddItemList1.List（k）List1.RemoveItemkEndIfNextkEndSub程序運(yùn)行時(shí)，按照?qǐng)D示在List1中選中2個(gè)列表項(xiàng)，然后單擊Commandl命令按鈕，則產(chǎn)生的結(jié)果是A）在List2中插入了“外語(yǔ)”、“物理”兩項(xiàng)B）在List1中刪除了“外語(yǔ)”、“物理”兩項(xiàng)C）同時(shí)產(chǎn)生A）和B）的結(jié)果D）把List1中最后1個(gè)列表項(xiàng)刪除并插入到List2中（32）設(shè)工程中有2個(gè)窗體：Form1、Form2，F(xiàn)orm1為啟動(dòng)窗體。Form2中有菜單。其結(jié)構(gòu)如表。要求在程序運(yùn)行時(shí)，在Form1的文本框Text1中

17、輸入口令并按回車(chē)鍵（回車(chē)鍵的ASCII碼為13）后，隱藏Form1，顯示Form2。若口令為“Teacher”，所有菜單項(xiàng)都可見(jiàn)；否則看不到“成績(jī)錄入”菜單項(xiàng)。為此，某人在Form1窗體文件中編寫(xiě)如下程序：PrivateSubText1_KeyPress（KeyAsciiAsInteger）IfKeyAscii=13ThenIfText1.Text=TeacherThenForm2.input.visible=TrueElseForm2.input.visible=FalseEndIfEndIfForm1.HideForm2.ShowEndSub程序運(yùn)行時(shí)發(fā)現(xiàn)剛輸入口令時(shí)就隱藏了Form1，顯

18、示了Form2，程序需要修改。下面修改方案中正確的是A）把Form1中Text1文本框及相關(guān)程序放到Form2窗體中B）把Form1.Hide、Form2.Show兩行移到2個(gè)EndIf之間C）把IfKeyAscii=13Then改為IfKeyAscii=TeaeherThenD）把2個(gè)Form2.input.Visible中的“Form2”刪去（33）某人編寫(xiě)了下面的程序，希望能把Text1文本框中的內(nèi)容寫(xiě)到out.txt文件中PrivateSubComand1_Click（）Openout.txtForOutputAs#2PrintText1Close#2EndSub調(diào)試時(shí)發(fā)現(xiàn)沒(méi)有達(dá)到目的

19、，為實(shí)現(xiàn)上述目的，應(yīng)做的修改是A）把PrintText1改為Print#2,Text1B）把PrintText1改為PrintText1C）把PrintText1改為WriteText1D）把所有#2改為#1（34）窗體上有一個(gè)名為Command1的命令按鈕，并有下面的程序：PrivateSubComand1_Click（）Dimarr（5）AsIntegerFork=1To5arr（k）=kNextkprogarr（）Fork=1To5Printarr（k）NextkEndSubSubprog（a（）AsInteger）n=Ubound（a）Fori=nTo2step-1Forj=1Ton-

20、1ifa（j）=0ThenCount（n）=Count（n）+1EndIfNextkm=count（0）Fork=1To25Ifm2PrintiEndSub程序運(yùn)行后，單擊窗體，輸出結(jié)果為【10】。（9）在窗體上畫(huà)一個(gè)名稱(chēng)為Command1的命令按鈕。然后編寫(xiě)如下程序：OptionBase1PrivateSubCommand1_Click（）Dima（10）AsIntegerFori=1To10a（i）=iNextCallswap（【11】）Fori=1To10Printa（i）;NextEndSubSubswap（b（）AsInteger）n=Ubound（b）Fori=1Ton/2t=b（i）b（i）=b（n）b（n）=t【12】NextEndSub上述程序的功能是，通過(guò)調(diào)用過(guò)程swap，調(diào)換數(shù)組中數(shù)值的存放位置，即a(1)與a(10)的值互換，a(2)與a(9)的值互換，。請(qǐng)?zhí)羁铡＃?0）在窗體上畫(huà)一個(gè)文本框，其名稱(chēng)為T(mén)ext1，在屬性窗口中把該文本