3月計算機等級考試二級VB筆試真題及答案

1、2008年4月全國計算機等級考試二級VB試卷一、選擇題1、程序流程圖中帶有箭頭的線段表示的是A）圖元關(guān)系 B）數(shù)據(jù)流 C）控制流 D)調(diào)用關(guān)系2、結(jié)構(gòu)化程序設(shè)計的基本原則不包括A）多態(tài)性 B）自頂向下 C）模塊化 D）逐步求精3、軟件設(shè)計中模塊劃分應(yīng)遵循的準(zhǔn)則是A）低內(nèi)聚低耦合 B)高內(nèi)聚低耦合 C)低內(nèi)聚高耦合 D)高內(nèi)聚高耦合4、在軟件開發(fā)中，需求分析階段產(chǎn)生的主要文檔是A）可行性分析報告 B）軟件需求規(guī)格說明書 C）概要設(shè)計說明書 D）集成測試計劃5、算法的有窮性是指A）算法程序的運行時間是有限的 B）算法程序所處理的數(shù)據(jù)量是有限的C）算法程序的長度是有限的 D）算法只能被有限的用戶使用

2、6、對長度為n的線性表排序，在最壞的情況下，比較次數(shù)不是n (n-1)/2的排序方法是A）快速排序 B）冒泡排序 C）直接插入排序 D）堆排序 7、下列關(guān)于棧的敘述正確的是A）棧按“先進(jìn)先出”組織數(shù)據(jù) B）棧按“先進(jìn)后出”組織數(shù)據(jù) C）只能在棧底插入數(shù)據(jù) D）不能刪除數(shù)據(jù)8、在數(shù)據(jù)庫設(shè)計中，將ER圖轉(zhuǎn)換成關(guān)系數(shù)據(jù)模型的過程屬于A）需求分析階段 B）概念設(shè)計階段 C）邏輯設(shè)計階段 D）物理設(shè)計階段9、有三個關(guān)系R、S和T如下：BCDa0k1B1n1RSTBCDf3h2a0k1n2x1BCDa0k1 由關(guān)系和S通過運算得到關(guān)系T，則所使用的運算為A）并 B）自然連接 C）笛卡爾積 D）交10、設(shè)有

3、表示學(xué)生選課的三張表，學(xué)生S（學(xué)號，姓名，性別，年齡，身份證號），課程（課號，課名），選課SC（學(xué)號，課號，成績），則表SC的關(guān)鍵字（鍵或碼）為）課號，成績 B）學(xué)號，成績 C）學(xué)號，課號 D）學(xué)號，姓名，成績11、以下敘述中錯誤的是）標(biāo)準(zhǔn)模塊文件的擴展名是.bas B）標(biāo)準(zhǔn)模塊文件是純代碼文件C）在標(biāo)準(zhǔn)模塊中聲明的全局變量可以在整個工程中使用 D）在標(biāo)準(zhǔn)模塊中不能定義過程12、在Visual Basic中，表達(dá)式3* 25 Mod 3的值是）B）C）D）出現(xiàn)錯誤提示13、以下選項中，不合法的Visual Basic變量名是）a5b B）_xyz C）a_b D)andif14、 以下數(shù)組定義

4、語句中，錯誤的是）Static a (10) As Integer B) Dim c (3, 1 to 4)C) Dim d (-10) D) Dim b (0 to 5, 1 to 3) As Integer15、現(xiàn)有語句：y=IIf(x>0, x Mod 3, 0) ，設(shè)x=10，則y的值是）B）C）D）語句有錯16、為了使文本框同時具有垂直和水平滾動條，應(yīng)先把MultiLine屬性設(shè)置為True，然后再把Scrollbars屬性設(shè)置為） B） C）D）17、文本框Text1的KeyDown事件過程如下：Private SubText1_ KeyDown(KeyCode As Int

5、eger, Shift As Integer)End Sub其中參數(shù)KeyCode的值表示的是發(fā)生此事件時）是否按下了Alt鍵或Ctrl鍵B）按下的是哪個數(shù)字鍵C）所按的鍵盤鍵的鍵碼D）按下的是哪個鼠標(biāo)鍵18、窗體上有一個名稱為Hscroll1的滾動條，程序運行后，當(dāng)單擊滾動條兩端的箭頭時，立即在窗體上顯示滾動框的位置（即刻度值）。下面能夠?qū)崿F(xiàn)上述操作的事件過程是）Private Sub Hscroll1_Changc() B)Private Sub Hsctroll1_Change() Print HScroll1.Value Print HScroll1.SmallChangeEnd Su

6、b End SubC)Private Sub HScroll1_Scroll() D)Private Sub HScroll1_Scroll() Print HScroll1.Value Print HScroll1.SmallChangeEnd Sub End Sub19、 若已把一個命令按鈕的Default屬性設(shè)置為True，則下面可導(dǎo)致按鈕的Click事件過程被調(diào)用的操作是）用鼠標(biāo)右鍵單擊此按鈕 B）按鍵盤上的Esc鍵C）按鍵盤上的回車鍵D）用鼠標(biāo)右鍵雙擊此按鈕20、要使兩個單選按鈕屬于同一個框架，正確的操作是）先畫一個框架，再在框架中畫兩個單選按鈕B）先畫一個框架，再在框架外畫兩個單選

7、按鈕，然后把單遠(yuǎn)按鈕拖到框架中C）先畫兩個單選按鈕，再畫框架將單選按鈕框起來D）以上三種方法都正確21、能夠存放組合框的所有項目內(nèi)容的屬性是）Caption B)Text C)List D)Selected22、 設(shè)窗體上有一個標(biāo)簽Labell和一個計時器Timer1，Timer1的Interval屬性被設(shè)置為1000，Enabled屬性被設(shè)置為True。要求程序運行時每秒在標(biāo)簽中顯示一次系統(tǒng)當(dāng)前時間。以下可以實現(xiàn)上述要求的事件過程是）Private Sub Timer1_Timer() B) Private Sub Timer1_Timer() Label1.Caption=True Lab

8、el1.Caption=Time$End Sub End SubC) Private Sub Timer1_Timer() D) Private Sub Timer1_Timer() Label1.Interval=1 For k = l To Timer1.IntervalEnd Sub Label1.Caption=Timer Next k End Sub23、 設(shè)有如圖所示窗體和以下程序：Private Sub Command1_Click()Textl.Text=“Visual Basic” End SubPrivate Sub Text1_LostFocus()If Text1.Te

9、xt <>“BASIC”ThenText1.Text=”Text1.SetFocusEnd IfEnd Sub程序運行時，在Text1文件框中輸入“Basic”(如圖所示)，然后單擊Command1按鈕，則產(chǎn)生的結(jié)果是）文本框中無內(nèi)容，焦點在文本框中 B）文本框中為“Basic”,焦點在文本框中C）文本框中為“Basic”,焦點的按鈕上 D）文本框中為“Visual Basic”,焦點的按鈕上24、窗體上有一個名稱為Command1的命令按鈕，其事件過程如下：Private Sub Command1_Click()x=“VisualBasicProgramming”a=Right(

10、x,11)b=Mid(x,7,5)C=Msgbox(a, , b)End Sub運行程序后單擊命令按鈕，以下敘述中錯誤的是）信息框的標(biāo)題是Basic B)信息框中的提示信息是ProgrammingC) C的值是函數(shù)的返回值D）MsgBox的使用格式有錯25、設(shè)工程文件包含兩個窗體文件Form1.frm、Form2.frm及一個標(biāo)準(zhǔn)模塊文件Module1.bas，兩個窗體上分別只有一個名稱Command1的命令按鈕。Form1的代碼如下：Public X As IntegerPrivate Sub Form_load()x=1y=5End SubPrivate Sub Command1_Clic

11、k() Form2.ShowEnd SubForm2的代碼如下：Private Sub Command1_Ciick()Print Form1.x,yEnd SubModule1的代碼如下：Public y As Integer運行以上程序，單擊Form1的命令按鈕Command1，則顯示Form2；再單擊Form2上的命令按鈕Command1，則窗體上顯示的是） B） C） D）程序有錯26、窗體上有一個名稱Text1的文本框，一個名稱為Command1的命令按鈕。窗體文件的程序如下：Private Type xa As Integerb AS IntegerEnd TypePrivate

12、Sub Command1_Click()Dim y As xy.a = InputBox(“”)If y.a2=y.a/2 Theny.b=y.a*y.aElsey.b = Fix(y.a/2)End IfText1.Text=y.bEnd Sub對以上程序，下列敘述中錯誤的是）x是用戶定義的類型 B）InputBox函數(shù)彈出的對話框中沒有提示信息C）若輸入的是偶數(shù)，y.b的值為該偶數(shù)的平方D）Fix(y.a/2)把y.a/2的小數(shù)部分四舍五入，轉(zhuǎn)換為整數(shù)返回27、窗體上有一個名稱為CD1的通用對話框控件和由四個命令按鈕組成的控件數(shù)Command1,其下標(biāo)從左到右分別為0、1、2、3,窗體外觀

13、如圖所示。命令按鈕的事件過程如下：Private Sub Command1_Click(Index As Integer)Select Case IndexCase 0CD1.Action=1Case 1CD1.ShowSaveCase 2CD1.Action=5Case 3EndEnd SelectEnd Sub對上述程序，下列敘述中錯誤的是）單擊“打開”按鈕，顯示打開文件的對話框B）單擊“保存”按鈕，顯示保存文件的對話框C）單擊“打印”按鈕，能夠設(shè)置打印選項，并執(zhí)行打印操作D）單擊“退出”按鈕，結(jié)束程序的運行28、窗體上有兩個水平滾動條HV、HT，還有一個文本框Text1和一個標(biāo)題為“計算

14、”的命令按鈕Command1，并編寫了以下程序：Private Sub Command1_ClickOCall Cale (HV.Value, HT.Value) End SubPublic Sub Cale(x AS Integer , y AS Integer) Text1.Text = x* yEnd Sub運行程序，單擊“計算”按鈕，可根據(jù)速度與時間計算出距離，并顯示計算結(jié)果。對以上程序，下列敘述中正確的是）過程調(diào)用語句不對，應(yīng)為Cale (HV,HT)B) 過程定義語句的形式參數(shù)不對，應(yīng)為Sub Cale(x As Control , y As Control)C) 計算結(jié)果在文本框

15、中顯示出來D）程序不能正確運行29、現(xiàn)有如下程序：Private Sub Command1_ Click()S=0For i=1 to 5S=S+f(5+i)Next Print SEnd SubPublic Function f(x As Integer)If x>=10 Thent=x+1Else t=x+2End Iff=tEnd Function運行程序，則窗體上顯示的是）38B）49C）61D）7030、窗體上有一個用菜單編輯器設(shè)計的菜單（見上圖）。運行程序，并在窗體上單擊鼠標(biāo)右鍵，則彈出一個快捷菜單，如圖所示。以下敘述中錯誤的）在設(shè)計“粘貼”菜單項時，在菜單編輯器窗口中設(shè)置了

16、“有效”屬性（有“”）B）菜單中的橫線是在該菜單項的標(biāo)題輸入框中輸入了一個“”（減號）字符C）在設(shè)計“選中”菜單項時，在菜單編輯器窗口中設(shè)置了“復(fù)選”屬性（有“”）D）在設(shè)計該彈出菜單的主菜單項時，在菜單編輯器窗口中去掉了“可見”前面的“”31、窗體上有一個名稱為Picture1圖片框控件，一個名稱Label1的標(biāo)簽控件。如圖所示?，F(xiàn)有如下程序：Public Sub display (x As Control)If TypeOf x is Label Then x.Caption=“計算機等級考試”Else x.Picture = Loadpicture(“pic.jpg”)EndIfEnd

17、SubPrivate Sub Label1_Click() Call display(Label1)End SubPrivate Sub Picture1_Click()Call display(Picture1)End Sub對以上程序，下列敘述中錯誤的是）程序運行時會出錯B）單擊圖片框，在圖片框中顯示一幅圖片C）過程中的X是控件變量 D）單擊標(biāo)簽，在標(biāo)簽中顯示一串文字32、窗體上有兩個名稱分別為Text1、Text2的文本框。Text1的KeyUp的事件過程如下：Private Sub Text1_KeyUp(KeyCode As Integer , shift AS Integer)Di

18、m C AS stringTcxt2.Text=Chr(Asc(c)+2)End Sub當(dāng)向文本框Text1中輸入小寫字母a時，文本框Text2中顯示的是） B）a C)C D)c33、設(shè)窗體上有一個文體框Text1和一個命令按鈕Command1,并有以下事件過程：Private Sub Command1_Click()Dim S As String , ch As StringS=“”For k=1 TO Len(Text1) ch = Mid(Text1,k,l)S=ch+SNext kText1.Text=SEnd Sub程序執(zhí)行時，在文本框中輸入“Basic”,然后單擊命令按鈕，則Te

19、xt1中顯示的是A）Basic B)cisaB C)BASIC D)CISAB34、某人編寫了如下程序，用來求10個整數(shù)（整數(shù)從鍵盤輸入）中的最大值：Private Sub Command1_Click()Dim a(10) As Integer, max As IntegerFor k=1 TO 10a(K)=InputBox(“輸入一個整數(shù)”)Next kMax=0For k=1 To 10If a(k)max ThenMax = a(k)End IfNext kPrint maxEnd Sub運行程序時發(fā)現(xiàn)，當(dāng)輸入10個正數(shù)時，可以得到正確結(jié)果，但輸入10個負(fù)數(shù)時結(jié)果是錯誤的，程序需要修

20、改，下面的修改中可以得到正確運行結(jié)果的是A) 把If a(k)>max Then改為If a(k)<max Then B) 把max = a(k)改為a(k)=maxC) 把第2個循環(huán)語句For k=1 TO 10改為For k=2 TO 10 D) 把max=0改為max = a(10)35、已知在4行3列的全局?jǐn)?shù)組score(4,3)中存放了4個學(xué)生3門課程的考試成績（均為整數(shù)）。現(xiàn)需要計算每個學(xué)生的總分，某人編寫程序如下：Option Base 1Private Sub Command1_Click() Dim sum As IntegerSum=0 For i=1 To 4

21、 For j=1 To 3 Sum = sum + score(i,j)Next jPrint“第”&i&”個學(xué)生的總分是:”;sumNext iEnd Sub運行此程序時發(fā)現(xiàn)，除第1個人的總分計算正確外，其他人的總分是錯誤的。程序需要修改。以下修改方案中正確的是A) 把外層循環(huán)語句For i=1 TO 4改為For i=1 To 3 內(nèi)層循環(huán)語句For j=1 TO 3 改為For j=1 TO 4 B) 把sum=0移到For i=1 TO 4 和For j=1 TO 3之間 C）把sum = sum+score(i,j)改為sum=sum+score(j,i) D) 把s

22、um=sum+score(i,j)改為sum=score(i,j)二、填空題（1）測試用例包括輸入值集和1 值集。（2）深度為5的滿二叉樹有2 個葉子結(jié)點。（3）設(shè)某循環(huán)隊列的容量為50，頭指針Front=5 (指向隊頭元素的前一位置)，尾指針rear=29（指向隊尾元素），則該循環(huán)隊列中共有3 個元素。（4）在關(guān)系數(shù)據(jù)庫中，用來表示實體之間聯(lián)系的是4 。（5）在數(shù)據(jù)庫管理系統(tǒng)提供的數(shù)據(jù)定義語言、數(shù)據(jù)操縱語言和數(shù)據(jù)控制語言中，5 負(fù)責(zé)數(shù)據(jù)的模式定義與數(shù)據(jù)的物理存取構(gòu)建。（6）設(shè)有以下的循環(huán)：要求程序運行時執(zhí)行3次循環(huán)體，請?zhí)羁?。x=1DOx=x+2Print xLoop Until 6 （7）

23、窗體上命令按鈕Command1的事件過程如下：Private Sub Command1_Click() Dim total As Integer total = s(1)+s(2)Print totalEnd SubPrivate Function s(m As Integer) As Integer Static x As Integer For i =1 To m x=x+1 Next i S=xEnd Function運行程序，第3次單擊命令按鈕Command1時，輸出結(jié)果為 7（8）在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下程序：Option Base lPrivate Sub Command1_Click()Dim a(10) As IntegerFor i=1 To 10a(i)=iNextCall swap ( 8 )For i=1 To 10