二級(jí)vb筆試歷年真卷2011年3月

1、2011 年 3 月計(jì)算機(jī)等級(jí)二級(jí)筆試試卷Visual Basic 語(yǔ)言程序設(shè)計(jì)（時(shí)間 90 分鐘，滿分 100 分）一、選擇題（每小題 2 分，共 70 分）下列各題A）、B）、C）、D）四個(gè)選項(xiàng)中，只有一個(gè)選項(xiàng)是正確的。請(qǐng)將正確選項(xiàng)填涂在答題卡相應(yīng)位置上，答在試卷上不得分。（1）下列關(guān)于棧敘正確的是（）。A）棧頂元素最先能被刪除B）棧頂元素最后才能被刪除C）棧底元素不能被刪除D）以上三種說法都不對(duì)（2）下列敘述中正確的是（）。A）有一個(gè)以上根結(jié)點(diǎn)的數(shù)據(jù)結(jié)構(gòu)不一定是非線性結(jié)構(gòu) B）只有一個(gè)根結(jié)點(diǎn)的數(shù)據(jù)結(jié)構(gòu)不一定是線性結(jié)構(gòu) C）循環(huán)鏈表是非線性結(jié)構(gòu) D）雙向鏈表是非線性結(jié)構(gòu)（3）某二叉樹共有

2、7 個(gè)結(jié)點(diǎn)，其中葉子結(jié)點(diǎn)只有 1 個(gè)，則該二叉樹的深度為（假設(shè)根結(jié)點(diǎn)在第 1 層）（）。A）3（4）在A）B）4開發(fā)中，需求分析階段產(chǎn)生的主要文檔是（集成測(cè)試計(jì)劃C）6）。）D）D）7詳細(xì)設(shè)計(jì)說明書需求規(guī)格說明書C）用戶手冊(cè)（5）結(jié)構(gòu)化程序所要求的基本結(jié)構(gòu)不包括（A）順序結(jié)構(gòu) C）選擇（分支）結(jié)構(gòu)）。B）GOTO 跳轉(zhuǎn)D）重復(fù)（循環(huán)）結(jié)構(gòu)（6）下面描述中錯(cuò)誤的是（A）系統(tǒng)總體結(jié)構(gòu)圖支持）。系統(tǒng)的詳細(xì)設(shè)計(jì)B）設(shè)計(jì)是將需求轉(zhuǎn)換為表示的過程C）數(shù)據(jù)結(jié)構(gòu)與數(shù)據(jù)庫(kù)設(shè)計(jì)是設(shè)計(jì)的任務(wù)之一D）PAD 圖是詳細(xì)設(shè)計(jì)的表示工具（7）負(fù)責(zé)數(shù)據(jù)庫(kù)中查詢操作的數(shù)據(jù)庫(kù)語(yǔ)言是（）。A）數(shù)據(jù)定義語(yǔ)言B）數(shù)據(jù)管理語(yǔ)言C）數(shù)據(jù)語(yǔ)

3、言D）數(shù)據(jù)控制語(yǔ)言（8）一個(gè)教師可講授多門課程，一門課程可由多個(gè)教師講授。則實(shí)體教師和課程間的聯(lián)系是（）。A）1：1 聯(lián)系（9）有三個(gè)關(guān)系R、S 和T 如下（RB）1：m 聯(lián)系）。SC）m:1 聯(lián)系D）m n 聯(lián)系T則由關(guān)系R 和 S 得到關(guān)系 T 的操作是A）自然連接B）交C）除D）并2011 年 3 月筆試真卷及詳解 第 1 頁(yè)（共 12 頁(yè)）C1ABc3ABCa12b21c31（10）定義無(wú)符號(hào)整數(shù)類為U A）-369C）0.369，下面可以作為類U實(shí)例化值的是（B）369）。D）整數(shù)集合1，2，3，4，5（11）在 Visual Basic 集成環(huán)境中，可以列出工程中所有模塊名稱的窗口

4、是（）。A）工程資源管理器窗口C）屬性窗口B）窗體設(shè)計(jì)窗口D）代碼窗口（12）假定編寫了如下 4 個(gè)窗體事件的事件過程，則運(yùn)行應(yīng)用程序并顯示窗體后，已經(jīng)執(zhí)行的事件過程是（A）Load）。B）ClickC）LostFocusD）KeyPress（13）為了使A）Caption具有“透明”的顯示效果，需要設(shè)置的屬性是（）。B）AlignmentC）BackStyleD）AutoSize（14）下面可以產(chǎn)生 2030（含 20 和 30）的隨機(jī)整數(shù)的表達(dá)式是（）。A） (Rnd*10+20)C） (Rnd*20+30)B） (Rnd*11+20)D） (Rnd*30+20)（15）設(shè)窗體上有一個(gè)名稱

5、為 HSl 的水平滾動(dòng)條，如果執(zhí)行了語(yǔ)句：HSl.Value = (HSl.Max - HSl.Min) / 2 + HSl.Min 則（A）滾動(dòng)塊處于最左端 B）滾動(dòng)塊處于最右端 C）滾動(dòng)塊處于中間位置）。D）滾動(dòng)塊可能處于任何位置，具置取決于 Max、Min 屬性的值（16）窗體上有一個(gè)名稱為 Cbl 的組合框，程序運(yùn)行后，為了輸出選中的列表項(xiàng)，應(yīng)使用的語(yǔ)句是（）。A）PrCbl.SelectedC）PrCbl.Selected.TextB）PrCbl.List(Cbl.ListIndex)D）PrCbl.List(Listlndex)（17）為了在窗體上建立 2 組單選按鈕，并且當(dāng)程序運(yùn)

6、行時(shí)，每組都可以有一個(gè)單選按鈕被選中，則以下做法中正確的是（）。把這 2 組單選按鈕設(shè)置為名稱不同的 2 個(gè)控件數(shù)組使 2 組單選按鈕的Index 屬性分別相同使 2 組單選按鈕的名稱分別相同把 2 組單選按鈕分別畫到 2 個(gè)不同的框架中如果一個(gè)直線控件在窗體上呈現(xiàn)為一條垂直線，則可以確定的是（它的 YI、Y2 屬性的值相等它的 X1、X2 屬性的值相等它的 X1、Y1 屬性的值分別與 X2、Y2 屬性的值相等它的 Xl、X2 屬性的值分別與 Y1、Y2 屬性的值相等）。（19）設(shè)a=2，b=3，c=4，d=5，則下面語(yǔ)句的輸出是（Pr3 2 * b Or a = c And b c Or c

7、 d）。A）False（20）窗體 Form1 上有一個(gè)名稱為B）lC）TrueD）-ld1令按鈕，以下對(duì)應(yīng)窗體單擊事件的事件過程是（）。A）Private Sub Form 1_Click()End SubB）Private Sub Form_Click()End Sub2011 年 3 月筆試真卷及詳解 第 2 頁(yè)（共 12 頁(yè)）C）Private SubEndSub默認(rèn)情況下，下面 Dim a(5, -2 To 2) A）20設(shè)有如下程序段：Dim a(10)For Each x ln adl_Click()D）Private Subdl_Click()End Sub的數(shù)組的元素個(gè)數(shù)是（

8、）。B）24C）25D）30PNext xx;在上面的程序段中，變量x 必須是（）。A）整型變量（23）設(shè)有以下函數(shù)過程Private Function Fun(a() AsEnd Function若已有變量：B）變體型變量C）動(dòng)態(tài)數(shù)組D）靜態(tài)數(shù)組eger,b As String)AsegerDim x(5)Aseger，n Aseger，ch As String則下面正確的過程調(diào)用語(yǔ)句是（A）x(0) = Fun(x, ch) C）Call Fun x,ch（24）假定用下面的語(yǔ)句打開文件： Open Filel.Txt For Input As #l則不能正確讀文件的語(yǔ)句是（ A）Inpu

9、t #1, ch$C）ch$ = Input$(5, #1)）。B）n = Fun(n, ch)D）n = Fun(x(5), ch)）。B）Line Input #1, ch$D）read #1,ch$（25）下面程序的執(zhí)行結(jié)果是（）。Private Suba = 10For k = 1 To 5 Step -1 a = a - kNext kPa; k End SubA）-5 6d1_Click()B）-5 -5C）10 0d1D）10 l令按鈕，并有以下（26）設(shè)窗體上有一個(gè)名為 Text1 的文本框和一個(gè)名為事件過程：Private Subd1_Click()x! = Val(Text

10、1.Text) Select Case xCase Is = 20P輸入錯(cuò)誤Case Is 0P20 - x2011 年 3 月筆試真卷及詳解 第 3 頁(yè)（共 12 頁(yè)）Case Is 10P20Case Is 5 Or x -1 NextEnd Sub運(yùn)行程序，其中 Do 循環(huán)執(zhí)行的次數(shù)是（）。A）15（28）閱讀程序：Private SubDim arr Dim i AsB）10C）7D）3d1_Click()egerarr = Array(0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10)For i = 0 To 2Prarr(7 - i);Next End Sub程序運(yùn)

11、行后，窗體上顯示的是（）。6 5A）8 7 6（29）在窗體上畫一個(gè)名為B）7d1C）6 5 4D）54 3令按鈕，然后編寫以下程序：Private SubDim a(10) Asd1_Click()egerFor k = 10 To 1 Step -1 a(k) = 20 - 2 * kNext kk = k + 7Pra(k - a(k)End Sub運(yùn)行程序，單擊命令按鈕，輸出結(jié)果是（）。A）18（30）窗體上有一個(gè)名為Private SubDim a(10), x% For k = 1 To 10B）12C）8D）6dl令按鈕，并有如下程序：d1_Click()a(k) =(Rnd *

12、 90 + 10)x = x + a(k) Mod 22011 年 3 月筆試真卷及詳解 第 4 頁(yè)（共 12 頁(yè)）Next k PxEnd Sub程序運(yùn)行后，單擊命令按鈕，輸出結(jié)果是（）。A）10 個(gè)數(shù)中奇數(shù)的個(gè)數(shù)B）10 個(gè)數(shù)中偶數(shù)的個(gè)數(shù)C）10 個(gè)數(shù)中奇數(shù)的累加和 D）10 個(gè)數(shù)中偶數(shù)的累加和（31）窗體上有一個(gè)名為Private Subdld1_Click()令按鈕和一個(gè)名為 Timerl 的計(jì)時(shí)器，并有下面的事件過程：Timerl.Enabled=True EndSubPrivate Sub Form_Load() Timerl.erval=10 Timerl.Enabled=Fal

13、seEnd SubPrivate Sub Timerl_Timer()mandl.Left+10End Sub程序運(yùn)行時(shí)，單擊命令按鈕，則產(chǎn)生的結(jié)果是（A）命令按鈕每 10 秒向左移動(dòng)一次C）命令按鈕每 10 毫秒向左移動(dòng)一次）。B）命令按鈕每 10 秒向右移動(dòng)一次D）命令按鈕每 10 毫秒向右移動(dòng)一次（32）設(shè)窗體上有一個(gè)名為L(zhǎng)istl 的列表框，并編寫下面的事件過程：Private Sub Listl_Click()Dim ch As String ch=Listl.List(Listl.ListIndex)List1.RemoveItem List 1.ListIndex List1.A

14、ddItem chEndSub-程序運(yùn)行時(shí)，單擊一個(gè)列表項(xiàng)，則產(chǎn)生的結(jié)果是（A）該列表項(xiàng)被移到列表的最前面 C）該列表項(xiàng)被移到列表的最后面）。B）該列表項(xiàng)被刪除 D）該列表項(xiàng)被刪除后又在原位置（33）窗體上有一個(gè)名為Private Subdl令按鈕，并有如下程序：d1_Click()Dim a As a = 8b = 12eger, b AsegerPrfun(a, b); a; b End SubPrivate Function Fun(ByVal a As a = a Mod 5b = b 5 Fun = aEnd Functioneger, b Aseger) Aseger程序運(yùn)行時(shí)，單

15、擊命令按鈕，則輸出結(jié)果是（）。A）3 3 2B）3 8 2C）8 8 12編寫了下面的程序：D）3 8 12（34）為了從當(dāng)前文件夾中讀入文件File1.txt，Private Subd1_Click()Open File1.txt For Output As #202011 年 3 月筆試真卷及詳解 第 5 頁(yè)（共 12 頁(yè)）Do While Not EOF(20)Line Input #20, ch$PLoop Close #20End Subch程序調(diào)試時(shí)，發(fā)現(xiàn)有錯(cuò)誤，下面的修改方案中正確的是（）。A）在Open 語(yǔ)句中的文件名前添加路徑B）把程序中各處的“20”改為“1”D）把Open

16、 語(yǔ)句中的Output 改為InputC）把Prch 語(yǔ)句改為Pr（35）以下程序運(yùn)行后的窗體# 20，ch。其中組合框的名稱是 Combo1，已有列表框；命令按鈕的名稱是Private Subd1。d1_Click()If Not Check(Combo1.Text) Then MsgBox (輸入錯(cuò)誤)Exit Sub End IfFor k = 0 To Combo1.ListCount - 1If Combo1.Text = Combo1.List(k) Then MsgBox (添加項(xiàng)目失敗)Exit Sub End IfNext kCombo1.AddItem Combo1.Tex

17、t MsgBox (添加項(xiàng)目成功)End SubPrivate Function Check(ch As String) As n = Len(ch)For k = 1 To nc$ = UCase(Mid(ch, k, 1) If c Z ThenCheck = False Exit FunctionEnd If Next k Check = TrueEnd Function程序運(yùn)行時(shí)。如果在組合框的編輯區(qū)中輸入“Java”，則單擊命令按鈕后產(chǎn)生的結(jié)果是（）。A）顯示“輸入錯(cuò)誤”C）顯示“添加項(xiàng)目成功”B）顯示“添加項(xiàng)目失敗”D）沒有任何顯示二、填空題(每空 2 分，共 30 分)請(qǐng)將每空的

18、正確寫在答題卡【l】至【15】序號(hào)的橫線上，答在試卷上不得分。（1）有序線性表能進(jìn)行二分查找的前提是該線性表必須是 【1】 的。（2）一顆二叉樹的中序遍歷結(jié)果為 DBEAFC，前序遍歷結(jié)果為 ABDECF，則后序遍歷結(jié)果為 【2】 。（3）對(duì)設(shè)計(jì)的最?。K或程序單元）進(jìn)行的測(cè)試通常稱為 【3】 測(cè)試。（4）實(shí)體完整性約束要求關(guān)系數(shù)據(jù)庫(kù)中元組的 【4】 屬性值不能為空。（5）在關(guān)系 A(,D)和關(guān)系 B(,NM)中，A 的主關(guān)鍵字是 S，B 的主關(guān)鍵字是 D,則稱 【5】 是關(guān)系 A2011 年 3 月筆試真卷及詳解 第 6 頁(yè)（共 12 頁(yè)）的外碼。（6）在窗體上有 1 個(gè)名稱為d1令按鈕，

19、并有如下事件過程和函數(shù)過程：Private SubDim p Asd1_Click()egerp = m(1) + m(2) + m(3)PpEnd SubPrivate Function m(n Aseger) AsegerS ic s AsegerFor k = 1 To ns = s + 1Next m = sEnd Function運(yùn)行程序，單擊命令按鈕（7）在窗體上畫 1 個(gè)名稱為dl 后的輸出結(jié)果為 【6】 。令按鈕，然后編寫如下程序：d1Private Subd1_Click()Dim m Aseger, x As Dim flag Asflag = Falseegern = Val(InputBox(請(qǐng)輸入任意 1 個(gè)正整數(shù))Do While Not flag a = 2flag = 【7】 Do While flag And a i Theni = i + 1a(i) = 【10】 End IfLoop While i a(j) Then temp = a(i): a(i) = a(j): 【12】 Next j Next iFor i =