月計算機二級vb試題及答案

1、2012年3月全國計算機等級考試二級筆試試卷  Visual Basic語言程序設(shè)計  （考試時間90分鐘，滿分100分）  一、選擇題（每小題2分，共70分）  下列各題A)、B)、C)、D)四個選項中，只有一個選項是正確的，請將正確選項涂在答題卡相應位置上，答在試卷上不得分。  （1） 下列敘述正確的是（）。  A) 循環(huán)隊列是隊列的一種鏈式存儲結(jié)構(gòu)  B循環(huán)隊列是隊列的一種順序存儲結(jié)構(gòu)  C循環(huán)隊列是非線性結(jié)構(gòu)  D循環(huán)隊列是一種邏輯結(jié)構(gòu)  （2）下列敘述正確

2、的是（）。  A) 棧是一種先進先出的線性表  B隊列是一種后進后出的線性表  C棧和隊列都是非線性結(jié)構(gòu)  D以上三種說法都不對  （3）一棵二叉樹共有25個結(jié)點，其中5個是葉子結(jié)點，則度為1的結(jié)點數(shù)為（）。  A16  B10  C6  D4  （4）在下列模式中，能夠給出數(shù)據(jù)庫物理存儲結(jié)構(gòu)與物理存取方法的是（）。  A外模式  B內(nèi)模式  C概念模式  D邏輯模式  （5）在滿足實體完整性約束的條件下（）。  A一個關(guān)系中

3、應該有一個或多個候選關(guān)鍵字  B一個關(guān)系中只能有一個候選關(guān)鍵字  C一個關(guān)系中不許有多個候選關(guān)鍵字  D一個關(guān)系中可以沒有候選關(guān)鍵字  （6）有三個關(guān)系R、S和T如下：（）。  則由關(guān)系R和S得到關(guān)系T的操作時  A自然連接  B并  C交  D差  （7）軟件生命周期中的活動不包括（）。  A市場調(diào)研  B需求分析  C軟件測試  D軟件維護  （8）下面不屬于需求分析階段任務的是（）。  A確定軟件系統(tǒng)的功能需求  B確定

4、軟件系統(tǒng)的性能需求  C需求規(guī)格說明書評審  D制定軟件集成測試計劃  （9）在測試方法中，設(shè)計測試用例的主要根據(jù)是（）。  A程序內(nèi)部邏輯  B程序外部功能  C程序數(shù)據(jù)結(jié)構(gòu)  D程序流程圖  （10）在軟件設(shè)計中不使用的工具是（）。  A系統(tǒng)結(jié)構(gòu)圖  BPAD圖  C數(shù)據(jù)流圖（DFD圖）  D程序流程圖  （11）以下合法的VB變量名是（）。  Acase Bname10 Ct-name Dx*y  （12）設(shè)x

5、是小于10的非負數(shù)。對此陳述，以下正確的VB表達式是（）。  A0x<10  B0<=x<10  Cx>=0 and x<10  Dx>=0 or x<=10  （13）以下關(guān)于窗體的敘述中錯誤的是（）。  A窗體的Name屬性用于標識一個窗體  B運行程序時，改變窗體大小，能夠觸發(fā)窗體的Resize事件  C窗體的Enabled屬性為False時，不能響應單擊窗體的事件  D程序運行期間，可以改變Name屬性值 

6、 （14）下面定義窗體級變量a的語句中錯誤的是（）。  ADim a%  Bprivate a%  CPrivate a As Integer  DStatic a%  （15）表達式Int(Rnd(0)*50)所產(chǎn)生的隨機數(shù)范圍是（）。  A （0，50）  B （1，50）  C （0，49）  D （1，49）  （16）設(shè)x=5，執(zhí)行語句Print x=x+10，窗體上顯示的是（

7、）。  A15 B5 CTrue DFalse  （17）設(shè)有如下數(shù)組聲明語句：  Dim arr（-2 to 2,0 to 3）AS Integer  該數(shù)組所包含的數(shù)組元素個數(shù)是（）。  A20 B16 C15D12  （18）現(xiàn)有由多個單選按鈕構(gòu)成的控件數(shù)組，用于區(qū)別該控件數(shù)組中各控件的屬性是（）。  AName  BIndex  CCaption  DValue  （1

8、9）設(shè)有分段函數(shù)： ASelect Case xCase Is<0Y=5Case Is <=5,Is>0 Y=2*x Case elseEnd selectBIf x<0 Theny=5Elseif x<=5 theny=2*xElse y=x*x+1End ifCy=iifx<0.5，iif(x<=5.2*x，x*x+1) DIf x<0 Then y=5If x<=5 and x>=0 then y=2*xIf x>5 then y=x*x+1（20）設(shè)程序中有如下語句： X=inputbox(“輸入”,“數(shù)據(jù)”,

9、100) Print X 運行程序，執(zhí)行上述語句，輸入5并單擊輸入對話框上的“取消“按鈕，則窗體上輸出（）。 A0 B5 C100 D空白 （21）現(xiàn)有如下一段程序： Option Base 1 Private Sub Command1_Click() Dim a a=Array(3,5,7,9) x=1 For i=4 to 1 Step -1 S=s+a ( i )*x x=x*10 Next Print s E

10、nd Sub 執(zhí)行程序，單擊Command1命令按鈕，執(zhí)行上述事件過程，輸出結(jié)果是（）。 A9753 B3579 C35 D79 （22）設(shè)有一個命令按鈕Commsand1的事件過程以及一個函數(shù)過程。程序如下： Private Sub Command1_Click(0 Static x As Integer x=f(x+5) Cls Print x End Sub Private Funtion f(x As integer)As In

11、teger F=x+x End Funtion 連續(xù)單擊命令按鈕3次，第3次單擊命令按鈕后，窗體上顯示的計算結(jié)果是（）。 A10 B30 C60 D70 （23）以下關(guān)于菜單設(shè)計的敘述中錯誤的是（）。 A各菜單項可以構(gòu)成控件數(shù)組 B每個菜單項可以看成是一個控件 C設(shè)計菜單是，菜單項的“有效” 表選，即有效(E),表示該菜單項不顯示 D菜單項只響應單擊事件 （24）以下關(guān)于多窗體的敘述中，正確的是（）。 A任何時刻，只有一個當前窗體 B向一個工程添加多個窗體，存盤后生成一個窗體文件 C打開一個窗體時，其他窗體自動關(guān)閉 D只有第一個建立的窗體才是啟

12、動窗體 （25）窗體上有一個名稱為CommonDialog1的通用對話框，一個名稱為Command1的命令按鈕，并有如下事件過程： Private Sub Command1_Click() CommandDialog1.DefaultExt=”doc” CommandDialog1.FileName=”VB.txt” CommandDialog1.FileName=”All(*.*)|*.*|Word|*.Doc|” CommandDialog1.FileName=1 CommandDialog1.ShowSave End Sub 運行上述程序，如下敘述正確的是（

13、）。 A 打開的對話框中文件“保存類型”框中顯示“All(*.*)” B 實現(xiàn)保存文件的操作，文件名是VB.txt C DefaultExt屬性與FileName屬性所指明的文件類型不一致，程序出錯 D 對話框的Filter屬性沒有指出txt類型，程序運行出錯 （26）設(shè)程序中有如下數(shù)組定義和過程調(diào)用語句： Dim a(10) As Integer Call p(a) 如下過程定義中，正確的是（）。 A Private Sub p(a As Integer) B&#

14、160;Private Sub p(a() As Integer) C Private Sub p(a(10) As Integer) D Private Sub p(a(n) As Integer) （27）若要獲得組合框中輸入的數(shù)據(jù)，可使用的屬性是（）。 AListindex BCaption CText DList （28）在窗體上畫兩個名稱分別為Text1、Text2的文本框。Text1的Text屬性為“Database”， 如圖所示。 現(xiàn)有如下事

15、件過程： Private Sub Text1_Change() Text2.Text=Mid(Text1,1,1) End Sub 運行程序，在文本框Text1中原有字符之前輸入a，Text2中顯示的是：（）。 A DataA B DataB C aData  D aBase （29）有如下程序： Option Base ! Private Sub Command1_Click() Dim arr(10) arr=Array(10,35,28,90,54,

16、68,72,90) For Each a In arr If a>50 Then Sum=Sun+a End If Next a End Sub 運行上述程序時出現(xiàn)錯誤，錯誤之處是（）。 A 數(shù)組定義語句不對，應改為Dim arr B 沒有指明For循環(huán)的終值 C 應在For語句之前增加Sum=0 D Next a應改為Next （30）要求產(chǎn)生10個隨機整數(shù)，存放在數(shù)組arr中，從鍵盤輸入要刪除的數(shù)組元素的下標，將該元素中的數(shù)組刪除，后面

17、元素中的數(shù)據(jù)依次前移，并顯示刪除后剩余的數(shù)據(jù)，現(xiàn)有如下程序： Option Base 1 Private Sub Command1_Click() Dim arr(10) AS Integer  For i=1 to 10 arr(i)=int (Rnd*100) Print arr(i); Next x=inputbox(“輸入1到10的一個整數(shù)：”) For i=x+1 to 10 循環(huán)2 arr(i-1)=arr(i)

18、Next For i=1 to 10 循環(huán)3 Print arr(i); Next End Sub 程序運行后發(fā)現(xiàn)顯示的結(jié)果不正確，應該進行的修改是（）。 A 產(chǎn)生隨機數(shù)時不使用Int函數(shù) B 循環(huán)2的初始值應為i=x C 數(shù)組定義改為Dim a(11) as integer D 循環(huán)3是循環(huán)終值應改為9 （31）使用驅(qū)動器列表框Drive1、目錄列表框Fiel1時，需要設(shè)置控件的同步，以下能夠正確設(shè)置兩個同步的命令是（）。 ADir1.path=Drive.pat

19、e BFile1.path=Dir1.pate CFile1.path=Drive1.pate DDrive1.Drive=Dir1.pate （32） 以下關(guān)于彈出式菜單的敘述中，錯誤的是（）。 A一個窗體只能有一個彈出式菜單 B彈出式菜單在菜單編輯器中建立 C彈出式菜單的菜單名（主菜單項）的“可見”屬性通常設(shè)置為False D彈出式菜單通過窗體的PopupMenu方法顯示 （33）有如下程序： Private Type stu X As String Y As Integer End Type Private&

20、#160;Sub Command1_Click() Dim a As stu a.x=”ABCD” a.y=12345 Print a End Sub 程序運行時出現(xiàn)錯誤，錯誤的原因是（）。 A Type定義語句沒有放在標準模塊中 B 變量聲明語句有錯 C 賦值語句不對 D 輸出語句Print不對 （34）在窗體上畫兩個名稱分別為Text1、Text2的文本框，一個名稱為Lable1的標簽。窗體外觀如圖a所示。要求當改變?nèi)我粋€文本框的內(nèi)容，就會將該文本框的內(nèi)容顯示在標簽中，如圖b所示。實現(xiàn)上述功

21、能如下： Pivate Sub Text1_Change() Call ShowText(Text1) End Sub Private Sub Text2 Change() Call ShowText(Text2) End Sub private Sub showText(T As TextBox) Label1.Caption=”文本框中的內(nèi)容是：”&T.Text Enb Sub 關(guān)于上述程序，以下敘述中錯誤的是（）。 A ShowTe

22、xt過程的參數(shù)類型可以是Control B ShowText過程的參數(shù)類型可以是Variant C 兩個過程調(diào)用語句有錯，應分別改為Call ShowText（Text1.Text）、CallShowText（Text2.Text） D ShowText過程中的T是控件變量 （35）設(shè)有打開文件的語句如下： Open“test.dat” For Random As #1 要求把變量a中的數(shù)據(jù)保存到該文件中，應該使用的語句是（）。 A Inpur #1，a B Write #1

23、.a C Put #1，.a D Get #1.a二、 填空題（每空2分，共30分）請將每空的正確答案寫在答題卡【1】【15】序號的橫線上，答在試卷上不得分。（1） 在長度為n的順序存儲的線性表中刪除一個元素，最壞情況下需要移動表中的元素個數(shù)為 （）。（2）設(shè)循環(huán)隊列的存儲空間為Q（1：30），初始狀態(tài)為Front=rear=30.現(xiàn)經(jīng)過一系列入隊與退隊運算后，front=16，rear=15，則循環(huán)隊列中有（）個元素。（3）數(shù)據(jù)庫管理系統(tǒng)提供的數(shù)據(jù)語言中，負責數(shù)據(jù)的增、刪、改和查詢的是（）。（4）在將E-R圖轉(zhuǎn)換到關(guān)系模式時，實體和聯(lián)系都可以

24、表示成（）。（5）常見的軟件工程方法有結(jié)構(gòu)化方法和面向?qū)ο蠓椒?，類、繼承以及多態(tài)性等概念屬于（）。（6）下面的事件過程執(zhí)行時，可以把Text1文本框中的內(nèi)容寫到文件“file1.txt“中去。請?zhí)羁铡ivate Sub Command1_Click()Open “file1.txt”For    （6）   As#1print    （7）   Text1.TextClose #1End Sub（7）設(shè)窗體上有一個名稱為Lable1的標簽。程序運行時，單擊鼠標左鍵，再移動鼠標，鼠標的

25、位置坐標會實時地顯示在Lable1標簽中：單擊鼠標右鍵則停止實時顯示，并將標簽中內(nèi)容清除。下面的程序可實現(xiàn)這一功能，請?zhí)羁?。Dim Down As BooleanPrivate Sub Form _MouseDown(Button As Integer，Shift  As Integer，x As Single，Y As Single)Select Case   （8）   Case 1Down=TrueCase 2Down=FalseEnd SelectEnd SubPrivate Sub Form _MouseMove(Button As Integer，Shift  As Integer，X As Single，Y As Single)If   （9）      （10）   =”X=”& X &”  Y=”& YElseLabel1.Caption=”End ifSub（8）窗體上有List1、List2兩個列表框，程序運行時，在兩個列表框中分別選中1個項目，如圖a所示，單擊名稱為Command1的“交換”按鈕，則把選中的項目互換，互換后的位置不限