1、2010年3月計算機(jī)等級考試二級VB試試題(文字版)一、選擇題(每小題2分，共70分)下列各題A)、B)、C)、D)四個選項(xiàng)中，只有一個選項(xiàng)是正確的。請將正確選項(xiàng)填涂在答題卡相應(yīng)位置上，答在試卷上不得分。(1)下列敘述中正確的是A)對長度為n的有序鏈表進(jìn)行查找，最壞情況下需要的比較次數(shù)為nB)對長度為n的有序鏈表進(jìn)行對分查找，最壞情況下需要的比較次數(shù)為(n/2)C)對長度為n的有序鏈表進(jìn)行對分查找，最壞情況下需要的比較次數(shù)為(log2n)D)對長度為n的有序鏈表進(jìn)行對分查找，最壞情況下需要的比較次數(shù)為(n log2n)(2)算法的時間復(fù)雜度是指A)算法的執(zhí)行時間B)算法所處理的數(shù)據(jù)量C)算法程

2、序中的語句或指令條數(shù)D)算法在執(zhí)行過程中所需要的基本運(yùn)算次數(shù)(3)軟件按功能可以分為：應(yīng)用軟件、系統(tǒng)軟件和支撐軟件(或工具軟件)。下面屬于系統(tǒng)軟件的是A)編輯軟件B)操作系統(tǒng)C)教務(wù)管理系統(tǒng)D)瀏覽器(4)軟件(程序)調(diào)試的任務(wù)是A)診斷和改正程序中的錯誤B)盡可能多地發(fā)現(xiàn)程序中的錯誤C)發(fā)現(xiàn)并改正程序中的所有錯誤D)確定程序中錯誤的性質(zhì)(5)數(shù)據(jù)流程圖(DFD圖)是A)軟件概要設(shè)計的工具B)軟件詳細(xì)設(shè)計的工具C)結(jié)構(gòu)化方法的需求分析工具D)面向?qū)ο蠓椒ǖ男枨蠓治龉ぞ?6)軟件生命周期可分為定義階段，開發(fā)階段和維護(hù)階段。詳細(xì)設(shè)計屬于A)定義階段B)開發(fā)階段C)維護(hù)階段D)上述三個階段(7)數(shù)據(jù)

3、庫管理系統(tǒng)中負(fù)責(zé)數(shù)據(jù)模式定義的語言是A)數(shù)據(jù)定義語言B)數(shù)據(jù)管理語言C)數(shù)據(jù)操縱語言D)數(shù)據(jù)控制語言(8)在學(xué)生管理的關(guān)系數(shù)據(jù)庫中，存取一個學(xué)生信息的數(shù)據(jù)單位是A)文件B)數(shù)據(jù)庫C)字段D)記錄(9)數(shù)據(jù)庫設(shè)計中，用E-R圖來描述信息結(jié)構(gòu)但不涉及信息在計算機(jī)中的表示，它屬于數(shù)據(jù)庫設(shè)計的A)需求分析階段B)邏輯設(shè)計階段C)概念設(shè)計階段D)物理設(shè)計階段(10)有兩個關(guān)系R和T如下：則由關(guān)系R得到關(guān)系T的操作是A)選擇B)投影C)交D)并(11)在VB集成環(huán)境中要結(jié)束一個正在運(yùn)行的工程，可單擊工具欄上的一個按鈕，這個按鈕是 (12)設(shè)x是整型變量，與函數(shù)f(x0,-x,x)有相同結(jié)果的代數(shù)式是A)|

4、x|B)-|x|C)xD)-x(13)設(shè)窗體文件中有下面的事件過程：Private Sub Command1_Click()Dim sa%=100Print aEnd Sub其中變量a和s的數(shù)據(jù)類型分別是A)整型，整型B)變體型，變體型C)整型，變體型D)變體型，整型(14)下面哪個屬性肯定不是框架控件的屬性A)TextB)CaptionC)LeftD)Enabled(15)下面不能在信息框中輸出“VB”的是A)MsgBox VBB)x=MsgBox(VB)C)MsgBox(VB)D)Call MsgBox VB(16)窗體上有一個名稱為Option1的單選按鈕數(shù)組，程序運(yùn)行時，當(dāng)單擊某個單選

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

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

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

8、的語句是A)Print gcd(8,12)，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ī)律輸出數(shù)據(jù)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ù)輸出數(shù)據(jù)，則接在上述程序段后面的程序段應(yīng)該是A)For i=1 To 5For j=1 To 3Print a(j,i);Ne

9、xtPrintNextB)For i=1 To 3For j=1 To 5Print a(j,i);NextPrintNextC)For j=1 To 5For i=1 To 3Print a(j,i);NextPrintNextD)For i=1 To 5For j=1 To 3Print a(i,j);NextPrintNext24)窗體上有一個Text1文本框，一個Command1命令按鈕，并有以下程序Private Sub Commandl_Click()Dim nIf Text1.Text23456 Thenn=n+1Print 口令輸入錯誤 & n & 次End IfEnd Sub

10、希望程序運(yùn)行時得到左圖所示的效果，即：輸入口令，單擊“確認(rèn)口令”命令按鈕，若輸入的口令不是“123456”，則在窗體上顯示輸入錯誤口令的次數(shù)。但上面的程序?qū)嶋H顯示的是右圖所示的效果，程序需要修改。下面修改方案中正確的是A)在Dim n語句的下面添加一句：n=OB)把Print 口令輸入錯誤 & n & 次改為Print 口令輸入錯誤 +n+次C)把Print 口令輸入錯誤 & n & 次改為Print 口令輸入錯誤&Str(n)&次D)把Dim n改為Static n(25)要求當(dāng)鼠標(biāo)在圖片框P1中移動時，立即在圖片框中顯示鼠標(biāo)的位置坐標(biāo)。下面能正確實(shí)現(xiàn)上述功能的事件過程是A)Private

11、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 Integer,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

12、 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)計算二的近似值的一個公式是。某人編寫下面的程序用此公式計算并輸出的近似值：Private Sub Comand1_Click()PI=1Sign=1n=20000For k=3 To nSign=-Sign/kPI=PI+Sign/kNext kPrint PI*4End Sub運(yùn)行后發(fā)現(xiàn)結(jié)果為3.22751，顯然，程序需要修改。下面修改方案中正確的是

13、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=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)若在窗體模塊的聲明部分聲明了如下自定義類型和數(shù)組Private Type recCode

14、 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).Code,arr(2).CaptionD)Print Code(2),Caption(2)(29)設(shè)窗體上有一個通用對話框控件CD1，希望在執(zhí)行下面程序時，打開如圖所示的文件對話框Private Sub Comand1_Click()CD1.DialogTitle=打開文件CD1.InitDir=C:CD1.Fi

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

16、CD1.FileName=改為CD1.FileName=文本文件(30)下面程序運(yùn)行時，若輸入395，則輸出結(jié)果是Private Sub Comand1_Click()Dim x%x=InputBox(請輸入一個3位整數(shù))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中有若干列表項(xiàng)(見圖)，并有下面的程序：Private Sub Comand1_Click()For k=List1.ListCount-1 To 0 Step -1If List1

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

18、令并按回車鍵(回車鍵的ASCII碼為13)后，隱藏Form1，顯示Form2。若口令為“Teacher”，所有菜單項(xiàng)都可見;否則看不到“成績錄入”菜單項(xiàng)。為此，某人在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程序運(yùn)行時發(fā)現(xiàn)剛輸入口令時就隱藏

19、了Form1，顯示了Form2，程序需要修改。下面修改方案中正確的是A)把Form1中Text1文本框及相關(guān)程序放到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文本框中的內(nèi)容寫到out.txt文件中Private Sub Comand1_Click()Open out.txt For Output As #2Print Text1Cl

20、ose #2End Sub調(diào)試時發(fā)現(xiàn)沒有達(dá)到目的，為實(shí)現(xiàn)上述目的，應(yīng)做的修改是A)把Print Text1改為Print #2,Text1B)把Print Text1改為Print Text1C)把Print Text1改為Write Text1D)把所有#2改為#1(34)窗體上有一個名為Command1的命令按鈕，并有下面的程序：Private Sub Comand1_Click()Dim arr(5) As IntegerFor k=1 To 5arr(k)=kNext kprog arr()For k=1 To 5Print arr(k)Next kEnd SubSub prog(a(

21、) As Integer)n=Ubound(a)For i=n To 2 step -1For j=1 To n-1if a(j) t=a(j):a(j)=a(j+1):a(j+1)=tEnd IfNext jNext iEnd Sub程序運(yùn)行時，單擊命令按鈕后顯示的是A)12345B)54321C)01234D)43210(35)下面程序運(yùn)行時，若輸入“Visual Basic Programming”，則在窗體上輸出的是Private Sub Comand1_Click()Dim count(25) As Integer, ch As Stringch=Ucase(InputBox(請輸入

22、字母字符串)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 m=count(k)End IfNext kPrint mEnd SubA)0B)1C)2D)3二、填空題(1)一個隊列的初始狀態(tài)為空。現(xiàn)將元素A,B,C,D,E,F,5,4,3,2,1依次入隊，然后再依次退隊，則元素退隊的順序?yàn)?【1】 。(2)設(shè)某循環(huán)隊列的容量為50，如果頭指針front=45(指向隊頭元素的前一位置)，尾指針rear=10(指向隊尾元素

23、)，則該循環(huán)隊列中共有 【2】 個元素。(3)設(shè)二叉樹如下：對該二叉樹進(jìn)行后序遍歷的結(jié)果為 【3】 。(4)軟件是 【4】 、數(shù)據(jù)和文檔的集合。(5)有一個學(xué)生選課的關(guān)系，其中學(xué)生的關(guān)系模式為：學(xué)生(學(xué)號，姓名，班級，年齡)，課程的關(guān)系模式為：課程(課號，課程名，學(xué)時)，其中兩個關(guān)系模式的鍵分別是學(xué)號和課號，則關(guān)系模式選課可定義為：選課(學(xué)號， 【5】 ，成績)。(6)為了使復(fù)選框禁用(即呈現(xiàn)灰色)，應(yīng)把它的Value屬性設(shè)置為 【6】 。(7)在窗體上畫一個標(biāo)簽、一個計時器和一個命令按鈕，其名稱分別為Labl1、Timer1和Command1，如圖1所示。程序運(yùn)行后，如果單擊命令按鈕，則標(biāo)簽開始閃爍，每秒鐘“歡迎”二字顯示、消失各一次，如圖2所示。以下是實(shí)現(xiàn)上述功能的程序，請?zhí)羁铡rivate Sub Form_Load()Label1.Caption=歡迎Timer1.Enabled=FalseTimer1.Interval= 【7】End SubPrivate Sub Timer1_Timer()Label1.Visible= 【8】End SubPrivate Sub command1_Click()【9】End Sub(8)有如下程序：Private