9月全國計算機等級考試二級筆試試卷

1、2021年9月全國計算機等級考試二級筆試試卷摘要：2021年9月全國計算機等級考試二級筆試試題Visual Basic 語言程序設(shè)計.A)算法在執(zhí)行過程中所需要的計算機存儲空間B)算法所處理的數(shù)據(jù)量.關(guān)鍵詞：計算機,算法類別：專題技術(shù)來源：牛檔搜索Niudown 本文系牛檔搜索Niudown 根據(jù)用戶的指令自動搜索的結(jié)果，文中內(nèi)涉及到的資料均來自互聯(lián)網(wǎng)，用于學(xué)習(xí)交流經(jīng)驗，作品其著作權(quán)歸原作者所有。不代表牛檔搜索Niudown 贊本錢文的內(nèi)容或立場，牛檔搜索Niudown 不對其付相應(yīng)的法律責(zé)任！2021年9月全國計算機等級考試二級筆試試卷 Visual Basic語言程序設(shè)計

2、0;考試時間90分鐘，總分值100分一、選擇題每題2分，共70分以下各題A、B、C、D四個選項中，只有一個選項是正確的。請將正確選項填涂在答題卡相應(yīng)位置上，答在試卷上不得分。1以下數(shù)據(jù)結(jié)構(gòu)中，屬于非線性結(jié)構(gòu)的是A循環(huán)隊列       B帶鏈隊列C二叉樹D帶鏈棧2以下數(shù)據(jù)結(jié)構(gòu)中，能夠按照“先進后出原那么存取數(shù)據(jù)的是A循環(huán)隊列       B棧C隊列D二叉樹3對于循環(huán)隊列，以下表達中正確的選項是A隊頭指針是固定不變的      &

3、#160;     B隊頭指針一定大于隊尾指針C隊頭指針一定小于隊尾指針    D隊頭指針可以大于隊尾指針，也可以小于隊尾指針4算法的空間復(fù)雜度是指A算法在執(zhí)行過程中所需要的計算機存儲空間B算法所處理的數(shù)據(jù)量C算法程序中的語句或指令條數(shù)D算法在執(zhí)行過程中所需要的臨時工作單元數(shù)5軟件設(shè)計中劃分模塊的一個準那么是A低內(nèi)聚低耦合B高內(nèi)聚低耦合C低內(nèi)聚高耦合D高內(nèi)聚高耦合6以下選項中不屬于結(jié)構(gòu)化程序設(shè)計原那么的是A可封裝         

4、60; B自頂向下C模塊化          D逐步求精7軟件詳細設(shè)計產(chǎn)生的圖如下：beginX=0b=ac=aendYN該圖是AN-S圖      BPAD圖      C程序流程圖      DE-R圖8數(shù)據(jù)庫管理系統(tǒng)是A操作系統(tǒng)的一局部          B在操作

5、系統(tǒng)支持下的系統(tǒng)軟件C一種編譯系統(tǒng)                  D一種操作系統(tǒng)9在E-R圖中，用來表示實體聯(lián)系的圖形是A橢圓形       B矩形      C菱形      D三角形10有三個關(guān)系R，S和T如下：RSTABC ABC 

6、;ABCa12 d32 a12b21     b21 c3 1     c31d32其中關(guān)系T由關(guān)系R和S通過某種操作得到，該操作為A選擇        B投影       C交      D并11以下變量名中合法的是Ax2-1BprintCstr_nD2x12把數(shù)學(xué)表達式 圖1

7、 表示為正確的VB表達式應(yīng)該是A(5x+3)/(2y-6)Bx*5+3/2*y-6C(5*x+3) l圖2 (2*y-6)D(x*5+3)/(y*2-6)13下面有關(guān)標準模塊的表達中，錯誤的選項是A標準模塊不完全由代碼組成，還可以有窗體B標準模塊中的Private過程不能被工程中的其他模塊調(diào)用C標準模塊的文件擴展名為.basD標準模塊中的全局變量可以被工程中的任何模塊引用14下面控件中，沒有Caption屬性的是A復(fù)選框B單項選擇按鈕C組合框D框架15用來設(shè)置文字字體是否斜體的屬性是AFontUnderlineBFontBoldCFontSlopeDFontItalic  

8、  16假設(shè)看到程序中有以下事件過程，那么可以肯定的是，當(dāng)程序運行時Private Sub Click_MouseDown(Button As Integer,_Shift As Integer,X As Single,Y As Single)Print “VB ProgramEnd SubA用鼠標左鍵單擊名稱為“Command1”的命令按鈕時，執(zhí)行此過程B用鼠標左鍵單擊名稱為“MouseDown的命令按鈕時，執(zhí)行此過程C用鼠標左鍵單擊名稱為“MouseDown的控件時，執(zhí)行此過程D用鼠標左鍵或右鍵單擊名稱為“Click的控件時，執(zhí)行此過程17可以產(chǎn)生30-50含30和50之間的隨機

9、整數(shù)的表達式是AInt(Rnd*21+30)BInt(Rnd*20+30)CInt(Rnd*50-Rnd*30)DInt(Rnd*30+50)18在程序運行時，下面的表達中正確的選項是A用鼠標右鍵單擊窗體中無控件的局部，會執(zhí)行窗體的Form_Load事件過程B用鼠標左鍵單擊窗體的標題欄，會執(zhí)行窗體的Form_Click事件過程C只裝入而不顯示窗體，也會執(zhí)行窗體的Form_Load事件過程D裝入窗體后，每次顯示該窗體時，都會執(zhí)行窗體的Form_Click事件過程19窗體上有名稱為Command1的命令按鈕和名稱為Text1的文本框Private Sub Command1_Click()Text1

10、.Text=程序設(shè)計Text1.SetFocusEnd SubPrivate Sub Text1_GotFocus()Text1.Text=等級考試End Sub運行以上程序，單擊命令按鈕后A文本框中顯示的是“程序設(shè)計，且焦點在文本框中B文本框中顯示的是“等級考試，且焦點在文本框中C文本框中顯示的是“程序設(shè)計，且焦點在命令按鈕上D文本框中顯示的是“等級考試，且焦點在命令按鈕上    20設(shè)窗體上有名稱為Option1的單項選擇按鈕，且程序中有語句：If Options.Value=True Then下面語句中與該語句不等價的是AIf Option.Value Th

11、enBIf Option1=True ThenCIf Value=True ThenDIf Option1 Then21設(shè)窗體上有1個水平滾動條，已經(jīng)通過屬性窗口把它的Max屬性設(shè)置為1，Min屬性設(shè)置為100。下面表達正確的選項是A程序運行時，假設(shè)使?jié)L動塊向左移動，滾動條的Value屬性值就增加B程序運行時，假設(shè)使?jié)L動塊向左移動，滾動條的Value屬性值就減少C由于滾動條的Max屬性值下于Min屬性值，程序會出錯D由于滾動條的Max屬性值下于Min屬性值，程序運行時滾動條的長度會縮為一點，滾動塊無法移動22有如下過程代碼：Sub var_dim()Static numa As Integer

12、Dim numb As Integernuma=numa+2numb=numb+1print numa;numbEnd Sub連續(xù)3次調(diào)用var_dim過程，第3次調(diào)用時的輸出是A2 1B2 3C6 1D6 323在窗體上畫1個命令按鈕，并編寫如下事件過程：Private Sub Command1_Click()For i=5 to 1 step -0.8Print Int(i);Next iEnd Sub運行程序，單擊命令按鈕，窗體上顯示的內(nèi)容為A5 4 3 2 1 1B5 4 3 2 1C4 3 2 1 1D4 4 3 2 1 1   24在窗體上畫1個命令按鈕，并編寫

13、如下事件過程：Private Sub Command1_Click()Dim a(3,3)For m=1 To 3For n=1 To 3If n=m Or n=4-m Thena(m,n)=0End IfPrint a(m,n);Next nPrintNext mEnd Sub運行程序，單擊命令按鈕，窗體上顯示的內(nèi)容為A2 0 00 4 00 0 6B2 0 40 4 04 0 6C2 3 03 4 00 0 6D2 0 00 4 50 5 625設(shè)有以下函數(shù)過程Function fun(a As Integer,b As Integer)Dim c As IntegerIf a<b

14、Thenc=a:a=b:b=cEnd Ifc=0Doc=c+aLoop Until c Mod b=0fun=cEnd function假設(shè)調(diào)用函數(shù)fun時的實際參數(shù)都是自然數(shù)，那么函數(shù)返回的是Aa、b的最大公約數(shù)Ba、b的最小公倍數(shù)Ca除以b的余數(shù)Da除以b的商的整數(shù)局部   26窗體上有1個名稱為Text1的文本框；1個名為Timer1的計時器控件，其Interval屬性值為5000，Enable屬性值是True。Timer1的事件過程如下：Private Sub Timer1_Timer()Static flag As IntegerIf flag=0 Then fl

15、ag=1flag=-flagIf flag=1 ThenText1.ForeColor=&HFF&   &HFF&為紅色ElseText1.ForeColor=&HC000& &HC000&為綠色End IfEnd Sub以下表達正確的選項是A每次執(zhí)行些事件過程時，flag的初始值為0Bflag的值只可能取0或1C程序執(zhí)行后，文本框的文字每5秒改變一次顏色D程序有邏輯錯誤，Else分支總也不能被執(zhí)行27為計算1+2+22+23+24+210的值，并把結(jié)果顯示在文本框Text1中，假設(shè)編寫如下

16、事件過程：Private Sub Command1_Click()Dim a%,s%,k%s=1a=2For k=2 To 10a=a*2s=s+aNext kText1.Text=sEnd Sub執(zhí)行此事件過程后發(fā)現(xiàn)結(jié)果是錯誤的，為能夠得到正確結(jié)果，應(yīng)做的修改是A把s=1改為s=0B把For k=2 To 10改為For k=1 To 10C交換語句s=s+a和a=a*2的順序D同時進行B、C兩種修改   28標準模塊中有如下程序代碼：Public x As Integer,y As IntegerSub var_pub()x=10:y=20End Sub在窗體上有1個命

17、令按鈕，并有如下事件過程：Private Sub Command1_Click()Dim x As IntegerCall var_pubx=x+100y=y+100Print x;yEnd Sub運行程序后單擊命令按鈕，窗體上顯示的是A100 100B100 120C110 100D110 12029設(shè)a、b都是自然數(shù)，為求a除以b的余數(shù)，某人編寫了以下函數(shù)：Function fun(a As Integer,b As Integer)While a>ba=a-bWendfun=aEnd Function在調(diào)試時發(fā)現(xiàn)函數(shù)是錯誤的。為使函數(shù)能產(chǎn)生正確的返回值，應(yīng)做的修改是A把a=a-b改

18、為a=b-aB把a=a-b改為a=abC把While a>b改為While a<bD把While a>b改為While a>=b   30以下關(guān)于通用對話框CommonDialog1的表達中，錯誤的選項是A只要在“翻開對話框中選擇了文件，并單擊“翻開按鈕，就可以將選中的文件翻開B使用CommonDialog1.ShowColor方法，可以顯示“顏色對話框CCancelError屬性用于控制用戶單擊“取消按鈕關(guān)閉對話框時，是否顯示出錯誤警告D在顯示“字體對話框前，必須先設(shè)置CommonDialog1的flags屬性，否那么會出錯31在利用菜單編輯器設(shè)計

19、菜單時，為了把組合鍵“Alt+X設(shè)置為“退出X菜單項的訪問鍵，可以將該菜單項的標題設(shè)置為A退出(X&)B退出(&X)C退出(X#)D退出(#X)32在窗體上畫1個命令按鈕和1個文本框，其名稱分別為Command1和Text1，再編寫如下程序：Dim ss As StringPrivate Sub Text1_KeyPress(KeyAscii As integer)If chr(KeyAscii)<>Then ss=ss+chr(KeyAscii)End SubPrivate Sub Command1_Click()Dim m As String,i As Inte

20、gerFor i=Len(ss) To 1 step -1m=m+Mid(ss,i,1)NextText1.Text=Ucase(m)End Sub程序運行后，在文本框中輸入“Number100”，并單擊命令按鈕，那么文本框中顯示的是ANUMBER 100BREBMUNCREBMUN 100D001 REBMUN  33窗體的左右兩端各有1條直線，名稱分別為Line1、Line2；名稱為Shape1的圓靠在左邊的Line1直線上見圖；另有1個名稱為Timer1的計時器控件，其Enable屬性值是True。要求程序運行后，圓每秒向右移動100，當(dāng)圓遇到Line2時那么停止移動。為實現(xiàn)上

21、述功能，某人把計時器的Interval屬性設(shè)置為1000，并編寫了如下程序：Private Sub Timer1_Timer()For k=Line1.X1 To Line2.X1 Step 100If Shape1.Left+Shape1.Width<Line2.X1 ThenShape1.Left=Shape1.Left+100End IfNext kEnd Sub運行程序時發(fā)現(xiàn)圓立即移動到了右邊的直線處，與題目要求的移動方式不符。為得到與題目要求相符的結(jié)果，下面修改方案中正確的選項是A把設(shè)計器的Interval屬性設(shè)置為1B把For k=Line1.X1 To Line2.X1 S

22、tep 100和Next k兩行刪除C把For k=Line1.X1 To Line2.X1 Step 100改為For k=Line2.X1 To Line1.X1 Step 100D把If Shape1.Left+Shape1.Width<Line2.X1 Then改為If Shape1.Left <Line2.X1 Then34以下有關(guān)文件的表達中，正確的選項是A以O(shè)utput方式翻開一個不存在的文件時，系統(tǒng)將顯示出錯信息B以Append方式翻開的文件，既可以進行讀操作，也可以進行寫操作C在隨機文件中，每個記錄的長度是固定的D無論是順序文件還是隨機文件，其翻開的語句和翻開方式

23、都是完全相同的   35窗體如圖1所示。要求程序運行時，在文本框Text1中輸入一個姓氏，單擊“刪除按鈕名稱為Command1，那么可刪除列表框List1中所有該姓氏的工程。假設(shè)編寫以下程序來實現(xiàn)此功能： 二、填空題每空2分，共30分1某二叉樹有5個度為2的結(jié)點以及3個度為1的結(jié)點為，那么該二叉樹共有 【1】 個結(jié)點。2程序流程圖中的菱形框表示的是 【2】 。3軟件開發(fā)過程主要分為需求分析、設(shè)計、編碼與測試四個階段，其中 【3】 階段產(chǎn)生“軟件需求規(guī)格說明書。4在數(shù)據(jù)庫技術(shù)中，實體集之間的聯(lián)系可以是一對一或一對多或多對多的，那么“學(xué)生和“可選課程的聯(lián)系為 【4】

24、。5人員根本信息一般包括：身份證號，姓名，性別，年齡等。其中可以作為主關(guān)鍵字的是 【5】 。6工程中有Form1、Form2兩個窗體。Form1窗體外觀如圖1所示。程序運行時，在Form1中名稱為Text1的文本框中輸入一個數(shù)值圓的半徑，然后單擊命令按鈕“計算并顯示其名稱為Command1，那么顯示Form2窗體，且根據(jù)輸入的圓的半徑計算圓的面積，并在Form2的窗體上顯示出來，如圖2所示。如果單擊命令按鈕時，文本框中輸入的不是數(shù)值，那么用信息框顯示“請輸入數(shù)值數(shù)據(jù)！請?zhí)羁?。Private Sub Command1_Click()If Text1.Text= ThenMsgBox “請輸入半徑

25、！Else If Not IsNumeric( 【6】 ) ThenMsgBox “請輸入數(shù)值數(shù)據(jù)！    Elser=val( 【7】 )Form2.show 【8】 .Print “圓的面積是&3.14*r*rEnd IfEnd Sub    7設(shè)有整形變量s，取值范圍為0100，表示學(xué)生的成績。有如下程序段：If s>=90 ThenLevel=AElse If s>=75 ThenLevel=BElse If s>=60 ThenLevel=BElseLevel=DEnd If下面用SelectCas

26、e結(jié)構(gòu)改寫上述程序，使兩段程序所實現(xiàn)的功能完全相同。請?zhí)羁?。Select Case sCase  【9】 >=90Level=ACase 75 To 89Level=BCase 60 To 74Level=BCase  【10】Level=D 【11】   8窗體上有名稱為Command1的命令按鈕。事件過程及2個函數(shù)過程如下：Private Sub Command1_Click()Dim x As Integer,y As Integer,zx=3y=5z=fy(y)print fx(fx(x),yEnd Sub Function fx(ByBa

27、l a As Integer)a=a+afx=aEnd FunctionFunction fy(ByRef a As Integer)a=a+afy=aEnd Function運行程序，并單擊命令按鈕，那么窗體上顯示的2個值依次是 【12】 和 【13】 。9窗體上有名稱為Command1的命令按鈕及名稱為Text1、能顯示多行文本的文本框。程序運行后，如果單擊命令按鈕，那么可翻開磁盤文件c:test.txt，并將文件中的內(nèi)容多行文本顯示在文本框中。下面是實現(xiàn)此功能的程序，請?zhí)羁?。Private Sub Command1_Click()Text1=Number=FreeFileOpen “c:

28、test.txtFor Input As NumberDo While Not Eof( 【14】 )Line Input #Number,sText1.Text=Text1.Text+ 【15】 +Chr(13)+Chr(10)LoopClose NumberEnd Sub 2021年9月全國計算機等級考試二級VB筆試參考答案一、選擇題1234567891011C12D13A14C15D16D17A18C19B20C21A22C23A24B25D26C27D28B29D30A31B32D33B34C35A二、填空題 6 Form2 7IS ELSE END Select&

29、#160;812 10 9Number2021年9月全國計算機等級考試二級筆試試題Visual Basic 語言程序設(shè)計一、          選擇題每題2分，共70分下面各題A、B)、C)、D)四個選項中，只有一個選項是正確的。請將正確選項填涂在答題卡相應(yīng)位置上。答在試卷上不得分。(1)以下數(shù)據(jù)結(jié)構(gòu)中，屬于非線性結(jié)構(gòu)的是A)循環(huán)隊列B)帶鏈隊列C)二叉樹D)帶鏈 (2)以下數(shù)據(jù)結(jié)構(gòu)中，能夠按照“先進先出原那么存取數(shù)據(jù)的是：A)循環(huán)隊B)C)隊列D) 二叉樹 (3)對于循環(huán)隊

30、列，以下表達中正確的選項是A)隊頭指針是固定不變的B)隊頭指針是一定大于隊尾指針C)隊頭指針一定小于隊尾指針D)隊頭指針可以大于隊尾指針，也可以小于隊尾指針 (4)算法的空間復(fù)雜度是指A)算法在執(zhí)行過程中所需要的計算機存儲空間B)算法所處理的數(shù)據(jù)量C)算法程序中的語句或指令條數(shù)D)隊頭指針可以大于隊尾指針，也可以小于隊尾指針 (5)軟件設(shè)計中劃分模塊一個準那么是A)低內(nèi)聚低耦合B) 高內(nèi)聚低耦合C) 低內(nèi)聚高耦合 D) 高內(nèi)聚高耦合 (6)以下選項中不屬于結(jié)構(gòu)化程序設(shè)計原那么的是A)可封裝B)自頂向下C)模塊化D)逐步求精 (7)軟件詳細設(shè)計產(chǎn)生的圖如下

31、：該圖是：A)N-S圖B)PAD圖C)程序流程圖D)E-R圖 (8)數(shù)據(jù)庫管理系統(tǒng)是A)操作系統(tǒng)的一局部B)在操作系統(tǒng)支撐下的系統(tǒng)軟件C)一種編譯系統(tǒng)D)一種操作系統(tǒng) (9)在E-R中，用來表示實體聯(lián)系的圖形是A)橢形圖B)矩形C)菱形D)三角形 (10)有三個關(guān)系R,S和T如下：其中關(guān)系T由關(guān)系R和S通過某種操作得到，該操作為A)選擇B)投影C)交D)并 11以下變量名中合法的是：A)x2-1       B)Print      C)Str_

32、n           D)2x12把數(shù)學(xué)表達式(5x+3)/(2y-6)表示為正確的VB表達式應(yīng)該是：A) (5x+3)/(2y-6)                      B)x*5+3/2*y-6C)(5*X+3)     

33、60;                     D)(X*5+3)/(y*2-6)(13)下面有關(guān)標準模塊的表達中，錯誤的選項是：A)標準模塊不完全由代碼組成，還可以有窗體。B)標準模塊中的Private過程中不能被工程中的其他模塊調(diào)用。D)標準模塊中的全局變量可以被工程中的任何模塊引用。 (14)下面控件中，沒有Caption 屬性的是A)復(fù)選框    B

34、單項選擇按鈕     C組合框    D框架 (15)用來設(shè)置文字字體是否斜體的屬性是：A)FonUnderline    B)FontBold   C)Fontslope  D)FontItalic (16)假設(shè)看到程序中有以下事件過程，那么可以肯定的是，當(dāng)程序運行時Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)&

35、#160;  Print "VB program"End SubA)     用鼠標左鍵單擊名稱為“Command1”的命令按鈕時，執(zhí)行此過程。B)      用鼠標左鍵單擊名稱為“MouseDown的命令按鈕時，執(zhí)行此過程。C)     用鼠標右鍵單擊名稱為“MouseDown的命令按鈕時，執(zhí)行此過程。D)     用鼠標左鍵或右鍵單擊名稱為“Click的控件時，執(zhí)行此過程。17可以產(chǎn)生30-5

36、0(含30和50)之間的隨機整數(shù)的表達式是A)Int (Rnd*21+30)                  B)Int(Rnd*20+30)C) Int(Rnd*50-Rnd*30)              D)Int(Rnd*20+50) (18)在程序運行時，下面的表達中正確的選

37、項是A)用鼠標右鍵單擊窗體中無控件的局部，會執(zhí)行窗體的Form_load事件過程。B)用鼠標左鍵單擊窗體的標題欄，會執(zhí)行窗體的Form_Click事件過程。C)只裝入而不顯示窗體，也會執(zhí)行窗體的Form_Load事件過程。D裝入窗體后，每次顯示該窗體時，都會執(zhí)行窗體的Form_Click事件過程。 (19)名稱為Command1的命令按鈕和名稱為Text1的文本框Private Sub Command1_Click()Text1.Text = "程序設(shè)計"Text1.Text = "程序設(shè)計"End Sub Private Sub T

38、ext1_GotFocus()Text1.Text = "等級考試"End Sub運行以上程序，單擊命令按鈕后：A)     文本框中顯示的是“程序設(shè)計，且焦點在文本框中。B)      文本框中顯示的是“等級考試，且焦點在文本框中。C)     文本框中顯示的是“程序設(shè)計，且焦點在命令按鈕上。D)     文本框中顯示的是“等級考試，且焦點在命令按鈕上。 (20)有名稱為Opiton1的單項選擇

39、按鈕，且程序中有語句：If Option1.Value=True then下面語句中與該語句不等價的是A) Option1.Vulue then       B)If Option1=True thenC)If Value=True then        D)If Option then (21)設(shè)窗體上有1個水平滾動條，已經(jīng)通過屬性窗口把它的Max屬性設(shè)置為1,Min屬性設(shè)置為100。下面表達中正確的選項是：A)程序運行時，假設(shè)使?jié)L動塊向左移動，滾動條

40、胡Value屬性值就增加。B)程序運行時，假設(shè)使?jié)L動塊向左移動，滾動條的Value屬性值就減少。C)由于滾動條的MAX屬性值小于Min屬性值，程序會出錯。D)由于滾動條的Max屬性值小于Min屬性值，程序運行時滾動條的長度會縮為滾動塊無法移動。 (22)有如下過程代碼連續(xù)3次調(diào)用var_dim過程，第3次調(diào)用時的輸出是：A) 2   1      B)2  3    C) 6   1      

41、D)  6   3 (23)在窗體上畫1個命令按鈕，并編寫如下事件過程：運行程序，單擊命令按鈕，窗體上顯示的內(nèi)容為：A) 5   3   1  1                   B)5  4  3  2  1 C)4  3  2  1  1&#

42、160;                 D)4  4  3  2  1  1 (24)在窗體上面?zhèn)€命令按鈕，并編寫如下事件過程：Private Sub Command1_Click()Dim a(3, 3)For m = 1 To 3    For n = 1 To 3    If n = m Or n = 4 -

43、m Then     a(m, n) = m + n    Else     a(m, n) = 0     End If     Print a(m, n);    Next n    Print  Next mEnd Sub運行程序單擊命令按鈕，窗體上顯示的內(nèi)容為：A)     2 

44、0  0       B)2  0  4       C)2  3  0    D) 2  0  00         4  0         0  4  0  

45、60;      3  4  0       0  4  50  0  6         4  0  6         0  0  6       0  5

46、  6 (25)設(shè)有以下函數(shù)過程：Function fun(a As Integer, b As Integer)     Dim c As Integer  If a < b Then    c = a: a = b: b = c    End If    c = 0    Do      c = c + a    Lo

47、op Until c Mod b = 0    fun = c End Function假設(shè)調(diào)用函數(shù)fun時的實際參數(shù)都是自然數(shù)，那么函數(shù)返回的是：A)a、b的最大公約數(shù)          B)a、b的最小公約數(shù)  C)a除以b的余數(shù)             D)  )a除以b 的商的整數(shù)局部 (26)窗體上有1個名稱

48、為text1文本框，1個名稱為Timer1的計時器控件，其Iterval屬性值為5000，Enabled屬性值是True。Timer1的事件過程如下：Private Sub Timer1_Timer()Static flag As Integer      If flag = 0 Then flag = 1      flag = -flag     If flag = 1 Then    Text1.ForeColor =

49、&HFF&         '&HFF&為紅色'  Else  Text1.ForeColor = &HC000&       '&HC000&為綠色'  End IfEnd Sub以下表達中正確的選項是A)     每次執(zhí)行此事件過程時，flag的初始值均為0B)  &#

50、160;   Flag的值只可能取0或1C)     程序執(zhí)行后，文本框中的文字每5秒改變一次顏色D)     程序有邏輯錯誤，Else分支總也不能被執(zhí)行 (27)為計算1+2+22+23+24+210的值，并把結(jié)果顯示在文本框text1中，假設(shè)編寫如下事件過程：Private Sub Command1_Click()Dim a%, s%, k%s = 1a = 2For k = 2 To 10a = a * 2s = s + aNext kText1.Text = sEnd Sub執(zhí)

51、行此事件過程中發(fā)現(xiàn)結(jié)果是錯誤的，為能夠得到正確結(jié)果，應(yīng)做的修改是：A) 把s=1 改為 s=0                  B)把For k=2 to 10 改為 For k=1 to 10C)交換語句 s=s+a和a=a*2的順序     D)同時進行B)、C)兩種修改 (28)標準模塊中有如下程序代碼：Public x As Integer, y As Integer

52、Sub var_pub()x = 10: y = 20End Sub在窗體上有1個命令按鈕，并有如下事件過程：Private Sub Command 1_Click()Call var_pubx = x + 100y = y + 100Print x, yEnd Sub運行程序后單擊命令按鈕，窗體上顯示的是：A)100  100     B)100 120  C)110  100    D)110  120(29)設(shè)a、b都是自然數(shù)，為求a除以b的余數(shù)，某人編寫了以下函數(shù)： 

53、  Funciton fun(a as Integer ,b as Integer )While a > b      a = a - b       Wend   fun = aEnd Function在調(diào)試時發(fā)現(xiàn)函數(shù)是錯誤的，為使函數(shù)能產(chǎn)生正確的返回值，應(yīng)做的修改是：A)把a=a-b改為a=b-a            B)把a=a-b改

54、為a=abC)把while a>b改為 while a<b     D) 把while a>b改為 while a>=b(30)以下關(guān)于通用對話框CommanDialog1的表達中，錯誤的選項是A)只要在“翻開對話框中選擇了文件，并單擊“翻開按鈕，就可以將選中的文件翻開。B)使用CommonDialog1.showcolor方法，可以顯示“顏色對話框。C)Cancelerror屬性用于控制用戶單擊“取消按鈕關(guān)閉對話框時，是否顯示出錯警告。D)在顯示“字體對話框前，必須先設(shè)置CommonDialog1.showcolor的Flags

55、屬性，否那么會出錯。(31)在利用菜單編輯器設(shè)計菜單時，為了把組合鍵Alt+X設(shè)置為退出X菜單項的訪問鍵，可以將該菜單項的標題設(shè)置為A)退出X& B)退出&X  C)退出X#   D)退出#X (32)在窗體上畫個命令按鈕和個文本框，其名稱分別為command1和text1，再編寫如下程序：Dim ss As StringPrivate Sub text1_keypress(keyascii As Integer) If Chr(keyascii) <> "" Then ss = ss + Chr

56、(keyascii)End SubPrivate Sub Command1_Click()   Dim m As String, i As Integer    For i = Len(ss) To 1 Step -1    m = m + Mid(ss, i, 1)    NextEnd Sub(33)窗體的左右兩端各有1條直線，名稱分別為Line1、Line2；名稱為shape的圓靠在左邊的Line1直線上見圖；另有1個名稱為Timer1的計時器控件，其Enabed屬性值

57、是True。要求程序運行后，圓每秒向右稱動100，當(dāng)圓遇到Line2時那么停此移動。為實現(xiàn)上述功能，某人把計時器的Interval屬性設(shè)置為1000，并編寫了如下程序：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 kEnd S

58、ub運行程序時發(fā)現(xiàn)圓立即移動了右邊的直線處，與題目要求的移動方式不符。為得到與題目要求相符的結(jié)果，下面修改方案中正確的選項是：A)     把計時器的Interval屬性設(shè)置為1B)      把For K=Line1.X1 To Line2.X1 Step 100和Next 兩行刪除C)     把For K=Line1.X1 To Line2.X1 Step 100改為For K=Line2.X1 To Line1.X1 Step 100D) 

59、0;   把 If shape1.left+shape1.width<line2.x1 then  改為if shape1.left<line2.x1 then(34)以下有關(guān)文件的表達中，正確的選項是：A)以O(shè)utput方式翻開一個不存在的文件時，系統(tǒng)將顯示出錯信息B) 以Append方式翻開的文件，既可以進行讀操作，也可以進行寫操作C)在隨機文件中，每個記錄的長度是固定的。D)無論是順序文件還是隨機文件，其翻開的語句和翻開方式都是完全相同的。 (35)窗體如圖1所示，要求程序運行時，在文本框text1中輸入一個姓氏，單擊“刪除“按鈕名稱為

60、command1，那么可刪除列表框中l(wèi)ist1中所有該姓氏的工程，假設(shè)編寫以下程序來實現(xiàn)此功能：Private Sub Command1_Click()Dim n%, k%n = Len(Text1.Text)For k = 0 To List1.ListCount - 1 If Left(List1.List(k), n) = Text1.Text Then List1.RemoveItem k End If Next kEnd SubA)     For k=list1.listcount-1 to 0 ste

61、p -1二、填空題(每空2分,共30分)請將每一個空的正確答案寫在答題卡【1】【15】序號的橫線上，答在試卷上不得分。 (1)某二叉樹有5個度為2的結(jié)點以及3個度為1的結(jié)點，那么該二叉樹中共有  【1】  個結(jié)點。 (2)程序流程圖中的菱形框表示的是  【2】  。 (3)軟件開發(fā)過程主要分為需求分析、設(shè)計、編碼與測試四個階段，其中  【3】  階段產(chǎn)生“軟件需求規(guī)格說明書。4在數(shù)據(jù)庫技術(shù)中，實體集之間的聯(lián)系可以是一對一或一對多或多對多的，那么“學(xué)生和“可選課程的聯(lián)系為  【4】  。5人員根本信息一般包括：身份證號，姓名，性別，年齡等。其中可以作為主關(guān)鍵字的是  【5】  。 (6)工程中有Form1、Form2兩個窗體，F(xiàn)orm1窗體外觀如圖1所示，程序運行時在form1中名稱為text1的文本框中輸入一個值圓的半徑，然后單擊命令按鈕“計算并顯示其名稱為command1，那么顯示form2窗體，且根據(jù)輸入的圓的半徑計算圓的面積，并在Form2的窗體上顯示出來，如圖2所示，如果