1、計算機等級考試二級VB全真模擬卷（一）一、選擇題 (1) 棧和隊列的共同特點是A) 都是先進(jìn)先出 B) 都是先進(jìn)后出C) 只允許在端點處插入和刪除元素 D) 沒有共同點答案： C(2) 已知二叉樹后序遍歷序列是dabec，中序遍歷序列是debac，它的前序遍歷序列是A) acbed B) decab C) deabc D) cedba答案：D(3) 鏈表不具有的特點是A) 不必事先估計存儲空間 B) 可隨機訪問任一元素C) 插入刪除不需要移動元素 D) 所需空間與線性表長度成正比答案：B(4) 結(jié)構(gòu)化程序設(shè)計的3種結(jié)構(gòu)是A) 順序結(jié)構(gòu)、選擇結(jié)構(gòu)、轉(zhuǎn)移結(jié)構(gòu)B) 分支結(jié)構(gòu)、等價結(jié)構(gòu)、循環(huán)結(jié)構(gòu)C)

2、多分支結(jié)構(gòu)、賦值結(jié)構(gòu)、等價結(jié)構(gòu)D) 順序結(jié)構(gòu)、選擇結(jié)構(gòu)、循環(huán)結(jié)構(gòu)答案：D(5) 為了提高測試的效率，應(yīng)該 A) 隨機選取測試數(shù)據(jù)B) 取一切可能的輸入數(shù)據(jù)作為測試數(shù)據(jù)C) 在完成編碼以后制定軟件的測試計劃D) 集中對付那些錯誤群集的程序答案：D(6) 算法的時間復(fù)雜度是指A) 執(zhí)行算法程序所需要的時間B) 算法程序的長度C) 算法執(zhí)行過程中所需要的基本運算次數(shù)D) 算法程序中的指令條數(shù)答案：C(7) 軟件生命周期中所花費用最多的階段是A) 詳細(xì)設(shè)計 B) 軟件編碼 C) 軟件測試 D) 軟件維護(hù)答案：D(8) 數(shù)據(jù)庫管理系統(tǒng)DBMS中用來定義模式、內(nèi)模式和外模式的語言為 A) C B) Bas

3、ic C) DDL D) DML答案：C(9) 下列有關(guān)數(shù)據(jù)庫的描述，正確的是A) 數(shù)據(jù)庫是一個DBF文件 B) 數(shù)據(jù)庫是一個關(guān)系C) 數(shù)據(jù)庫是一個結(jié)構(gòu)化的數(shù)據(jù)集合 D) 數(shù)據(jù)庫是一組文件答案：C(10) 下列有關(guān)數(shù)據(jù)庫的描述，正確的是A) 數(shù)據(jù)處理是將信息轉(zhuǎn)化為數(shù)據(jù)的過程B) 數(shù)據(jù)的物理獨立性是指當(dāng)數(shù)據(jù)的邏輯結(jié)構(gòu)改變時，數(shù)據(jù)的存儲結(jié)構(gòu)不變C) 關(guān)系中的每一列稱為元組，一個元組就是一個字段D) 如果一個關(guān)系中的屬性或?qū)傩越M并非該關(guān)系的關(guān)鍵字，但它是另一個關(guān)系的關(guān)鍵字，則稱其為本關(guān)系的外關(guān)鍵字答案：D(11) 關(guān)于Visual Basic"方法"的概念錯誤的是A) 方法是對象

4、的一部分 B) 方法是預(yù)先定義好的操作C) 方法是對事件的響應(yīng) D) 方法用于完成某些特定的功能答案：C(12) 下列說法有錯誤的是A) 默認(rèn)情況下，屬性Visible的值為FalseB) 如果設(shè)置控件的Visible屬性為False，則運行時控件會隱藏C) Visible的值可設(shè)為True或者FalseD) 設(shè)置Visible屬性同設(shè)置Enabled屬性的功能是相同的，都是使控件處于失效狀態(tài)答案：D(13) 下列各控件不包含滾動條的控件是A) ListBox B) ComboBox C) TextBox D) LabelBox答案：D(14) 如果在程序中要將c定義為靜態(tài)變量，且為整型數(shù)，則

5、應(yīng)使用的語句是A) Redim a As Integer B) Static a As IntegerC) Public a As Integer D) Dim a As Integer 答案：B(15) 聲明一個變量為局部變量應(yīng)該用A) Global B) PrivateC) Static D) Public答案：C(16) 執(zhí)行x$=InputBox("請輸入x的值") 時，在彈出的對話框中輸入123，在列表框List1選中1個列表項(數(shù)據(jù)為456) ，使有的值使123456的語句是A) y=x$+List1.List(0) B) y=x$+List1.List(1)

6、C) y=Val(x$) +Val(List1.List(0) ) D) y=Val(x$) & Val(List1.List(1) )答案：A(17) 以下各項中，Visual Basic不能接收的圖形文件是A) .ico文件 B) .jpg文件C) .psd文件 D) .bmp文件答案：C(18) 下面的屬性中，用于自動調(diào)整圖像框中圖形內(nèi)容的大小的是A) Picture B) CurentYC) CurrentX D) Stretch答案：D(19) 下面有關(guān)注釋語句的格式，錯誤的是A) Rem注釋內(nèi)容B) 注釋內(nèi)容C) a=3:b=2 對a、b賦值D) Private Sub C

7、ommand1_MouseDown(button As Integer , shift As Integer , _ Rem 鼠標(biāo)按下事件的命令調(diào)用過程 X As Single ,Y As Single) 答案：D(20) 只有將組合框的Style屬性設(shè)置為何值時，才能觸發(fā)DblClick事件？A) 0 B) 1 C) 2 D) 3答案：B(21) 以下屬于Visual Basic合法的數(shù)組元素是A) x8 B) x8C) s(0) D) v8正確答案：C(22) 編寫如下兩個事件過程：Private Sub Form_KeyDown (KeyCode As Integer, Shift As

8、 Integer) Print Chr(KeyCode) End SubPrivate Sub Form_KeyPress(KeyAscii As Integer) Print Chr(KeyAscii) End Sub在一般情況下(即不按住Shift鍵和鎖定大寫鍵時) 運行程序，如果按"A"鍵，則程序輸出的結(jié)果是A) A aB) aA C) A A D) aa 正確答案：C(23) 要使菜單項MenuOne在程序運行時失效，使用的語句是A) MenuOne.Visible=True B) MenuOne.Visible=FalseC) MenuOne.Enabled=Tr

9、ue D) MenuOne.Enabled=False答案：D(24) 在窗體上建立通用對話框需要添加的控件是A) Data控件 B) From控件C) CommonDialog控件 D) VBComboBox控件答案：C(25) 在Visual Basic中，要將一個窗體加載到內(nèi)存進(jìn)行預(yù)處理但不顯示，應(yīng)使用的語句是A) Load B) ShowC) Hide D) Unload答案：A(26) 運行下列程序段后，顯示的結(jié)果為J1=4J2=9If J1<J2 Then Print J2 Else Print J1A) 4 B)9C) 13 D) 49答案：B(27) 下列語句正確的是A)

10、 If AB Then Print "A不等于B"B) If A<>B Then Printf "A不等于B"C) If A<>B Then Print "A不等于B"D) If AB Print "A不等于B"答案：C(28) 下面語句正確的是A) If x<3y And x>y Then y=x3B) If x<3y And x>y Then y=3xC) If x<3y:x>y Then y=x3D) If x<3y And x>y Th

11、en y=x* *3答案：A(29) 計算z的值，當(dāng)x大于y時，z=x；否則z=y。下列語句錯誤的是A) If x>=y Then z=x : z=y B) If x>=y Then z=x Else z=yC) z=y : If x>=y Then z=x D) If x<=y Then z=y Else z=x答案：A(30) 下列程序段執(zhí)行結(jié)果為x=5y=-6If Not x>0 Then x=y-3 Else y=x+3Print x-y; y-xA) -3 3 B) 5 -9C) 3 -3 D) -6 5答案：A(31) 不能脫離控件(包括客體) 而獨立

12、存在的過程是A) 事件過程 B) 通用過程C) Sub過程 D) 函數(shù)過程答案：A(32) Sub過程與Function過程最根本的區(qū)別是A) Sub過程可以用Call語句直接使用過程名調(diào)用，而Function過程不可以B) Function過程可以有形參，Sub過程不可以C) Sub過程不能返回值，而Function過程能返回值D) 兩種過程參數(shù)的傳遞方式不同答案： C(33) 單擊命令按鈕時，下列程序的執(zhí)行結(jié)果為Private Sub Command1_Click() Dim x As Integer, y As Integerx=12:y=32 Call Proc(x,y) Print

13、x; yEnd SubPublic Sub Proc(n As Integer, ByVal m As Integer) n=n Mod 10m=m Mod 10End SubA) 1232 B) 232C) 23 D) 123答案：B(34) 單擊命令按鈕時，下列程序的執(zhí)行結(jié)果是Private Sub Command1_Click() Dim a As Integer, b As Integer, c As Integera=3b=4c=5Print SecProc(c, b, A) End SubFunction FirProc(x As Integer, y As Integer, z

14、As Integer) FirProc=2x+y+3zEnd FunctionFunction SecProc(x As Integer, y As Integer, z As Integer) SecProc=FirProc(z, x, y) +xEnd FunctionA) 20 B) 22C) 28 D) 30答案：C(35) 下列程序的執(zhí)行結(jié)果為Private Sub Command1_Click() Dim FirStr As StringFirSt="abcdef"Print Pat(FirStr) End SubPrivate Function Pat(xSt

15、r As String) As StringDim tempStr As String, strLen As IntegertempStr=""strLen=Len(xStr) i=1Do While i<=Len(xStr) -3tempStr=tempStr+Mid(xStr, i, 1) +Mid(xStr, strLen -i+1, 1) i=i+1LoopPat=tempStrEnd FunctionA) abcdef B) afbecdC) fedcba D) defabc正確答案：B二、填空題（無答題記錄！）(1) 算法的基本特征是可行性、確定性、 【1

16、】 和擁有足夠的情報。正確答案：有窮性(2) 在長度為n的有序線性表中進(jìn)行二分查找。最壞的情況下，需要的比較次數(shù)為 【2】 。正確答案：log2n(3) 在面向?qū)ο蟮某绦蛟O(shè)計中，類描述的是具有相似性質(zhì)的一組 【3】 。正確答案：對象(4) 通常，將軟件產(chǎn)品從提出、實現(xiàn)、使用維護(hù)到停止使用退役的過程稱為 【4】 。正確答案：軟件生命周期(5) 數(shù)據(jù)庫管理系統(tǒng)常見的數(shù)據(jù)模型有層次模型、網(wǎng)狀模型和 【5】 3種。正確答案：關(guān)系模型(6) Visual Basic對象可以分為兩類，分別為 【6】 和 【7】 。正確答案：預(yù)定義對象正確答案：用戶定義對象(7) 完成下面的程序，使顯示結(jié)果如下圖所示。Pr

17、ivate Sub Form_Click() FontSize=18Sample=" 【8】 "x=(ScaleWidth-TextWidth(Sample) ) /2y=(ScaleHeight-TextHeight(Sample) ) /2CurrentX=xCurrentY=y【9】 SampleEnd Sub正確答案：Welcome to Beijing !正確答案：Print(8) 下列程序的功能是：當(dāng)x<50時，y=0.8×x；當(dāng)50x100時，y=0.7×x；當(dāng)x>100時，沒有意義。請?zhí)羁铡rivate Sub Comman

18、d1_Click() Dim x As Singlex=InputBox("請輸入x的值！") 【10】 Case Is < 50y=0.8 * xCase 50 To 100y=0.7 * x【11】 Print "輸入的數(shù)據(jù)出界！"End SelectPrint x, yEnd Sub正確答案：Select Case x正確答案：Case Else(9) 改變驅(qū)動器列表框的Drive屬性值將引發(fā) 【12】 事件。正確答案：Change(10) 下面程序是由鼠標(biāo)事件在窗體上畫圖，如果按下鼠標(biāo)將可以畫圖，雙擊窗體可以清除所畫圖形。補充完整下面的程序。首先在窗體層定義如下變量：Dim PaintStart As Boolean編寫如下事件過程：Private Sub Form_Load() DrawWidth=2ForeColor=vbGreenEnd SubPrivate Sub Form_MouseDown(Button As Integer, Shift As Integer, _X As Single, Y As S