[其它考試]2009年3月2012年9月計(jì)算機(jī)二級(jí)歷年VB考試真題及答案

1、2009年3月全國(guó)計(jì)算機(jī)等級(jí)考試二級(jí)筆試試卷Visual Basic 語(yǔ)言程序設(shè)計(jì)(考試時(shí)間90分鐘，滿(mǎn)分100分)一、選擇題（1）下列敘述中正確的是      BA） 棧是“先進(jìn)先出”的線(xiàn)性表B） 隊(duì)列是“先進(jìn)先出”的線(xiàn)性表C） 循環(huán)隊(duì)列是非線(xiàn)性結(jié)構(gòu)D） 有序性表既可以采用順序存儲(chǔ)結(jié)構(gòu)，也可以采用鏈?zhǔn)酱鎯?chǔ)結(jié)構(gòu)（2）支持子程序調(diào)用的數(shù)據(jù)結(jié)構(gòu)是       A    &

2、#160;                A） 棧        B） 樹(shù)      C） 隊(duì)列       D）二叉樹(shù)（3）某二叉樹(shù)有5個(gè)度為2的結(jié)點(diǎn)，則該二叉樹(shù)中的葉子結(jié)點(diǎn)數(shù)是 A &#

3、160;   A）10        B）8         C）6        D）4（4）下列排序方法中，最壞情況下比較次數(shù)最少的是 C A）冒泡排序   B）簡(jiǎn)單選擇排序   C）直接插入排序   D）堆排序（5

4、）軟件按功能可以分為：應(yīng)用軟件、系統(tǒng)軟件和支撐軟件（或工具軟件）。下面屬于應(yīng)用軟件的是 C A）編譯軟件   B）操作系統(tǒng)  C）教務(wù)管理系統(tǒng)  D）匯編程序（6）下面敘述中錯(cuò)誤的是 CA）軟件測(cè)試的目的是發(fā)現(xiàn)錯(cuò)誤并改正錯(cuò)誤B）對(duì)被調(diào)試的程序進(jìn)行“錯(cuò)誤定位”是程序調(diào)試的必要步驟C）程序調(diào)試通常也稱(chēng)為DebugD）軟件測(cè)試應(yīng)嚴(yán)格執(zhí)行測(cè)試計(jì)劃，排除測(cè)試的隨意性（7）耦合性和內(nèi)聚性是對(duì)模塊獨(dú)立性度量的兩個(gè)標(biāo)準(zhǔn)。下列敘述中正確的是 B A）提高耦合性降低內(nèi)聚性有利于提高模塊的獨(dú)立性B）降低耦合性提高內(nèi)聚性有利于提

5、高模塊的獨(dú)立性C）耦合性是指一個(gè)模塊內(nèi)部各個(gè)元素間彼此結(jié)合的緊密程度D）內(nèi)聚性是指模塊間互相連接的緊密程度（8）數(shù)據(jù)庫(kù)應(yīng)用系統(tǒng)中的核心問(wèn)題是 CA）數(shù)據(jù)庫(kù)設(shè)計(jì)      B）數(shù)據(jù)庫(kù)系統(tǒng)設(shè)計(jì)C）數(shù)據(jù)庫(kù)維護(hù)       D） 數(shù)據(jù)庫(kù)管理員培訓(xùn)（9）有兩個(gè)關(guān)系R，S如下:19R               

6、0;      A B C a 3 2  b 0 1  c 2 1    A Ba 3b 0c 2由關(guān)系R通過(guò)運(yùn)算得到關(guān)系S，則所使用的運(yùn)算為 AA） 選擇     B）投影     C） 插入  &

7、#160;D）連接（10）將E-R圖轉(zhuǎn)換為關(guān)系模式時(shí)，實(shí)體和聯(lián)系都可以表示為 DA） 屬性    B）鍵       C） 關(guān)系     D） 域(11)執(zhí)行語(yǔ)句 Dim X, Y as Integer 后， DA）X 和Y 均被定義為整型變量B）X和Y被定義為變體類(lèi)型變量C）X被定義為整型變量，Y被定義為變體類(lèi)型變量D）X被定

8、義為變體類(lèi)型變量，Y被定義為整型變量（12）以下關(guān)系表達(dá)式中，其值為T(mén)rue的是 BA）”XYZ”>”XYz”B）”VisualBasic”<>”visualbasic”C）”the”=”there”D）”Integer”<”Int”(13)執(zhí)行以下程序段 a$=”Visual Basic Programming”b$=”C+”c$=Ucase(left$(a$,7)&b$& Right$(a$,12)后，變量c$ 的值為 BA）Visual Basic Programming

9、0;B）VISUALC+ ProgrammingC）Visual C+ Programming D）VISUAL BASIC Programming (14)下列敘述中正確的是 CA）MsgBox語(yǔ)句的返回值是一個(gè)整數(shù)B）執(zhí)行Msgbox語(yǔ)句并出現(xiàn)信息框后,不用關(guān)閉信息框即可執(zhí)行其他操作C）MsgBox語(yǔ)句的第一個(gè)參數(shù)不能省略D）如果省加略MsgBox語(yǔ)句的第三個(gè)參數(shù)(Title),則信息框的標(biāo)題為空 （15）在窗體上畫(huà)一個(gè)文本框（名稱(chēng)為text1）和一個(gè)標(biāo)簽（名稱(chēng)為label1）,程序運(yùn)行后，在文本框中每輸入一個(gè)

10、字符，都會(huì)立即在標(biāo)簽中顯示文本框中字符的個(gè)數(shù)，以下可以實(shí)現(xiàn)實(shí)現(xiàn)上述操作的事件過(guò)程是 CA）Private Sub Text1_Change()Label1.Caption = Str(Len(Text1.Text)End SubB）Private Sub Text1_Click()Label1.Caption = Str(Len(Text1.Text)End SubC）Private Sub Text1_Change()Label1.Caption = t

11、ext1.textEnd SubD）Private Sub label1_Change()Label1.Caption = Str(Len(Text1.Text)End Sub（16）在窗體上畫(huà)兩個(gè)單選按鈕（名稱(chēng)分別為Option1、option2,標(biāo)題分別為“宋體”和“黑體”）、1個(gè)復(fù)選框（名稱(chēng)為check1,標(biāo)題為“粗體”）和1個(gè)文本框（名稱(chēng)為text1,text屬性為“改變文字字體”），窗體外觀如圖所示。程序運(yùn)行后，要求“宋體”單選按鈕和“粗體”復(fù)選框被選中，則以下能夠?qū)崿F(xiàn)上述操作的語(yǔ)句序列是 D A) Option1

12、.value = FalseCheck1.value = True  B) Option1.value = TrueCheck1.value = 0C) Option1.value = TrueCheck1.value = 2D) Option1.value = TrueCheck1.value （17）在窗體上畫(huà)一個(gè)名稱(chēng)為Command1的命令按鈕，然后編寫(xiě)如下事件過(guò)程：Private 

13、;Sub Command1_Click()c = 1234c1 = Trim(Str(c)For i = 1 To 4  Print      NextEnd Sub程序運(yùn)行后，單擊命令按鈕，要求在窗體上顯示如下內(nèi)容：1121231234則在橫線(xiàn)上應(yīng)填入的內(nèi)容為 AARight(c1,i)     B)Left(c1,i)   

14、C)Mid(c1,I,1)   D) Mid(c1,i,i)(18)假定有以下程序段   For i=1 to 3     For j=5 to 1 step -1       Print i*j     Next j Next i則語(yǔ)句&

15、#160;Print i*j 的執(zhí)行次數(shù)是 AA）15      B）16      C）17       D）18（19）在窗體上畫(huà)兩個(gè)文本框（名稱(chēng)分別為text1和text2）和一個(gè)命令按鈕（名稱(chēng)為command1）,然后編寫(xiě)如下事件過(guò)程：Private Sub Command1_Click()  x = 0 &#

16、160;Do While x < 50  x = (x + 2) * (x + 3)  n = n + 1  Loop  text1.Text = Str(n)  text2.Text = Str(x)End Sub程序運(yùn)行后，單擊命令按鈕，在兩個(gè)文本框中顯示的值分別為 BA）1和0

17、     B）2和72  C)3和50     D）4和168(20)閱讀程序：Private Sub Command1_Click() A=0For j=1 to 15  a=a+j mod 3Next jPrint a End Sub程序運(yùn)行后，單擊窗體，輸出結(jié)果是 BA）105   B)1  

18、 C)120    D)15(21)以下說(shuō)法中正確是的 DA)當(dāng)焦點(diǎn)在某個(gè)控件上時(shí)，按下一個(gè)字母鍵,就會(huì)執(zhí)行該控件的keypress事件過(guò)程B)因?yàn)榇绑w不接受焦點(diǎn),所以窗體不存在自己的keypress事件過(guò)程C)若按下的鍵相同,keypress事件過(guò)程中的keyascii參數(shù)與keydown事件過(guò)程中的keycode參數(shù)的值也相同D）在keypress事件過(guò)程中，keyascii參數(shù)可以省略（22）語(yǔ)句  dim a(-3 to 4,3 to 6)as intege

19、r 定義的數(shù)組的元素個(gè)數(shù)是 DA）18    B）28    C）21     D）32（23）在窗體上畫(huà)一個(gè)命令按鈕，其名稱(chēng)為command1,然后編寫(xiě)如下代碼：Option Base 1Private Sub Command1_Click()  Dim a  a = Array(1, 2, 3, 4) &

20、#160;j = 1  For i = 4 To 1 Step -1    s = s + a(i) * j    j = j * 10   Next i   Print sEnd Sub程序運(yùn)行后，單擊命令按鈕后，其輸

21、出結(jié)果是 BA）4321      B）1234     C）34      D）12（24）假定通過(guò)復(fù)制，粘貼操作建立了一個(gè)命令按鈕數(shù)組Command1，以下說(shuō)法中錯(cuò)誤的是 DA）數(shù)組中每個(gè)命令按鈕的名稱(chēng)（name屬性）均為Command1B）若未做修改，數(shù)組中每個(gè)命令按鈕的大小都一樣C）數(shù)組中各個(gè)按鈕使用同一個(gè)click事件過(guò)程D）數(shù)組中每個(gè)命令按鈕的index屬性值都相同（25）在窗體上面畫(huà)一個(gè)命令按鈕，名稱(chēng)為Comma

22、nd1，然后編寫(xiě)如下代碼： Option Base 0Private Sub Command1_Click()   Dim A1(4) As Integer,A2(4) As Integer   For k=0 To 2       A1(k+1)=InputBox(“請(qǐng)輸入一個(gè)整數(shù)”)     &

23、#160; A2(3-k)=A1(k+1)   Next k   Print A2(k) End Sub程序運(yùn)行后，單擊命令按鈕，在輸入對(duì)話(huà)框中依次輸入2、4、6，則輸出結(jié)果為 DA）0      B）1           C）2       &#

24、160;  D）3（26）以下關(guān)于函數(shù)過(guò)程的敘述中，正確的是  A）函數(shù)過(guò)程形參的類(lèi)型與函數(shù)返回值的類(lèi)型沒(méi)有關(guān)系    B）在函數(shù)過(guò)程中，過(guò)程的返回值可以有多個(gè)    C）當(dāng)數(shù)組作為函數(shù)過(guò)程的參數(shù)時(shí)，既能以值方式傳遞，也能以傳址方式傳遞     D）如果不指明函數(shù)過(guò)程參數(shù)的類(lèi)型，則該參數(shù)沒(méi)有數(shù)據(jù)類(lèi)型（27）在窗體上畫(huà)兩個(gè)標(biāo)簽和一個(gè)命令按鈕，其名稱(chēng)分別為L(zhǎng)abel1、Label2和Command1，然后編寫(xiě)如下程序： 

25、 Private Sub func(L As Label)       L.Caption=”1234”  End sub  Private Sub Form_Load()       Label2.Caption=10  End sub  Private Sub Co

26、mmand1_Click()     A=Val(Label2.Caption)     Call func(Label1)     Label2.Caption=a  End sub程序運(yùn)行后，單擊命令按鈕，則在兩個(gè)標(biāo)簽中顯示的內(nèi)容分別為 DA）ABCD和10            &#

27、160;    B）1234和100    C）ABCD和100               D）1234和10（28）在窗體上畫(huà)一個(gè)命令按鈕（名稱(chēng)為Command1），并編寫(xiě)如下代碼： Functin Fun1(Byval a As Integer ,b As Integer) 

28、;As Integer      Dim t As Integer      t=a-b      b=t+a      Fun1=t+b End FunctionPrivate Sub Command1_Click()     

29、Dim x As Integer     X=10     Print Fun1(Fun1(x,(Fun1(x,x-1),x-1)End Sub程序運(yùn)行后，單擊命令按鈕，輸出結(jié)果是A）10        B）0          C）11  

30、0;  D）21（29）以下關(guān)于過(guò)程及過(guò)程參數(shù)的描述中，錯(cuò)誤的是A）過(guò)程的參數(shù)可以是控件名稱(chēng)    B）調(diào)用過(guò)程時(shí)使用的實(shí)參的個(gè)數(shù)應(yīng)與過(guò)程形參的個(gè)數(shù)相同    C）只有函數(shù)過(guò)程能夠?qū)⑦^(guò)程中處理的信息返回到調(diào)用程序中     D）窗體可以作為過(guò)程的函數(shù)（30）有如下通用過(guò)程：   Public Function Fun(xStr As String) As S

31、tring      Dim tStr As String ,strL As Integer      tStr=”      strL=Len(xStr)      i=strL/2      Do While i&l

32、t;=strL          tStr=tStr & Mid(xStr,i+1,1)          i=i+1      Loop      Fun=tStr & tStr   End&

33、#160;Function  在窗體上畫(huà)一個(gè)名稱(chēng)為T(mén)ext1的文本框和一個(gè)名稱(chēng)為Command1的命令按鈕，然后編寫(xiě)如下事件過(guò)程：Private Sub Command1_Click()Dim S1 As StringS1=”ABCDEF”Text1.Text=Lcase(Fun(S1)End Sub程序運(yùn)行后，單擊命令按鈕，文本框中顯示的是A）ABCDEF         B）abcdef   

34、     C）defded        D）defabc（31）在窗體上畫(huà)一個(gè)命令按鈕和一個(gè)文本框（名稱(chēng)分別為Command1和Text1），并把窗體的Keyprewiew屬性設(shè)置為T(mén)rue，然后編寫(xiě)如下代碼：Dim SaveAll As StringPrivate Sub Form_Load ()   Show   Text1.Text=”&#

35、160;  Text1.SetFocusEnd SubPrivate Sub Command1_Click()   Text1.Text=Lcase(SaveAll)+SaveAllEnd SubPrivate Sub Form_KeyPress(KeyAscii As Integer)SaveAll=SaveAll+Chr(KeyAscii)End Sub程序運(yùn)行后，直接用鍵盤(pán)輸入：VB，再單擊命令按鈕，則文本框中顯示的內(nèi)容為A）vbVB &#

36、160;       B）不顯示任何信息       C）VB         D）出錯(cuò)（32）設(shè)有以下程序：  Private Sub Form_Click()      X=50      For 

37、;i=1 To 4         Y=InputBox(“請(qǐng)輸入一個(gè)整數(shù)”)         Y=Val(y)          If y Mod 5=0 Then        

38、;      a=a+y              x=y          Else              a=a+x   

39、       End If        Next i        Print a     End Sub   程序運(yùn)行后，單擊窗體，在輸入對(duì)話(huà)框中依次輸入15、24、35、46，輸出結(jié)果為  A）100  

40、  B）50         C）120     D）70（33）以下關(guān)于菜單的敘述中，錯(cuò)誤的是   A）當(dāng)前窗體為活動(dòng)窗體時(shí)，用Ctrl+E鍵可以打開(kāi)菜單編輯器    B）把菜單項(xiàng)的Enabled屬性設(shè)置為False,則可刪除該菜單項(xiàng)    C）彈出式菜單在菜單編輯器中設(shè)計(jì)    

41、60;D）程序運(yùn)行時(shí)，利用控件數(shù)組可以實(shí)現(xiàn)菜單項(xiàng)的增加或減少（34）以下敘述中錯(cuò)誤的是A）在程序運(yùn)行時(shí)，通用對(duì)話(huà)框控件是不可見(jiàn)的    B）調(diào)用同一個(gè)通用對(duì)話(huà)框控件的不同方法（如ShowOpen 或ShowSave）可以打開(kāi)不同的對(duì)話(huà)框窗口   C）調(diào)用通用對(duì)話(huà)框控件的ShowOpen方法，能夠直接打開(kāi)在該通用對(duì)話(huà)框中指定的文件     D）調(diào)用通用對(duì)話(huà)框控件的ShowColor方法，可以打開(kāi)顏色對(duì)話(huà)框窗口（35）設(shè)在工程文件中有一個(gè)標(biāo)準(zhǔn)模塊，其中定義了如下記錄類(lèi)型

42、：Type Books     Name As String * 10     TelNum As String * 20End Type在窗體上畫(huà)一個(gè)名為Command1的命令按鈕，要求當(dāng)執(zhí)行事件過(guò)程Command1_Click時(shí)，在順序文件Person.txt中寫(xiě)入一條Books類(lèi)型的記錄。下列能夠完成該操作的事件過(guò)程是A）Private Sub Command1_Clic

43、k()Dim B As BooksOpen “Person.txt” For Output  As #1B.Name=InputBox(“輸入姓名”)B.TelNum=InputBox(“輸入電話(huà)號(hào)碼”)Write #1,B.Name,B.TelNumClose #1End SubB）Private Sub Command1_Click()Dim B As BooksOpen “Person.txt” Fo

44、r input  As #1B.Name=InputBox(“輸入姓名”)B.TelNum=InputBox(“輸入電話(huà)號(hào)碼”)Print  #1,B.Name,B.TelNumClose #1End Sub C）Private Sub Command1_Click()Dim B As BooksOpen “Person.txt” For Output  As #1B.Name=InputBox(

45、“輸入姓名”)B.TelNum=InputBox(“輸入電話(huà)號(hào)碼”)Write #1,BClose #1End SubD）Private Sub Command1_Click()Open “Person.txt” For input  As #1Name=InputBox(“輸入姓名”)TelNum=InputBox(“輸入電話(huà)號(hào)碼”)Print #1, Name, TelNumClose #1End Sub二、填空題（每空2分，共30

46、分）請(qǐng)將每一個(gè)空的正確答案寫(xiě)在答題紙上【1】-【15】序號(hào)的橫線(xiàn)上，答在試卷上，在試卷上不得分， 注意：以命令關(guān)鍵字填空的必須寫(xiě)完整。（1）假設(shè)一個(gè)長(zhǎng)度為50的數(shù)組（數(shù)組元素的下標(biāo)從0到49）作為棧的存儲(chǔ)空間，棧底指針bottom指向棧底元素，棧頂指針top指向棧頂元素，如果bottom=49，top=30（數(shù)組下標(biāo)），則棧中具有 【1】 個(gè)元素。（2）軟件測(cè)試可分為白盒測(cè)試和黑盒測(cè)試。基本路徑測(cè)試屬于  【2】 測(cè)試。（3）符合結(jié)構(gòu)化原則的三種基本控制結(jié)構(gòu)是：選擇結(jié)構(gòu)、循環(huán)結(jié)構(gòu)和  【3】 。（4）數(shù)據(jù)

47、庫(kù)系統(tǒng)的核心是  【4】（5）在E-R圖中，圖形包括矩形框、菱形框、橢圓框。其中表示實(shí)體聯(lián)系的是  【5 】框。（6）窗體如圖所示，其中汽車(chē)是名稱(chēng)為Image1的圖像框，命令按鈕的名稱(chēng)為Command1,計(jì)時(shí)器的名稱(chēng)為T(mén)imer1,直線(xiàn)的名稱(chēng)為L(zhǎng)ine1。程序運(yùn)行時(shí)，單擊命令按鈕，則汽車(chē)每0.1秒向左移動(dòng)100，車(chē)頭到達(dá)左邊的直線(xiàn)時(shí)停止移動(dòng)。請(qǐng)?zhí)羁胀瓿上旅娴膶傩栽O(shè)置和程序，以便實(shí)現(xiàn)上述功能。1 Timer1的Interval屬性的值應(yīng)事先設(shè)置為【6】2 Private Sub Command1_Click

48、()        Timer1.Enabled=True   End Sub   Private Sub Timer1_Timer()       If Image1.Left>=【7】Then         Image1.Left=【8】-100&

49、#160;      End If   End Sub（7）設(shè)窗體上有一個(gè)名稱(chēng)為Combol 的組合框，并有以下程序：Private Sub Combol_KeyPress(KeyAscii As Integer)If【9】=13 Then                

50、;        回車(chē)符的ASCII碼是13For k=0 To Combol.ListCount-1If Combol.Text= Combol.List(k)  ThenCombol.Text=”Exit ForEnd IfNext kIf Combol.Text <> “” ThenCombol.AddItem【10】End IfEnd I

51、fEnd Sub程序的功能是：在組合框的編輯區(qū)中輸入文本后按回車(chē)鍵，則檢查列表中有無(wú)與此文本相同的項(xiàng)目，若有，則把編輯區(qū)中的文本刪除，否則把編輯區(qū)中文本添加到列表的尾部。請(qǐng)?zhí)羁?。?）在當(dāng)前目錄下有一個(gè)名為“myfile.txt”的文本文件，其中有若干行文本。下面程序的功能是讀入此文件中的所有文本行，按行計(jì)算每行字符的ASCII碼之和，并顯示在窗體上。請(qǐng)?zhí)羁?。Private Sub Commandl_Click()Dim ch$,ascii As IntegerOpen “myfile.txt” For【11】&#

52、160;As #1While Not EOF(1)Line Input #1,chascii=toasill (【12】)Print asciiWend Close #1End SubPrivate Function toascii(mystr$) As Integern=0For k=1 To 【13】n=n+Asc(Mid(mystr,k,l)Next kToascii=nEnd Function（9）

53、本程序?qū)崿F(xiàn)文本加密。先給定序列：a1,a2,an,它們的取值范圍是1n，且互不相同。加密算法是：把原文本中第k個(gè)字符放到加密后的文本的第ak個(gè)位置處。若原文本長(zhǎng)度大于n，則只對(duì)前n個(gè)字符加密，后面的字符不變；若原文本長(zhǎng)度小于n，則在后面補(bǔ)字符“*”使文本長(zhǎng)度為n后再加密。例如：若給定序列a1,a2,a7分別為2，5，3，7，6，1，4當(dāng)文本為“PROGRAM”時(shí)，加密后的文本為“APOMRRG”當(dāng)文本為“PROGRAMMING”，加密后的文本為“APOMRRGMING”當(dāng)文本為“THANK”時(shí)，加密后的文本為“TA*HKN”下面的過(guò)程code實(shí)現(xiàn)這一算法。其中參數(shù)數(shù)組a()中存放給定序列（個(gè)數(shù)

54、與數(shù)組a的元素個(gè)數(shù)相等）a1,a2,a3的值，要加密的文本放在參數(shù)變量mystr中。過(guò)程執(zhí)行完畢，加密后的文本仍放在變量mystr中。請(qǐng)?zhí)羁?。Option Base 1Private Sub code(a () As Integer,mystr As String)Dim ch As string,cl As Stringn=Ubound(a)-Len(mystr)If n>0 Thenmystr= mystr&

55、 Strings(n,”*”)End IfCh=mystrFor k=【14】 To Ubound(a)Cl=Mid(mystr,k,l)n=【15】Mid$(ch,n)=clNext kMystr=chEnd Sub2009年4月二級(jí)VB參考答案1 選擇題：1-5： DDCDC 6-10：ABAAC11-15：DBBCA 16-20：DBABD21-25：ADBDC 26-30：ADBCC31-35：AABCA2 填空題1、19 2、白盒 3、順序結(jié)構(gòu)4、數(shù)據(jù)庫(kù)管理系統(tǒng) 5、菱形 6、1007

56、、Line1.x1 8、Image1.Left 9、KeyAscii10、Combo1.Text 11、Input 12、ch13、Len(mystr) 14、1 15、a(k)2009年9月全國(guó)計(jì)算機(jī)等級(jí)考試二級(jí)VB筆試試題及答案一、選擇題（每小題2分，共70分） 一、選擇題1下列數(shù)據(jù)結(jié)構(gòu)中，屬于非線(xiàn)性結(jié)構(gòu)的是（     ）。A.     循環(huán)隊(duì)列 B.帶鏈隊(duì)列C.二叉樹(shù)  D.帶鏈棧答案 C解析 樹(shù)均是非線(xiàn)性結(jié)構(gòu)2. 下列數(shù)據(jù)結(jié)構(gòu)中,能夠按照”先進(jìn)后出”原則存取數(shù)據(jù)的是（  

57、60;  ）。A.     循環(huán)隊(duì)列 B.棧  C.隊(duì)列 D.二叉樹(shù)答案 B解析:棧是先進(jìn)后出或后進(jìn)先出的線(xiàn)性表3. 對(duì)于循環(huán)隊(duì)列,下列敘述中正確的是（     ）。A.隊(duì)頭指針是固定不變的B.隊(duì)頭指針一定大于隊(duì)尾指針C.隊(duì)頭指針一定小于隊(duì)尾指針D.隊(duì)頭指針可以大于隊(duì)尾指針，也可以小于隊(duì)尾指針答案 D解析:如果隊(duì)頭指針大于隊(duì)尾指針說(shuō)明隊(duì)列已經(jīng)循環(huán)存放數(shù)據(jù)了,如果隊(duì)頭指針小于隊(duì)尾指針說(shuō)明沒(méi)有進(jìn)行循環(huán)存放4. 算法的空間復(fù)雜度是指（     ）。A.算法在執(zhí)行

58、過(guò)程中所需要的計(jì)算機(jī)存儲(chǔ)空間    B.算法所處理的數(shù)據(jù)量C.算法程序中的語(yǔ)句或指令條數(shù)                       D.算法在執(zhí)行過(guò)程中所需要的臨時(shí)工作單元數(shù)答案 A解析:算法的空間復(fù)雜度是指執(zhí)行算法所需要的內(nèi)存空間,包括算法程序所占空間,輸入的初始數(shù)據(jù)所占空間和執(zhí)行過(guò)程中所需要的額外空間.5. 軟件設(shè)計(jì)中劃分模塊的一個(gè)準(zhǔn)則是（&

59、#160;    ）。A. 低內(nèi)聚低耦合 B. 高內(nèi)聚低耦合 C. 低內(nèi)聚高耦合  D. 高內(nèi)聚高耦合答案 B解析:模塊內(nèi)部各元素之間的聯(lián)系要緊密,高內(nèi)聚,模塊間的連接的緊密程度要低,低耦合,這樣可以提高模塊的獨(dú)立性.6. 下列選項(xiàng)中不屬于結(jié)構(gòu)化程序設(shè)計(jì)原則的是（     ）。A.可封裝 B.自頂向下 C.模塊化 D.逐步求精答案 A7.軟件詳細(xì)設(shè)計(jì)產(chǎn)生的圖如下該圖是(    ).A.N-S圖 B. PAD圖 C. 程序流程圖 D.E-R圖答案 C8.數(shù)據(jù)庫(kù)管理系統(tǒng)是（

60、60;    ）。A. 操作系統(tǒng)的一部分 B.在操作系統(tǒng)支持下的系統(tǒng)軟件 C.一種編譯系統(tǒng) D.一種操作系統(tǒng) 答案 B 9.在E-R圖中，用來(lái)表示實(shí)體聯(lián)系的圖形是（     ）。A.橢圓形 B.矩形 C.菱形 D .三角形 答案 C 10.有三個(gè)關(guān)系R,S,T 如下：R ABCa12b21c31S ABCd32T ABCa12b21c31d32 其中關(guān)系T由關(guān)系R和S通過(guò)某種操作得到，該操作稱(chēng)為（     ）。A.選擇 B.投影  C.

61、 交 D. 并 答案 D解析:T是由S表或R表中的元素組成的（11）以下變量名中合法的是 C）str_n （12）把數(shù)學(xué)表達(dá)式表示為正確的VB表達(dá)式應(yīng)該是 D）(x*5+3)/(y*2-6) （13）下面有關(guān)標(biāo)準(zhǔn)模塊的敘述中，錯(cuò)誤的是 A）標(biāo)準(zhǔn)模塊不完全由代碼組成，還可以有窗體 （14）下面控件中，沒(méi)有Caption屬性的是 C）組合框 （15）用來(lái)設(shè)置文字字體是否斜體的屬性是 D）FontItalic （16）若看到程序有如下事件過(guò)程，則可以肯定的是，當(dāng)程序運(yùn)行時(shí) Private SubClick_MouseDown(Button As Integer, Shift As Inte

62、ger, X As Single, Y As Single) Print "VB Program" End Sub D）用鼠標(biāo)左鍵或右鍵單擊名稱(chēng)為“Click”的控件時(shí)，執(zhí)行此過(guò)程 （17）可以產(chǎn)生30-50（含30到50）之間的隨機(jī)整數(shù)的表達(dá)式是 A）Int(Rnd*21+30) （18）在程序運(yùn)行時(shí)，下面的敘述中正確的是 C）只裝入而不顯示窗體，也會(huì)執(zhí)行窗體的Form_Load事件過(guò)程 （19）窗體有名稱(chēng)為Command1的命令按鈕和名稱(chēng)為T(mén)ext1的文本框 Private Sub Command1_Click() Text1.Text = "程序設(shè)計(jì)&quo

63、t; Text1.SetFocus End Sub Private Sub Text1_GotFocus() Text1.Text = "等級(jí)考試" End Sub 運(yùn)行以上程序，單擊命令按鈕后 B）文本框中顯示的是“等級(jí)考試”，且焦點(diǎn)在文本框中 （20）設(shè)窗體上有名稱(chēng)為Option1的單選按鈕，且程序中有語(yǔ)句： If Option.Value=True Then 下面語(yǔ)句中與該語(yǔ)句不等價(jià)的是 C）If Value=True Then （21）設(shè)窗體上有1個(gè)水平滾動(dòng)條，已經(jīng)通過(guò)屬性窗口把它的Max屬性設(shè)置為1，Min屬性設(shè)置為100，下面敘述中正確的是 A）程序運(yùn)行時(shí)，若使

64、滾動(dòng)條向左移動(dòng)，滾動(dòng)條的Value屬性值就增加 （22）有如下過(guò)程代碼： Sub var_dim() Static numa As Integer Dim numb As Integer numa = numa + 2 numb = numb + 1 Print numa; numb End Sub 連續(xù)3次調(diào)用var_dim過(guò)程，第3次調(diào)用時(shí)的輸出是 C）6 1 （23）在窗體上畫(huà)1個(gè)命令按鈕，并編寫(xiě)如下事件過(guò)程： Private Sub Command1_Click() For i = 5 To 1 Step -0.8 Print Int(i); Next i End Sub 運(yùn)行程序，單

65、擊命令按鈕，窗體上顯示的內(nèi)容為 A）5 4 3 2 1 1 （24）在窗體上畫(huà)1個(gè)命令按鈕，并編寫(xiě)如下事件過(guò)程： Private Sub Command1_Click() Dim a(3, 3) For m = 1 To 3 For n = 1 To 3 If n = m Or n = 4 - m Then a(m, n) = m + n Else a(m, n) = 0 End If Print a(m, n); Next n Print Next m End Sub B）2 0 4 0 4 0 4 0 6 （25）設(shè)有如下函數(shù)過(guò)程： Function fun(a As Integer, b

66、 As Integer) Dim c As Integer If a < b Then c = a: a = b: b = c End If c = 0 Do c = c + a Loop Until c Mod b = 0 fun = c End Function 若調(diào)用函數(shù)fun時(shí)的實(shí)際參數(shù)都是自然數(shù)，則函數(shù)返回的是 B）a、b的最小公倍數(shù) （26）窗體上有1個(gè)名稱(chēng)為T(mén)ext1的文本框；1個(gè)名稱(chēng)為T(mén)imer1的計(jì)時(shí)器控件，其Interval屬性為5000，Enabled屬性值是True。Timer1的事件過(guò)程如下： Private Sub Timer1_Timer() Static

67、flag As Integer If flag = 0 Then flag = 1 flag = -flag If flag = -1 Then Text1.ForeColor = &HFF& '&HFF&為紅色 Else Text1.ForeColor = &HC000& '&HC000&為綠色 End If End Sub 以下敘述中正確的是 C）程序執(zhí)行后，文本框的文字每5秒改變一次顏色 （27）為計(jì)算1+2+22+23+24+210的值，并把結(jié)果顯示在文本框Text1中，若編寫(xiě)如下事件過(guò)程： Private

68、 Sub Command1_Click() Dim a%, s%, k% s = 1 a = 2 For k = 2 To 10 a = a * 2 s = s + a Next k Text1.Text = s End Sub 執(zhí)行此事件過(guò)程后發(fā)現(xiàn)結(jié)果是錯(cuò)誤的，為能夠得到正確結(jié)果，應(yīng)做的修改是 D）同時(shí)進(jìn)行B）、C）兩種修改 （28）標(biāo)準(zhǔn)模塊中有如下程序代碼： Public x As Integer, y As Integer Sub var_pub() x = 10: y = 20 End Sub 在窗體上有1個(gè)命令按鈕，并有如下事件過(guò)程： Private Sub Command1_Cli

69、ck() Dim x As Integer Call var_pub x = x + 100 y = y + 100 Print x; y End Sub B）100 120 （29）設(shè)a，b都是自然數(shù)，為求a除以b的余數(shù)，默認(rèn)編寫(xiě)了以下函數(shù)： Function fun(a As Integer, b As Integer) While a > b a = a - b Wend fun = a End Function 在調(diào)試時(shí)發(fā)現(xiàn)函數(shù)是錯(cuò)誤的，為使函數(shù)能產(chǎn)生正確的返回值，應(yīng)做的修改是 D）把While a>b改為While a>=b （30）下列關(guān)于通用對(duì)話(huà)框CommonD

70、ialog1的敘述中，錯(cuò)誤的是 A）只要在“打開(kāi)”對(duì)話(huà)框中選擇了文件，并單擊“打開(kāi)”按鈕，就可以將選中的文件打開(kāi) （31）在利用菜單編輯器設(shè)計(jì)菜單時(shí)，為了把組合鍵“Alt+X”設(shè)置為“退出(X)”菜單項(xiàng)的訪問(wèn)鍵，可以將該菜單項(xiàng)的標(biāo)題設(shè)置為 B）退出(&X) （32）在窗體上畫(huà)1個(gè)命令按鈕和1個(gè)文本框，其名稱(chēng)分別為Command1和Text1，再編寫(xiě)如下程序： Dim ss As String Private Sub Text1_KeyPress(KeyAscii As Integer) If Chr(KeyAscii) <> "" Then ss = s

71、s + Chr(KeyAscii) End Sub Private Sub Command1_Click() Dim m As String, i As Integer For i = Len(ss) To 1 Step -1 m = m + Mid(ss, i, 1) Next Text1.Text = UCase(m) End Sub 程序運(yùn)行后，在文本框中輸入“Number 100”，并單擊命令按鈕，則文本框中顯示的是 D）001REMBUN （33）窗體的左右兩端各有1條直線(xiàn)，名稱(chēng)分別為L(zhǎng)ine1、Line2；名稱(chēng)為Shape1的圓靠在左邊的Line1直線(xiàn)上（見(jiàn)圖）；另有1個(gè)名稱(chēng)為T(mén)i

72、mer1的計(jì)時(shí)器控件，其屬性值為T(mén)rue。要求程序運(yùn)行后，圓每秒向右移動(dòng)100，當(dāng)圓遇到Line2時(shí)則停止移動(dòng)。為實(shí)現(xiàn)上述功能，某人把計(jì)時(shí)器的Interval屬性設(shè)置為1000，并編寫(xiě)了如下程序： Private Sub Timer1_Timer() For k = Line1.X1 To Line2.X1 Step 100 If Shape1.Left + Shape1.Width < Line2.X1 Then Shape1.Left = Shape1.Left + 100 End If Next k End Sub 運(yùn)行程序時(shí)發(fā)現(xiàn)圓立即移動(dòng)到右邊的直線(xiàn)處，與題目要求的移動(dòng)方式不符。

73、為得到與題目要求相符的結(jié)果，下面修改方案中正確的是 B）把 For k = Line1.X1 To Line2.X1 Step 100 和Next k兩行刪除 （34）下列有關(guān)文件的敘述中，正確的是 C）隨機(jī)文件中，每個(gè)記錄的長(zhǎng)度是固定的 （35）窗體如圖1所示。要求程序運(yùn)行時(shí)，在文本框Text1中輸入一個(gè)姓氏，單擊“刪除”按鈕（名稱(chēng)為Command1），則可刪除列表框List1中所有該姓氏的項(xiàng)目。若編寫(xiě)以下程序來(lái)實(shí)現(xiàn)此功能： Private Sub Command1_Click() Dim n%, k% n = Len(Text1.Text) For k = 0 To List1.ListC

74、ount - 1 If Left(List1.List(k), n) = Text1.Text Then List1.RemoveItem k End If Next k End Sub 在調(diào)試時(shí)發(fā)現(xiàn)，如輸入“陳”，可以正確刪除所有姓“陳”的項(xiàng)目，但輸入“劉”，則只刪除了“劉邦”、“劉備”項(xiàng)，結(jié)果如圖所示。這說(shuō)明程序不能適應(yīng)所有情況，需要改正。正確的修改方案是把For k=0 to List1.ListCount-1改為 A）For k = List1.ListCount - 1 To 0 Step -1 二、填空題（每空2分，共30分） （1）某二叉樹(shù)有5個(gè)度為2的結(jié)點(diǎn)以及3個(gè)度為1的結(jié)點(diǎn)，

75、則該二叉樹(shù)中共有 【1】14 個(gè)結(jié)點(diǎn)。 （2）程序流程圖中的菱形框表示的是【2】 邏輯條件 或 邏輯判斷 或 條件或判斷。 （3）軟件開(kāi)發(fā)過(guò)程主要分為需求分析、設(shè)計(jì)、編碼與測(cè)試四個(gè)階段，其中【3】需求分析 階段產(chǎn)生“軟件需求規(guī)格說(shuō)明書(shū)”。 （4）在數(shù)據(jù)庫(kù)技術(shù)中，實(shí)體集之間的聯(lián)系可以是一對(duì)一或一對(duì)多的，那么“學(xué)生”和“可選課程”的聯(lián)系為【4】多對(duì)多。 （5）人員基本信息一般包括：身份證號(hào)，姓名，性別，年齡等。其中可以作為主關(guān)鍵字的是【5】身份證號(hào)。 （6）工程中有Form1和Form2兩個(gè)窗體。Form1窗體外觀如圖1所示。程序運(yùn)行時(shí)，在Form1中名稱(chēng)為T(mén)ext1的文本框中輸入一個(gè)數(shù)值（圓的半

76、徑），然后單擊命令按鈕“計(jì)算并顯示”（其名稱(chēng)為Command1），則顯示Form2窗體，且根據(jù)輸入的圓的半徑計(jì)算圓的面積，并在Form2的窗體上顯示出來(lái)，如圖2所示。如果單擊命令按鈕時(shí)，文本框中輸入的不是數(shù)值，則用信息框顯示“請(qǐng)輸入數(shù)值數(shù)據(jù)！”。請(qǐng)?zhí)羁铡?Private Sub Command1_Click() If Text1.Text = "" Then magbox "請(qǐng)輸入半徑！" ElseIf Not IsNumeric(【6】Text1.Text) Then MsgBox "請(qǐng)輸入數(shù)值數(shù)據(jù)！" Else r = Val(【

77、7】Text1.Text) Form2.Show 【8】Form2.Print "圓的面積是" & 3.14 * r * r End If End Sub （7）設(shè)有整型變量s，取值范圍為0100，表示學(xué)生的成績(jī)，有如下程序段： If s >= 90 Then Level = "A" ElseIf s >= 75 Then Level = "B" ElseIf s >= 60 Then Level = "C" Else Level = "D" End If 下面用Sel

78、ect Case結(jié)構(gòu)改寫(xiě)上述程序，使兩段程序所實(shí)現(xiàn)的功能完全相同，請(qǐng)?zhí)羁铡?Select Case s Case【9】 Is >= 95 Level = "A" Case 75 To 90 Level = "B" Case 60 To 74 Level = "C" Case 【10】Else 或 Is<60 Level = "D" 【11】End Select （8）窗體上有名稱(chēng)為Command1的命令按鈕。事件過(guò)程及2個(gè)函數(shù)過(guò)程如下： Private Sub Command1_Click() Dim

79、x As Integer, y As Integer, z x = 3 y = 5 z = fy(y) Print fx(fx(x), y End Sub Function fx(ByVal a As Integer) a = a + a fx = a End Function Function fy(ByRef a As Integer) a = a + a fy = a End Function 運(yùn)行程序，并單擊命令按鈕，則窗體上顯示的2個(gè)值依次是【12】12和【13】10。 （9）窗體上有名稱(chēng)為Command1的命令按鈕及名稱(chēng)為T(mén)ext1、能顯示多行文本的文本框。程序運(yùn)行后，如果單擊命令按鈕，則可打開(kāi)磁盤(pán)文件c:test.txt，并將文件中的內(nèi)容（多行文本）顯示在文本框中。下面是實(shí)現(xiàn)此能的程序，請(qǐng)?zhí)羁铡?Private Sub Command1_Click() Text1 = "" Number = FreeFile Open "c:test.txt" For Input As Number Do While Not EOF(【14】Number) Line Input #Number, s Text1.Text = Text1.Text +【15】 s + Chr(13