3月計算機等級考試二級VB試試題注解版

1、2010年3月計算機等級考試二級VB試試題一、選擇題(1)下列敘述中正確的是A)對長度為n的有序鏈表進行查找，最壞情況下需要的比較次數為nB)對長度為n的有序鏈表進行對分查找，最壞情況下需要的比較次數為(n/2)C)對長度為n的有序鏈表進行對分查找，最壞情況下需要的比較次數為(log2n)D)對長度為n的有序鏈表進行對分查找，最壞情況下需要的比較次數為(nlog2n)(2)算法的時間復雜度是指A)算法的執(zhí)行時間B)算法所處理的數據量C)算法程序中的語司或指令條數D)算法在執(zhí)行過程中所需要的基本運算次數(3)軟件按功能可以分為：應用軟件、系統(tǒng)軟件和支撐軟件(或工具軟件)。下面屬于系統(tǒng)軟件的是A)

2、編輯軟件B)操作系統(tǒng)C)教務管理系統(tǒng)D)瀏覽器(4)軟件(程序)調試的任務是A)診斷和改正程序中的錯誤B)盡可能多地發(fā)現(xiàn)程序中的錯誤C)發(fā)現(xiàn)并改正程序中的所有錯誤D)確定程序中錯誤的性質(5)數據流程圖(DFD圖)是A)軟件概要設計的工具B)軟件詳細設計的工具C)結構化方法的需求分析工具D)面向對象方法的需求分析工具(6)軟件生命周期可分為定義階段，開發(fā)階段和維護階段。詳細設計屬于A)定義階段B)開發(fā)階段C)維護階段D)上述三個階段(7)數據庫管理系統(tǒng)中負責數據模式定義的語言是A)數據定義語言B)數據管理語言C)數據操縱語言D)數據控制語言(8)在學生管理的關系數據庫中，存取一個學生信息的數據

3、單位是A)文件B)數據庫C)字段D)記錄(9)數據庫設計中，用E-R圖來描述信息結構但不涉及信息在計算機中的表示，它屬于數據庫設計的A)需求分析階段B)邏輯設計階段C)概念設計階段D)物理設計階段(10)有兩個關系R和T如下：則由關系R得到關系T的操作是A)選擇B)投影C)交D)并(11)在VB集成環(huán)境中要結束一個正在運行的工程，可單擊工具欄上的一個按鈕，這個按鈕是(12)設x是整型變量，與函數iif(x>0,-x,x)有相同結果的代數式是A)|x|B)-|x|C)xD)-x(13)設窗體文件中有下面的事件過程：Private Sub Command1_Click()Dim sa%=10

4、0Print aEnd Sub其中變量a和s的數據類型分別是A)整型，整型B)變體型，變體型C)整型，變體型D)變體型，整型(14)下面哪個屬性肯定不是框架控件的屬性A)TextB)CaptionC)LeftD)Enabled(15)下面不能在信息框中輸出“VB”的是A)MsgBox "VB"B)x=MsgBox("VB")C)MsgBox("VB")D)Call MsgBox "VB"(16)窗體上有一個名稱為Option1的單選按鈕數組，程序運行時，當單擊某個單選按鈕時，會調用下面的事件過程Private Su

5、b Option1_C1ick(Index As Integer)End Sub下面關于此過程的參數Index的敘述中正確的是A)Index為1表示單選按鈕被選中，為O表示未選中B)Index的值可正可負C)Index的值用來區(qū)分哪個單選按鈕被選中D)Index表示數組中單選按鈕的數量(17)設窗體中有一個文本框Text1，若在程序中執(zhí)行了Text1.SetFocus，則觸發(fā)A)Text1的SetFocus事件B)Text1的GotFocus事件C)Text1的LostFocus事件 D)窗體的GotFocus事件(18)VB中有3個鍵盤事件：KeyPress、KeyDown、KeyUp，若光

6、標在Text1文本框中，則每輸入一個字母A)這3個事件都會觸發(fā) B)只觸發(fā)KeyPress事件C)只觸發(fā)KeyDown、KeyUp事件D)不觸發(fā)其中任何一個事件(19)下面關于標準模塊的敘述中錯誤的是A)標準模塊中可以聲明全局變量B)標準模塊中可以包含一個Sub Main過程，但此過程不能被設置為啟動過程C)標準模塊中可以包含一些Public過程D)一個工程中可以含有多個標準模塊(20)設窗體的名稱為Form1，標題為Win，則窗體的MouseDown事件過程的過程名是A)Form1_MouseDownB)Win_MouseDownC)Form_MouseDownD)MouseDown_For

7、m1(21)下面正確使用動態(tài)數組的是A)Dim arr() As IntegerB)Dim arr() As IntegerReDim arr(3,5)ReDim arr(50)As StringC)Dim arr()D)Dim arr(50) As IntegerReDim arr(50) As IntegerReDim arr(20)(22)下面是求最大公約數的函數的首部Function gcd(ByVal x As Integer, ByVal y As Integer) As Integer若要輸出8、12、16這3個數的最大公約數，下面正確的語句是A)Print gcd(8,12)，

8、gcd(12,16)，gcd(16,8)B)Print gcd(8,12,16)C)Print gcd(8)，gcd(12)，gcd(16)D)Print gcd(8,gcd(12,16)(23)有下面的程序段，其功能是按圖1所示的規(guī)律輸出數據Dim a(3,5) As IntegerFor i=1 To 3For j=1 To 5A(i,j)=i+jPrint a(i,j);NextPrintNext若要按圖2所示的規(guī)律繼續(xù)輸出數據，則接在上述程序段后面的程序段應該是A)For i=1 To 5B)For i=1 To 3For j=1 To 3For j=1 To 5Print a(j,i

9、);Print a(j,i);NextNextPrintPrintNextNextC)For j=1 To 5D)For i=1 To 5For i=1 To 3For j=1 To 3Print a(j,i);Print a(i,j);NextNextPrintPrintNext(24)窗體上有一個Text1文本框，一個Command1命令按鈕，并有以下程序Private Sub Commandl_Click()Dim nIf Text1.Text<>"123456" Thenn=n+1Print "口令輸入錯誤" & n &

10、; "次"End IfEnd Sub 希望程序運行時得到左圖所示的效果，即：輸入口令，單擊“確認口令”命令按鈕，若輸入的口令不是“123456”，則在窗體上顯示輸入錯誤口令 的次數。但上面的程序實際顯示的是右圖所示的效果，程序需要修改。下面修改方案中正確的是A)在Dim n語句的下面添加一句：n=OB)把Print "口令輸入錯誤" & n & "次"改為Print "口令輸入錯誤" +n+"次"C)把Print "口令輸入錯誤" & n &

11、"次"改為Print "口令輸入錯誤"&Str(n)&"次"D)把Dim n改為Static n(25)要求當鼠標在圖片框P1中移動時，立即在圖片框中顯示鼠標的位置坐標。下面能正確實現(xiàn)上述功能的事件過程是A)Private Sub P1_MouseMove(Button AS Integer,Shift As Integer,X As Single, Y As Single)Print X,YEnd SubB)Private Sub P1_MouseDown(Button AS Integer,Shift As Int

12、eger,X As Single, Y As Single)Picture.Print X,YEnd SubC) Private Sub P1_MouseMove(Button AS Integer,Shift As Integer,X As Single, Y As Single)P1.Print X,YEnd SubD)Private Sub Form_MouseMove(Button AS Integer,Shift As Integer,X As Single, Y As Single)P1.Print X,YEnd Sub(26)計算的近似值的一個公式是。某人編寫下面的程序用此公式計

13、算并輸出的近似值：Private Sub Comand1_Click()PI=1Sign=1n=20000For k=3 To nSign=-Sign(/k)PI=PI+Sign/kNext kPrint PI*4End Sub運行后發(fā)現(xiàn)結果為3.22751，顯然，程序需要修改。下面修改方案中正確的是A)把For k=3 To n 改為 For k=1 To nB)把n=20000改為n=20000000C)把For k=3 To n改為For k=3 To n Step 2D)把PI=1改為PI=0(27)下面程序計算并輸出的是Private Sub Comand1_Click()a=10s

14、=0Dos=s+a*a*aa=a-1Loop Until a<=0Print sEnd SubA)13+23+33+103的值B)10!+3!+2!+1!的值C)(1+2+3+10)3的值D)10個103的和(28)若在窗體模塊的聲明部分聲明了如下自定義類型和數組Private Type recCode As IntegerCaption As StringEnd TypeDim arr(5) As rec則下面的輸出語句中正確的是A)Print arr.Code(2),arr.Caption(2)B)Print arr.Code,arr.CaptionC)Print arr(2).Co

15、de,arr(2).CaptionD)Print Code(2),Caption(2)(29)設窗體上有一個通用對話框控件CD1，希望在執(zhí)行下面程序時，打開如圖所示的文件對話框Private Sub Comand1_Click()CD1.DialogTitle="打開文件"CD1.InitDir="C:"CD1.Filter="所有文件|*.*|Word文檔|*.doc|文本文件|*.Txt"CD1.FileName=""CD1.Action=1If CD1.FileName=""ThenPri

16、nt"未打開文件"ElsePrint"要打開文件"& CD1.FileNameEnd IfEnd Sub但實際顯示的對話框中列出了C:下的所有文件和文件夾，“文件類型”一欄中顯示的是“所有文件”。下面的修改方案中正確的是A)把CD1.Action=1改為CD1.Action=2B)把“CD1.Filter=”后面字符串中的“所有文件”改為“文本文件”C)在語句CD1.Action=1的前面添加：CD1.FilterIndex=3D)把CD1.FileName=""改為CD1.FileName="文本文件"(

17、30)下面程序運行時，若輸入395，則輸出結果是Private Sub Comand1_Click()Dim x%x=InputBox("請輸入一個3位整數")Print x Mod 10,x100,(x Mod 100)10End SubA)3 9 5B)5 3 9C)5 9 3D)3 5 9(31)窗體上有List1、List2兩個列表框，List1中有若干列表項(見圖)，并有下面的程序：Private Sub Comand1_Click()For k=List1.ListCount-1 To 0 Step -1If List1.Selected(k) ThenList

18、2.AddItem List1.List(k)List1.RemoveItem kEnd IfNext kEnd Sub程序運行時，按照圖示在List1中選中2個列表項，然后單擊Commandl命令按鈕，則產生的結果是A)在List2中插入了“外語”、“物理”兩項B)在List1中刪除了“外語”、“物理”兩項C)同時產生A)和B)的結果D)把List1中最后1個列表項刪除并插入到List2中(32)設工程中有2個窗體： Form1、Form2，F(xiàn)orm1為啟動窗體。Form2中有菜單。其結構如表。要求在程序運行時，在Form1的文本框Text1中輸入口令并按回車鍵(回車鍵的ASCII碼為13)

19、后，隱藏Form1，顯示Form2。若口令為“Teacher”，所有菜單項都可見;否則看不到“成績錄入”菜單項。 為此，某人在Form1窗體文件中編寫如下程序：Private Sub Text1_KeyPress(KeyAscii As Integer)If KeyAscii=13 ThenIf Text1.Text="Teacher" ThenForm2.input.visible=TrueElseForm2.input.visible=FalseEnd IfEnd IfForm1.HideForm2.ShowEnd Sub程序運行時發(fā)現(xiàn)剛輸入口令時就隱藏了Form1，顯

20、示了Form2，程序需要修改。下面修改方案中正確的是A)把Form1中Text1文本框及相關程序放到Form2窗體中B)把Form1.Hide、Form2.Show兩行移到2個End If之間C)把If KeyAscii=13 Then改為 If KeyAscii="Teaeher" ThenD)把2個Form2.input.Visible中的“Form2”刪去(33)某人編寫了下面的程序，希望能把Text1文本框中的內容寫到out.txt文件中Private Sub Comand1_Click()Open "out.txt" For Output As

21、 #2Print "Text1"Close #2End Sub調試時發(fā)現(xiàn)沒有達到目的，為實現(xiàn)上述目的，應做的修改是A)把Print "Text1"改為Print #2,Text1B)把Print "Text1"改為Print Text1C)把Print "Text1"改為Write "Text1"D)把所有#2改為#1(34)窗體上有一個名為Command1的命令按鈕，并有下面的程序：Private Sub Comand1_Click()Dim arr(5) As IntegerFor k=1

22、To 5arr(k)=kNext kprog arr()For k=1 To 5Print arr(k)Next kEnd SubSub prog(a() As Integer)n=Ubound(a)For i=n To 2 step -1For j=1 To n-1if a(j)< a(j+1) then t=a(j):a(j)=a(j+1):a(j+1)=tEnd IfNext jNext iEnd Sub程序運行時，單擊命令按鈕后顯示的是A)12345B)54321C)01234D)43210(35)下面程序運行時，若輸入“Visual Basic Programming”，則在窗

23、體上輸出的是Private Sub Comand1_Click()Dim count(25) As Integer, ch As Stringch=Ucase(InputBox("請輸入字母字符串")For k=1 To Len(ch)n=Asc(Mid(ch,k,1)-Asc("A")If n>=0 ThenCount(n)=Count(n)+ 1End IfNext km=count(0)For k=1 To 25If m< count(m=count(k)End IfNext kPrint mEnd SubA)0B)1C)2D)3二、填

24、空題(1)一個隊列的初始狀態(tài)為空?，F(xiàn)將元素A，B，C，D，E，F(xiàn)，5，4，3，2，1依次入隊，然后再依次退隊，則元素退隊的順序為 【1】 。(2)設某循環(huán)隊列的容量為50，如果頭指針front=45(指向隊頭元素的前一位置)，尾指針rear=10(指向隊尾元素)，則該循環(huán)隊列中共有 【2】 個元素。(3)設二叉樹如下：對該二叉樹進行后序遍歷的結果為 【3】 。(4)軟件是 【4】 、數據和文檔的集合。(5)有一個學生選課的關系，其中學生的關系模式為：學生(學號，姓名，班級，年齡)，課程的關系模式為：課程(課號，課程名，學時)，其中兩個關系模式的鍵分別是學號和課號，則關系模式選課可定義為：選課(

25、學號， 【5】 ，成績)。(6)為了使復選框禁用(即呈現(xiàn)灰色)，應把它的Value屬性設置為 【6】 。(7)在窗體上畫一個標簽、一個計時器和一個命令按鈕，其名稱分別為Labl1、Timer1和Command1，如圖1所示。程序運行后，如 果單擊命令按鈕，則標簽開始閃爍，每秒鐘“歡迎”二字顯示、消失各一次，如圖2所示。以下是實現(xiàn)上述功能的程序，請?zhí)羁?。Private Sub Form_Load()Label1.Caption="歡迎"Timer1.Enabled=FalseTimer1.Interval= 【7】Command1.Caption="開始閃爍&quo

26、t;End SubPrivate Sub Timer1_Timer()Label1.Visible= 【8】End SubPrivate Sub command1_Click()【9】End Sub 圖1 圖2(8)有如下程序：Private Sub Form_Click()n=10i=0Doi=i+nn=n-2Loop While n>2Print iEnd Sub程序運行后，單擊窗體，輸出結果為 【10】 。(9)在窗體上畫一個名稱為Command1的命令按鈕。然后編寫如下程序：Option Base 1Private Sub Command1_Click()Dim a(10) As

27、 IntegerFor i=1 To 10a(i)=iNextCall swap ( 【11】 )For i=1 To 10Print a(i);NextEnd SubSub swap(b() As Integer)n=Ubound(b)For i=1 To n / 2t=b(i)b(i)=b(n)b(n)=t【12】NextEnd Sub上述程序的功能是，通過調用過程swap，調換數組中數值的存放位置，即a(1)與a(10)的值互換，a(2)與a(9)的值互換，。請?zhí)羁铡?10)在窗體上畫一個文本框，其名稱為Text1，在屬性窗口中把該文本框的MultiLine屬性設置為True，然后編寫如

28、下的事件過程：Private Sub Form_Click()Open "d:testsmtext1.Txt" For Input As #1Do While Not 【13】Line Input #1, aspect$Whole$=whole$+aspect$+Chr$(13)+Chr$(10)LoopText1.Text=whole$【14】Open "d:testsmtext2.Txt" For Output As #1Print #1, 【15】Close #1End Sub運行程序，單擊窗體，將把磁盤文件smtext1.txt的內容讀到內存并在

29、文本框中顯示出來，然后把該文本框中的內容存入磁盤文件 smtext2.txt。請?zhí)羁铡⒖即鸢福禾羁疹} 1A2D3B4A5C6B7A8D9C10A11D12B13C14A15D16C17B18A19B20C21A22D23A24D25C26C27A28C29C30B31C32B33A34B35D填空題（1） A,B,C,D,E,5,4,3,2,1（2） 15（3） EDBGHFCA（4） 程序（5） 課號（6） 6 2（7） 7 500 8 Not Label1.Visible9 Timer1.Enabled=True（8） 10 28（9） 11 a ( ) 或a 12 n=n-1（10）

30、13 EOF(1) 14 Close #1 15 Text1.Text或Text1 （12）B知識點：IIF函數評析：語法：IIf(expr,val1,val2)expr必要參數。用來判斷真?zhèn)蔚谋磉_式。val1必要參數。如果expr為True，則返回這部分的值或表達式。val2必要參數。如果expr為False，則返回這部分的值或表達式。題目中，當x>0時，IIf函數返回的是-x值，得到的是一個負數，當x<=0時，IIf函數返回的是x的值，得到的是0 或負數。選項A 中，當x 為負數或正數時，|x|都是一個正數，所以選項A 是錯誤的；選項B 中，當x>0時，-|x|是一個負數

31、，當x<=0時，-|x|是一個負數或0，所以選項B是正確的；選項C中，當x為正數時，與IIf函數結果不一致，所以選項C是錯誤的；選項D中，當x為負數時，-x為正數，與IIf函數結果不一致，所以選項D是錯誤的。（13）C知識點：變量類型評析：使用變量說明語句說明變量的數據類型，通常稱為“顯式說明”，例如，Dim a As Integer，也可以采用在變量名后加上一個用于規(guī)定變量類型的說明字符，例如，x%。VB 規(guī)定的類型說明字符表如下：說明字符示例意義%x%x是整型變量&x&x是長整型變量!x!x是單精度型變量#x#x是雙精度型變量xx是貨幣型變量$x$x是字符型變量如果一

32、個變量未被顯式定義，末尾也沒有類型說明符，則被隱含地說明為變體類型變量。由題目中可知，s變量沒有具體定義類型，所以它是變體型，a后面加上了一個%符號，可知a是整型，所以選項C是正確的。（15）D知識點：信息框的使用方法評析：信息框的使用方法有3種：1、使用賦值語句，例如：ans=MsgBox("非法數據！",48, "信息提示")2、等同為一個方法使用，例如：MsgBox "非法數據！",48, "信息提示"3、直接書寫，例如：MsgBox("非法數據！",48, "信息提示"

33、;)在Visual Basic中，可以直接使用過程名調用過程，也可以結合Call關鍵字調用。使用Call調用過程時，參數列表必須用圓括號括起。其形式為：子過程名 參數列表或Call 子過程名(參數列表)所以選擇選項D。（17）B知識點：文本框的事件和方法評析：SetFocus事件：是文本框中較常用的方法，該方法可以把光標移到指定的文本框中。GotFocus事件：當文本框具有輸入焦點（即處于活動狀態(tài)）時，鍵盤上輸入的每個字符都將在該文本框中顯示出來。只有當一個文本框被激活并且可見性為True時才能接收到焦點。LostFocus事件：但按下Tab鍵使光標離開當前文本框或用鼠標選擇窗體中的其他對象時

34、觸發(fā)該事件。GotFocus事件是對象獲得焦點時發(fā)生，當文本框使用SetFocus方法時，文本框獲得了焦點，因此觸發(fā)了文本框的GotFocus事件。（19）B知識點：標準模塊評析：標準模塊也稱全局模塊，由全局變量聲明、模塊層聲明及通用過程等幾部分組成。Sub Main過程位于標準模塊中，一個工程可以含有多個標準模塊，但Sub Main過程只能有一個，Sub Main過程通常是作為啟動過程編寫的，但是Sub Main過程不能自動被識別，也就是說Visual Basic并不自動把它作為啟動過程，必須通過與設置啟動窗體類似的方法把它指定為啟動過程，所以選項B是錯誤的。（20）C知識點：窗體事件過程名

35、評析：窗體事件過程由“Form”、下劃線和事件名組成，所以選項C是正確的。（21）A知識點：動態(tài)數組評析：動態(tài)數組指在聲明數組時未給出數組的大小（省略括號中的下標），當要使用它時，隨時用Redim語句重新指出數組大小，但是不能改變數組類型。選項B和C，都改變了數組的類型，所以是錯誤的，選項D中，arr()數組已經給出了大小，所以不能用Redim重新定義，所以選項A是正確的（22）D知識點：函數的調用評析：如果一個過程或函數的形式參數是固定的，調用時提供的實參也是固定的，本題gcd函數有2個形參，則調用時必須按相同的順序和類型提供2個實參，所以選項B、C是錯誤的；題目中要求計算三個數的最大公約數

36、，最后得出的應該是一個值，所以選項A是錯誤的，只有選項D是正確的。（23）A知識點：For循環(huán)、嵌套循環(huán)評析：由題目中可知，數組a是一個3行5列的數組，而選項B和C中，j從1到5，i從1到3，也就是數組a的第一維下標的最大值大于3，出錯，所以選項B和C是錯誤的；選項D和選項B、C一樣，也會出現(xiàn)下標越界的錯誤。選項A中：當i=1時，j從1到3循環(huán)，打印出來的值為：2、3、4當i=2時，j從1到3循環(huán)，打印出來的值為：3、4、5當i=3時，j從1到3循環(huán)，打印出來的值為：4、5、6當i=4時，j從1到3循環(huán)，打印出來的值為：5、6、7當i=5時，j從1到3循環(huán)，打印出來的值為：6、7、8所以選項A

37、是正確的。（34）B知識點：函數的調用、排序算法、參數傳遞評析：首先程序給數組arr賦值，然后調用prog函數，prog函數的作用是排序，通過循環(huán)判斷相鄰兩個數的大小，如果前一個數小于后面一個數，則交換兩個數，當用數組作為過程的參數時，使用的是“傳地址”方式，所以實參的值會隨著形參的改變而改變，最后輸出的arr數組的值是改變后的值。開始時，數組arr的值為1，2，3，4，5，通過prog函數的處理，當i=5時，交換后的值為2，3，4，5，1；當i=4時，交換后的值為3，4，5，2，1；當i=3時，交換后的值為4，5，3，2，1；當i=2時，交換后的值為5，4，3，2，1，所以選項B是正確的。（35）D知識點：字符的ASCII碼、截取字符串評析：此程序的作用是輸入一個字符串，然后統(tǒng)計每個字符串出現(xiàn)的次數，并輸出最大出現(xiàn)次數。首先定義了一個有25個元素的co