2006年9月全國計算機等級考試二級VB語言筆試試題及答案

1、2006年9月全國計算機等級考試二級筆試試卷公共基礎知識和Visual Basic語言程序設計(考試時間90分鐘，滿分100分)一、選擇題(第小題2分,共70分) 下列各題A)、B)、C)、D)四個選項中，只有一個選項是正確的。請將正確選項填涂在答題卡相應位置上，答在試卷上不得分。(1)下列選項中不符合良好程序設計風格的是 。A源程序要文檔化 B數(shù)據(jù)說明的次序要規(guī)范化 C避免濫用 goto 語句 D模塊設計要保證高耦合、高內(nèi)聚 (2)從工程管理角度，軟件設計一般分為兩步完成，它們是 。 A概要設計與詳細設計 B數(shù)據(jù)設計與接口設計 C軟件結構設計與數(shù)據(jù)設計 D過程設計與數(shù)據(jù)設計 (3)下列選項中

2、不屬于軟件生命周期開發(fā)階段任務的是 。 A軟件測試 B概要設計 C軟件維護 D詳細設計 (4)在數(shù)據(jù)庫系統(tǒng)中，用戶所見的數(shù)據(jù)模式為 。 A概念模式 B外模式 C內(nèi)模式 D物理模式 (5)數(shù)據(jù)庫設計的四個階段是：需求分析、概念設計、邏輯設計和 。 A編碼設計 B測試階段 C運行階段 D物理設計 (6)設有如下三個關系表： RAmnSBC13TABCm13n13下列操作中正確的是 。 A) T=RS B)T=RS C)T=RxS D) T=R/S (7)下列敘述中正確的是 。 A一個算法的空間復雜度大，則其空間復雜度也必定大 B一個算法的空間復雜度大，則其時間復雜度必定小 C一個算法的時間復雜度大

3、，則其空間復雜度必定小 D上述三種說法都不對 (8)在長度為 64 的有序線性表中進行順序查找，最壞情況下需要比較的次數(shù)為 。 A63 B64 C6 D7 (9)數(shù)據(jù)庫技術的根本目標是要解決數(shù)據(jù)的 。 A存儲問題 B共享問題 C安全問題 D保護問題 (10)對下列二叉樹： 進行中序遍歷的結果是 。 AACBDFEG BACBDFGE CABDCGEF DFCADBEG (11)以下敘述中正確的是 。 A窗體的 Name 屬性指定窗體的名稱，用來標識一個窗體 B窗體的 Name 屬性值是顯示在窗體標題欄中文本 C可以在運行期間改變窗體的 Name 屬性的值 D窗體的 Name 屬性值可以為空 (

4、12)以下敘述中錯誤的是 。 A打開一個工程文件時，系統(tǒng)自動裝入與該工程有關的窗體文件 B保存 Visual Basic 程序時，應分別保存窗體文件及工程文件 CVisual Basic 應用程序只能以解釋方式執(zhí)行 D窗體文件包含該窗體及其控件的屬性 (13)設 a=2,b=3,c=4, 下列表達式的值是 。 Not a <= c Or 4*c = b2 And b <> a+c A-1 B1 CTrue DFalse (14)沒有如下的用戶定義類型： Type Student number As String name As String age AS Integer En

5、d Type 則以下正確引用該類型成員的代碼是 。 AStudent. name= “李明” BDim s As Student = “李明”CDim s As Type Student DDim s As Type = “李明” = “李明”(15)設 a=5,b=6,c=7,d=8 ，執(zhí)行下列語句后， X 的值為 。 X=IIf(a>b)And(c>d),10,20) A10 B20 CTrue DFalse (16)執(zhí)行以下程序段后，變量c$ 的值為 。 a$= “ Visual Bassic Programming ” b$= “ Qui

6、ck ” c$=b$ & UCase(Mid$(a$,7,6) & Right$(a$,12) AVisual Basic Programming BQuick Basic programming CQuick Basic Programming DQuick Basic Programming (17) 在窗體上畫一個文本框（其名稱為 Textl)和一個標簽（其名稱為 Labell)，程序運行后，如果在文本框中輸入指定的信息，則立即在標簽中顯示相同的內(nèi)容，以下可以實現(xiàn)上述操作的事件過程是 。 APrivate Sub Textl_Click() BPrivate Sub Te

7、xt1_Change() Labell.Caption=Textl.Text Labell.Caption=Textl.Text End Sub End Sub CPrivate Sub Labell_Change() DPrivate Sub Labell_Click() Labell. Caption=Textl.Text Labell.Caption=Textl.Text End Sub End Sub (18)在窗體上面畫一個命令按鈕和一個標簽，其名稱分別為 Commandl 和 Labell ，然后編寫如下事件過程： Private Sub Commandl_Click() Coun

8、ter=0 For i=1 To 4 For j=6 To 1 Step -2 Counter=Counter+1 Next j Next i Labell.Caption=Str(Counter) End Sub 程序運行后，單擊命令按鈕，標簽中顯示的內(nèi)容是 A11 B12 C16 D20 (19)在窗體上畫一個名稱為 Text1 的文本框和一個名稱為 Commandl 的命令按鈕，然后編寫如下事件過程： Private Commandl_Click() Dim i As Integer, n As Integer For i=0 To 50 i = i+3 n = n+1 If i>

9、10Then Exit For Next Textl.Text=Str(n) End Sub 程序運行后，單擊命命令按鈕，在文本框中顯示的值是 。 A5 B4 C3 D2 (20)在窗體上畫一個命令按鈕和兩個標簽，其名稱分別為 Commandl 、 Label1 和 Labe12 ，然后編寫如下事件過程： Private Sub Commandl_Chick. a =0 For i=1 To 10 a=a+1 b=0 For j=1 To 10 a=a+1 b=b+2 Next j Next i Label1.Caption=Str(a) Label2.Caption=Str(b)End Su

10、b 程序運行后，單擊命令按鈕，在標簽 Label1 和 Labe12 中顯示的內(nèi)容分別為 。 A10 和 20 B20 和 10 C200 和 110 D110 和 20 (21)在窗體上畫一個名稱為 Listl 的列表框，一個名稱為 Labell 的標簽，列表框中顯示若干城市的名稱。當單擊列表框中的某個城市名時，該城市名從列表框中消失，并在標簽中顯示出來。下列能正確實現(xiàn)上述操作的程序是 。 APrivale Sub Listl_Click() BPrivate Sub Listl_Click() Labell.Caption=Listl.ListIndex Labell.Name=Listl

11、.ListIndex Listl.Removeltem Listl.Text Listl.RemoveItem Listl.Text End Sub End Sub CPrivate Sub Listl_Click() DPrivate Sub Listl_Click() Labell.Caption=Listl.Text Labell.Name=Listl.Text Listl.RemovItem Listl.ListIndex Listl.RemoveItem Listl.ListIndex End Sub End Sub (22) 在窗體上畫一個名稱為 Commandl 的命令按鈕，然后

12、編寫如下程序： Private Sub Commandl_Click() Dim i As Integer, j As Integer Dim a (10,10)As Integer For i=1 To 3 For j= 1 To 3 a(i,j)=(i-1)*3+j Print a (i,j); Next j Print Next i End Sub 程序運行后，單擊命令按鈕，窗體上顯示的是 。 A)123B)234C)147D)123246345258456369456369789(23) 在窗體上畫一個命令按鈕，名稱為 Command1, 然后編寫如下代碼： Option Base 0

13、 Private Sub Command1_Click() D）im A (4) As Integer, B(4) As Integer For k=0 To 2 A(k+1)=InputBox(“ 請輸入一個整數(shù) ”) B(3-k)=A(k+1) Next k Print B(k) End Sub 程序運行后，單擊命令按鈕，在輸入對話框中分別輸入 2 、 4 、 6 ，輸入結果為 。 A0 B2 C3 D4 (24)有以下程序： Option Base 1 Dim arr() As Integer Private Sub Form_Click() Dim i As Integer,j As

14、Integer ReDim arr(3,2) For i=1 To 3 For j=1 To 2 arr (i,j)=i*2+j Next j Next i ReDim Preserve arr(3,4) For j=3 To 4 A rr(3,j)=j+9 Next j Print arr(3,2);arr(3,4) End Sub 程序運行后，單擊窗體，輸出結果為 。 A8 13 B0 13 C7 12 D0 0(25)以下敘述中正確的是 。 A一個 Sub 過程至少要一個 Exit Sub 語句 B一個 Sub 過程必須有一個 End Sub 語句 C可以在 Sub 過程中定義一個 Fu

15、nction 過程，但不能定義 Sub 過程 D調(diào)用一個 Function 過程可以獲得多個返回值 (26)有以下程序： Sub subP(b()As Integer) For i=1To4 B(i)=2*i Next i End Sub Private Sub Command1_Click() Dim a (1 To 4) As Integer A (1)=5 A)(2)=6 A (3)=7 A (4)=8 subP a(i) For i=1 To4 Print a (i) Next i End Sub 運行上面的程序，單擊命令按鈕，輸出結果為 。 A2 4 6 8 B5 6 7 8 C10

16、 12 14 16 D 出錯 (27)設有如下通用過程： Public Function Fun(xStr As String) Dim tStr As String, srtL As Integer tStr+” tStr=“”strL=Len(xStr) i=1 Do While i<=strL/2 tStr=tStr & Mid(xStr,i ,1) & Mid (xStr ,strL-i+1,1) i=i+1 Loop Fun=tStr End Function 在窗體上畫一個名稱為 Textl 的文本框和一個名稱為 Command1 的命令按鈕，然后編寫如下的事

17、件過程： Private Sub Command 1_ Click() Dim S1 As String S1=“abcdef” Text1.Text=UCase(Fun(S1) End Sub 程序運行后，單擊命令按鈕，則 Text1 中顯示的是 。 AABCDEF Babcdef CAFBECD DDEFABC (28)在窗體上畫一個名稱為 TxtA 的文本框，然后編寫如下的事件過程： Private Sub TxtA_KeyPress(KeyAscii As Integer) End Sub 假定焦點已經(jīng)位一地文本框中，則能夠觸發(fā) KeyPress 事件的操作是 。A單擊鼠標 B雙擊文本

18、框 C鼠標滑過文本框 D按下鍵盤上的某個鍵 (29)在窗體上畫一個命令按鈕和兩個文本框，其名稱分別為 Command1、Text1和Text2 ，然后編寫如下程序： Dim S1 As String, S2 As String Private Sub Form_Load() Text1.Text=” Text2.Text=” End Sub Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) s2=s2 & Chr(KeyCode) End Sub Private Sub Text1_KeyPress(KeyA

19、scii As Integer) s1=s1 & chr(KeyAscii) End Sub Private Sub Command1_Click() Text1.Text=s2 Text2.Text=s1 s1= “” s2= “”End Sub 程序運行后，在 Text1 中輸入“abc”，然后單擊命令按鈕，在文本框 Text1 和 Text2 中顯示的內(nèi)容分別為 。 Aabc和ABC Babc和abc CABC和abc DABC和ABC (30)以下說法正確的是 。 A任何時候都可以通過執(zhí)行“工具”菜單中的“菜單編輯器”命令打開菜單編輯器 B只有當某個窗體為當前活動窗體時，才能打

20、開菜單編輯器 C任何時候都可以通過單擊標準工具欄上的“菜單編輯器”按鈕打開菜單編輯器 D只有當代碼窗品為當前活動窗口時，才能打開菜單編輯器 (31)在窗體上畫一個通用對話框，其名稱為 CommonDialog1 ，然后畫一個命令按鈕，并編寫如下事件過程： Private Sub Command1_Click() CommonDialog1. Filter=“All Files(*.*)|*.*|Text Files”&_ “(*.txt)|*.txt| Executable Files(*.exe)|*.exe”CommonDialog1. Filterindex=3 CommonDi

21、alog1. ShowOpen MsgBox CommonDialog1.FileName End Sub 程序運行后，單擊命令按鈕，將顯示一個“打開”對話框，此時在“文件類型”框中顯示的是 。 AAll Files(*.*) BText files(*.txt) CExecutable Files(*.exe) D不確定 (32)以下敘述錯誤的是 。A一個工程中可以包含多個窗體文件 B在一個窗體文件中用 Public 定義的通用過程不能被其他窗體調(diào)用 C窗體和標準模塊需要分別保存為不同類型的磁盤文件 D用 Dim 定義的窗體層變量只能在該窗體中使用 (33)以下敘述中錯誤的是 。A語句“ D

22、im a, b As Integer ”聲明了兩個整型變量 B不能在標準模塊中定義 Static 型變量 C窗體層變量必須先聲明，后使用 D在事件過程或通用過程內(nèi)定義的變量是局部變量 (34)設有語句：Open "d:Text.txt" For OutputAs#1 ，以下敘述中錯誤的是 。A若d 盤根目錄下無Text.txt 文件，則該語句創(chuàng)建此文件 B用該語句建立的文件的文件號為1C該語句打開 d 盤根目錄下一個已存在的文件Text.txt，之后就可以從文件中讀取信息 D執(zhí)行該語句后，就可以通過 Print# 語句向文件Text.txt中寫入信息 (35)以下敘述中錯誤

23、的是 A順序文件中的數(shù)據(jù)只能按順序讀寫 B對同一個文件，可以用不同的方式和不同的文件號打開 C執(zhí)行Close 語句，可將文件緩沖區(qū)中的數(shù)據(jù)寫到文件中 D隨機文件中各記錄的長度是隨機的二、填空題（每空 2 分，共 30 分） 請將每空的正確答案寫在答題卡【 1 】【 15 】序號的橫線上，答在試卷上不得分。 (1)下列軟件系統(tǒng)結構圖的寬度為 【1】 。 (2) 【2】 的任務是診斷和改正程序中的錯誤。 (3)一個關系表的行稱為 【3】 。 (4)按“先進后出”原則組織數(shù)據(jù)的數(shù)據(jù)結構是 【4】 。 (5)數(shù)據(jù)結構分為線性結構和非線性結構，帶鏈的隊列屬于 【5】 。 (6)描述 "X 是小

24、于 100 的非負整數(shù) " 的 Visual Basic 表達式是 【6】 。 (7)在窗體上有一個名稱為 Command1 的命令按鈕和一個名稱為 Text1 的文本框。程序運行后， Command1 為禁用（灰色），此時如果在文本框中輸入字符，則命令按鈕 Command1 變?yōu)榭捎?。請?zhí)羁铡?Private Sub Form_Load() Command1.Enabled=False End Sub Private Sub Text1_ 【7】 ( ) Command1.Enabled=True End Sub (8)在窗體上畫一個名稱為 "Command1"

25、 的命令按鈕，然后編寫如下事件過程： Private Sub Command1_Click() Dim a As String a ="123456789" For i=1 To 5 Print Space(6-i); Mid $ (a, 【8】 ,2*i-1) Next i End Sub 程序運行后，單擊命令按鈕，窗體上的輸出結果是 5 456 34567 2345678 123456789 請?zhí)羁铡?(9)以下程序的功能是：將一維組 A 中的 100 個元素分別賦給二維數(shù)組 B 的每個元素并打印出來，要求把 A（1）到A（10）依次賦給B（1，1）到 B（1，10），

26、把A（11）到A（20）依次賦給 B（2，1）到B（2，10），把A（91）到A（100）依次賦給 B（10，1）到B（10，10）。請?zhí)羁铡?Option Base 1 Private Sub Form_Click() Dim i As Integer,j As Integer Dim A(1 To 100) As Integer Dim B(1 To 10,1 To 10) As Integer For i=1 To 100 A (i)=Int(Rnd * 100) Next i For i=1 To 【9】 For j=1 To 【10】 B(i,j)= 【11】 Print B(i,j

27、); Next j Print Next i End Sub (10)在窗體上畫一個名稱為Combo1的組合框，然后畫兩個名稱分別為Label1、Label2，標題分別為“城市名稱”和空白的標簽。程序運行后，在組合框中輸入一個新項目并按回車鍵，如果輸入的項目在組合框的列表中不存在，則自動將其添加到組合框的列表中，并在Label2 中給出提示“已成功添加新輸入項?！?，如圖所示。如果輸入的項目已存在，則在Label2中給出提示“輸入項已在組合框中”。請?zhí)羁?。Private Sub Combol_KeyPress(KeyAscii As Integer) If KeyAscii=13 Then F

28、or i=0 To Combo1.ListCount-1 If Combo1.Text= 【12】 Then Label2.Caption=" 輸入項已在組合框中。 " Exit Sub End If Next i Label2.Caption=" 已成功添加新輸入項。 " Combo1 【13】 Combo1.Text End If End Sub (11)在窗體上畫一個命令按鈕和一個文本框，其名稱分別為 Command1和Text1，然后編寫如下事件過程： Private Sub Command1_Click() Dim inData As Stri

29、ng Text1.Text=" " Open "d:myfile.txt" for 【14】 As #1 Do While 【15】 Input # 1,inData Text1.Text=Text1.Text+inData Loop Close #1 End Sub 程序的功能是，打開D盤根目錄下的文本文件 myfile.txt, 讀取它的全部內(nèi)容并顯示在文本框中。請?zhí)羁铡?006年9月全國計算機等級考試二級VB語言筆試答案一、選擇題 1 D 解析：模塊設計要保證低耦合，高內(nèi)聚。 2 A 解析：從技術觀點來看，軟件設計包括軟件結構設計、數(shù)據(jù)設計、接口設

30、計、過程設計。從工程管理角度，軟件設計分為兩步完成：概要設計和詳細設計。 3 C 解析：軟件維護屬于軟件生命周期的維護階段。 4 B 解析：外模式是用戶的數(shù)據(jù)視圖，就是用戶所見到的數(shù)據(jù)模式。 5 D6 C7 D8 B9 B10 A11 A 解析：窗體的 Caption 屬性值是顯示在窗體標題欄中的文本；窗體的 Name 屬性是只讀屬性，即只可以通過屬性窗口改變屬性值，在運行時能改變； Name 屬性值不能為空。 12 C 解析：在 Visual Basic 環(huán)境中，程序可以用解釋方式運行，也可以生成可執(zhí)行文件 EXE 運行。 13 D 解析：此題考察的是運算符的優(yōu)先級別。根據(jù)表達式的執(zhí)行順序和

31、運算符的優(yōu)先級別，原式可以寫成：（ Not(a<=c) ） Or (4 * c)=(b 2) AnD (b<>(a+c) 我們可以在計算機上用以下代碼運行驗證： Private Sub Form_Click() a=2 b=3c=4Print (Not a <= c Or 4 * c=b 2 AnD b <> a+c) EnD Sub 14 B 解析：題目中所給出的是用戶自定義類型，在這里要注意新類型的名稱是 StuDent ，所以選項 C 、 D 均不正確；我們知道對于類型成員的引用是：對象、屬性（方法），所以 A 不正確。 15 D 解析： IIf(ex

32、pr,truepart,falsepart) 根據(jù)表達式的值，來返回兩部分中的其中一個；由于表達式的條件部分運算結果為“ True AnD False ”，所以無法判斷返回值，輸出結果為 False 。我們可以在計算機上用以下代碼運行驗證： Private Sub Form_Click() a=5 b=6 c=7 D=8 Print x=IIf(a>b) AnD (c EnD Sub 16 D 解析： MiD(string,start, length) 返回 Variant (String), 其中包含字符串指定數(shù)量的字符； Right (string, length) 返回 Varia

33、nt (String) ，其中包含從字符串右邊取出的指定數(shù)量的字符； UCase(String) 返回 Variant (String) ，其中包含轉(zhuǎn)成大寫的字符串； 我們可以在計算機上用以下代碼運行驗證： Private Sub Form_Click() a$="Visual Basic Programming" b$="Quick" Print b$ & UCase (MiD$ (a$,7,6) & Right$(a$,12) EnD Sub 17 B 解析：此題考察的是控鍵的常用事件； Change 事件在用戶向文本框中輸入新信息，

34、或當程序把 Text 屬性設置為新值從而改變文本框的 Text 屬性時觸發(fā)，用戶每鍵入一個字符，會引發(fā)一次該事件； Click 事件是用戶鼠標單擊文本框時觸發(fā)； 18 B 解析：此題考察的是循環(huán)的嵌套， Counter 的初始值為 0 ， 當 I=1 時，進入內(nèi)層循環(huán)，內(nèi)層循環(huán)語句執(zhí)行完畢后， Counter 的值為 3 ； 當 I=2 時，進入內(nèi)層循環(huán)時， Counter 的值仍為 3 ，內(nèi)層循環(huán)語句執(zhí)行完畢后， Counter 的值為 6 ；以此類推，程序全部執(zhí)行完畢， Counter 的值為 12 。 19 C 解析：在此題中要注意 Exit For 語句，該語句是跳出循環(huán)體，變量 n

35、記錄循環(huán)執(zhí)行次數(shù)。由于循環(huán)跳出的條件是 I>10 ，而 I 的步長為 3 ，所以循環(huán)只執(zhí)行了 3 次。 20 D 解析：此題考察的仍然是循環(huán)的嵌套，要注意變量 a 和 b 的變化時機。 21 C 解析：列表框的 Text 屬性值為最后一次選中的表項的文本；列表框的 List InDex 屬性是已選中的表項的位置。 22 D 23 B 解析： A （ 0 ） =2,A(1)=4,A(2)=6;B(2)=A(0)=2,B(1)=A(1)=4,B(0)=A(2)=6 。 24 B 解析：此題考察的是動態(tài)數(shù)組，在通用中定義的數(shù)組，我們并沒有給它界定范圍，也沒有賦初值，在過程中用 ReDim 語句

36、具體定義數(shù)組，此題中要分清兩個數(shù)組的界限。 25 B 解析：在 Sub 過程定義中 Exit Sub 語句是可選的，但不是必需的，是否需要要根據(jù)情況而定； 在 Sub 過程內(nèi)，不能定義 Sub 過程或 Function 過程，且 Sub 過程不能嵌套； Founction 過程只能返回一個值。 26 A 解析： Sub 過程的調(diào)用，注意變量的作用域： Dim a(1 To 4) As Integer a(1)=5 a(2)=6 a(3)=7 a(4)=8 語句是在過程內(nèi)部定義的，屬于局部變量，只在定義它的過程中使用，所以運行結果不受以上程序段的影響。 27 C 解析： Len(string |

37、 varname) 返回 Long, 其中包含字符串內(nèi)字符的數(shù)目，或是存儲一變量所需的字節(jié)數(shù)； 28 D 解析： KeyPress 事件是在壓下鍵盤上的某個鍵時觸發(fā)。 29 C 解析： Chr(charcoDe) 返回 String ，其中包含有與指定的字符代碼相關的字符。 控件的 KeyPress 事件的 KeyAscii 參數(shù)是所按鍵的 ASCII 碼； 控件的 KeyDown 事件的 KeyCoDe 是按鍵的實際的 ASCII 碼，該碼以“鍵”為主，而不是以“字符”為準。 30 B 31 C 解析：文件對話框的 Filter 屬性用來指定在對話框中顯示的文件類型；文件對話框的 Filte

38、rInDex 屬性用來指定默認的過濾器，注意 FilterInDex 屬性的最小值為 1 。 32 B 解析：用 Public 短語定義的通用過程是公有過程，可以在程序的任何地方調(diào)用。如果當前窗體要調(diào)用其他窗體中的公有過程，要加上那個窗體的窗體名作為前綴。 33 A 解析：當在一個 Dim 語句中定義多個變量時，每個變量都要用 As 子句聲明其類型，否則該變量被看作變體類型。 34 C 35 D 解析：隨機文件的記錄是定長記錄。 二、填空題 1 【 1 】 3 解析：在程序結構圖的有關術語中，寬度的概念是：整體控制跨度，即各層中所含的模塊數(shù)的最大值，由圖可得此軟件系統(tǒng)結構圖的寬度為 3 。 2

39、 【 2 】程序調(diào)試 解析：在完成對程序的測試之后將進行程序調(diào)試。程序調(diào)試的任務是診斷和改正程序中的錯誤。 3 【 3 】元組 解析：在關系中，水平方向的行稱為元組，垂直方向的列稱為屬性，每一列有一個屬性名。 4 【 4 】棧 解析：棧是限定只在一端進行插入和刪除操作的線性表，通常稱插入、刪除的這一端為棧頂，另一端為棧底。棧按照“先進后出”或“后進先出”的原則組織數(shù)據(jù)。 5 【 5 】線性結構 解析：與棧類似，隊列也是線性表，可以采用鏈式存儲結構。所以帶鏈的隊列屬于線性結構。 6 【 6 】 X >=0 anD X <100 解析：可以用類型聲明符聲明變量類型，下面是常用類型及其類型說