家二級（VB）機試模擬試卷7（共9

套）

（共393題）

家二級（VB）機試模擬試卷第1套

一、選擇題（本題共40題，每題1.0分，共40分。）

1、下列敘述中正確的是（）。

A、循環隊列有隊頭和隊尾兩個指針，因此，循環隊列是非線性結構

B、在循環隊列中，只需要隊頭指針就能反映隊列中元素的動態變化情況

C、在循環隊列中，只需要隊尾指針就能反映隊列中元素的動態變化情況

D、循環隊列中元素的個數是由隊頭指針和隊尾指針共同決定

標準答案：D

知識點解析：循環隊列有隊頭和隊尾兩個指針，但是循環隊列仍是線性結構的，所

以A錯誤；在循環隊列中只需要隊頭指針與隊尾兩個指針來共同反映隊列中元素

的動態變化情況，所以B與C錯誤。

2、一個棧的初始狀態為空。現將元素1、2、3、4、5、A、B、C、D、E依次入

棧，然后再依次出棧，則元素出棧的順序是（）.

A、12345ABCDE

B、EDCBA54321

C、ABCDE12345

D、54321EDCBA

標準答案：B

知識點解析：棧是先進后出的原則組織數據，所以入棧最早的最后出棧，所以選擇

Bo

3、某二又樹有5個度為2的結點，則該二叉樹中的葉子結點數是（）o

A、10

B、8

C、6

D、4

標準答案：C

知識點解析：根據二叉樹的基本性質3：在任意一棵二叉樹中，度為0的葉子節點

總是比度為2的節點多一個，所以本題中是5+1=6個。

4、下列排序方法中，最壞情況下比較次數最少的是（）o

A、冒泡排序

B、簡單選擇排序

C、直接插入排序

D、堆排序

標準答案：D

知識點解析：冒泡排序與簡單插入排序與簡單選擇排序法在最壞情況下均需要比較

n（n-l）/2次，而堆排序在最壞情況下需要比較的次數是nlog2no

5、軟件設計中劃分模塊的一個準則是（）o

A、低內聚低耦合

B、高內聚低耦合

C、低內聚高耦合

D、內聚圖耦合

標準答案：B

知識點解析：一般較優秀的軟件設計，應盡量做到高內聚，低耦合，即減弱模塊之

間的耦合性和提高模塊內的內聚性，有利于提高模塊的獨立性。

6、下列選項中不屬于結構化程序設計原則的是（）。

A、可封裝

B、自頂向下

C、模塊化

D、逐步求精

標準答案：A

知識點解析：結構化程序設計的思想包括：自頂向下、逐步求精、模塊化、限制使

用goto語句，所以選擇A。

7、下列關于棧的敘述正確的是（）o

A、棧按“先進先出”組織數據

B、棧按“先進后出”組織數據

C、只能在棧底插入數據

D、不能刪除數據

標準答案：B

知識點解析：棧是按“先進后出”的原則組織數據的，數據的插入和刪除都在棧頂進

行操作。

8、在數據庫設計中，將E—R圖轉換成關系數據模型的過程屬于（）。

A、需求分析階段

B、概念設計階段

C、邏輯設計階段

D、物理設計階段

標準答案：C

知識點解析：E-R圖轉換成關系模型數據則是把圖形分析出來的聯系反映到數據

庫中，即設計出表，所以屬于輯設計階段。

9、在數據管理技術發展的三個階段中，數據共享最好的是（）0

A、人工管理階段

B、文件系統階段

C、數據庫系統階段

D、三個階段相同

標準答案：C

知識點解析：數據管理發展至今已經歷了三個階段：人工管理階段、文件系統階段

和數據庫系統階段。其中最后一個階段結構簡單，使用方便邏輯性強物理性少，在

各方面的表現都最好，一直占據數據庫領域的主導地位，所以選擇C。

10、有三個關系R、S和T如下：由關系R和S通過運算得到關系T,則所使用的

D、自然連接

標準答案：D

知識點解析：自然連接是一種特殊的等值連接，它要求兩個關系中進行比較的分量

必須是相同的屬性組，并且在結果中把重復的屬性列去掉，所以根據T關系中的

有序組可知R與S進行的是自然連接操作。

11、下列敘述中正確的是（）。

A、MsgBox語句的返回值是一個整數

B、執行MsgBox語句并出現信息框后，不用關閉信息框即可執行其他操作

C、MsgBox語句的第一個參數不能省略

D、如果省略MsgBox語句的第三個參數（Title）,則信息框的標題為空

標準答案：C

知識點解析：Msgbox語句的功能：顯示消息提示框，在對話框中顯示提示消息，

等待用戶單擊按鈕，單擊不同的按鈕返回不同的整數。它有2種形式：①MsgBox

函數格式：變量=MsgBox（〈提示內容＞[,樣式][,標題]）,注意MsgBox函數帶括

號，有返回值。②MsgBox語句格式：MsgBox（＜提示內容＞[,樣式][,標題]）,有

無括號都可以，無返回值。故A選項錯誤。其中：第1個參數：提示內容是必需

的，不能省略。故C選項正確。第2個參數：可選。整型表達式，缺省值0,指

定信息框中按鈕數目、類型、圖標類型、缺省按鈕等。第3個參數：可選，如果

省略，則標題欄并不為空默認顯示它所屬的工程名。故D選項錯誤。執行

MsgBox語句時出現信息框后，必須關閉信息框才可執行其他操作。故B選項錯

誤。

12、語句Dima（—3To4,3To6）AsInteger定義的數組的元素個數是（）。

A、18

B、28

C、21

D、32

標準答案：D

知識點解析：本題定義的是一個整型的二維數組，一31。4指的是一3、一2、

1、0、1、2、3、4（共8行）,3To6指的是3、4、5、6（共4列），因此數組元素個數

是8x4=32,故選D。

13^設窗體文件中有下面的事件過程：PrivateSubCommandl_Click（）Dinis

a%=100PrintaEndSub其中變量a和s的數據類型分別是（）。

A、整型，整型

B、變體型，變體型

C、整型，變體型

D、變體型，整型

標準答案：C

知識點解析：變量s定義時沒有指明數據類型，默認為Variant變體型。變量a是

用整型的類型符號％聲明，并同時賦值100,所以變量a的數據類型為整型。故C

選項正確。

14、下面不能在信息框中輸出“VB”的是（）o

A、MsgBoxHVB"

B、x=MsgBox（"VB"）

C、MsgBox（nVB"）

D、CallMsgBox"VB"

標準答案：D

知識點解析：Msgbox的功能：顯示消息提示框，在對話框中顯示提示消息，等待

用戶單擊按鈕，單擊不同的按鈕返回不同的整數。MsgBox函數格式：變量=

MsgBox（〈提示內容樣式兒標題］）,注意MsgBox函數帶括號，有返回值：

MsgBox語句格式：MsgBox（v提示內容習，樣式］［,標題］）,有無括號都可以，無

返回值。選項D中用Call語句調用MsgBox函數，要符合Call語句的語法規則：

Call函數名（實參表），缺少括號，應該為CallMsgBox（”VB”），語法才正確。故D

選項不能輸出“VB”，會出錯。

15、現有語句：y=IIf（x>0,xMod3,0）設x=10,則y的值是（）。

A、0

B、1

C、3

D、語句有錯

標準答案：B

知識點解析：HF是條件函數，它的語法格式是：Hf（〈條件表達式,，〈表達式為

True時的取值,，〈表達式為False時的取值>）,本題中，x=10時，條件表達式

x>0的值為True,執行xMod3即10Mod3結果為1。故選B。

16、窗體上有一個菜單編輯器設計的菜單。運行程序，并在窗體上單擊鼠標右鍵,

則彈出一個快捷菜單，如圖所示。下列說法錯誤的是（）。

A、在設計“粘貼”菜單項時?，在菜單編輯器窗口中設置了“有效“屬性（有"才）

B、菜單中的橫線是在該菜單項的標題輸入框中輸入了一個”，（減號）字符

C、在設計“選中“菜單項時，在菜單編輯器窗口中設置了“復選“屬性（有"才）

D、在設計該彈出菜單的主菜單項時，在菜單編輯器窗口中去掉了“可見”前面的7”

標準答案：A

知識點解析：快捷菜單中的“粘貼”菜單項為無效時.，在菜單編輯器窗口中“有效”屬

性應該是不選中狀態，沒有”州，故A選項錯誤。

17、假定有以下循環結閡：DoUntil條件表達式循環體Loop則以下正確

的描述是（）o

A、如果”條件表達式”的值是0,則一次循環體也不執行

B、如果”條件表達式”的值不為0,則至少執行一次循環體

C、不論”條件表達式”的值是否為“真”，至少要執行一次循環體

D、如果”條件表達式”的值恒為0,則無限次執行循環體

標準答案：D

知識點解析：本題的DoUntiL..Loop循環結構是先判斷，再執行的結構。Do

Unlil循環語句執行的過程是，先判斷條件表達式的值，如果條件表達式的值為0

或False時，即條件不成立時，則執行循環體，否則當條件表達式的值為非0或

True時，即成立，則退出DO...Loop循環。本題中，選項A條件表達式的值是

0,說明條件不成立，執行循環體。故A錯誤。選項B條件表達式的值不為0,說

明條件成立，退出循環。故B錯誤。選項C中DoUntiL..Loop語句中條件表達式

的值為“假“時，才至少執行一次循環體，故C錯誤，選項D中條件表達式的值恒

為0,說明表達式總是不成立，所以可無限執行循環體，故D選項正確。

18、執行語句DimX,YAsInteger后（）。

A、X和Y均被定義為整型變量

B、X和Y均被定義為變體類型變量

C、X被定義為整型變量，Y被定義為變體類型變量

D、X被定義為變體類型變量，Y被定義為整型變量

標準答案：D

知識點解析：聲明變量時可以同時聲明多個變量，但要分別說明每個變量的數據類

型。如果定義變量時不說明數據類型，默認是Variam變體類型變量。本題中用

Dim同時定義了兩個變量X、Y,變量X沒說明數據類型，所以是Variant型變

量，Y是整型變量。故選D選項正確。

19、在程序運行時，下面的敘述中正確的是（）。

A、用鼠標右鍵單擊窗體中無控件的部分，會執行窗體的卜om】_Load事件過程

B、用鼠標左鍵單擊窗體的標題欄，會執行窗體的Form_Click事件過程

C、只裝入而不顯示窗體，也會執行窗體的Form_Load事件過程

D、裝入窗體后，每次顯示該窗體時，都會執行窗體的Form_Click事件過程

標準答案：C

知識點解析：如果窗體是活動的，那么在窗體上按下鼠標右鍵（尚未松手抬起），即

會觸發Form_MouscDown事件，松手抬起后，要先觸發Foim_MouscUp事件，然

后再觸發Form_Qick事件。如果窗體原先是非活動的，還會福發Form_GotFocus

事件，并且它最先發生。Form_Load事件是窗體顯示之前，加載時觸發，單擊窗體

時不觸發。故A選項錯誤。用鼠標左鍵單擊窗體標題欄時，不會執彳了Form_Click

事件過程。故B選項錯誤。裝入窗體后，每次顯示該窗體時或窗體成為活動窗體

時，都會執行From_Aclive窗體的激活事件。故D選項錯誤。

20、下列有關文件的敘述中，正確的是（）。

A、以Output方式打開一個不存在的文件時，系統將顯示出錯信息

B、以Append方式打開的文件，既可以進行讀操作，也可以進行寫操作

C、在隨機文件中，每個記錄的長度是固定的

D、無論是順序文件還是隨機文件，其打開的語句和打開方式都是完全相同的

標準答案：C

知識點解析：A選項錯誤原因：當以Output方式打開一個不存在的順序文件時，

Open語句會首先創建該文件，然后再打開它，系統不會出錯。B選項錯誤原因：

以Append方式打開文件后，可將內存中的數據追加到順序文件的尾部，可進行寫

操作，不能進行讀操作。D選項錯誤原因：VB中三種可訪問的文件有：順序文

件、隨機文件和二進制文件，不同文件打開的方式是不同的。C選項中隨機文件

中的每一行稱為一條記錄，每條記錄的長度相同，通過記錄號來定位和查找指定記

錄。故C選項正確。

21、VB中有3個鍵盤事件：KeyPress.KeyDown.KeyUp,若光標在Textl文本

框中，則每輸入一個字母（）。

A、這3個事件都會觸發

B、只觸發KeyPress事件

C、只角也發KeyDown、KeyUp事件

D、不觸發其中任何一個事件

標準答案：A

知識點解析：當用戶按下某鍵時觸發KeyDown和KeyPress事件，放開某鍵時觸發

KeyUp事件。故每輸入一個字符，這3個事件都會觸發。故A選項正確。

22、設窗體的名稱為Forml,標題為Win,則窗體的MouseDown事件過程的過程

名是（）o

A、Form1_MouseDown

B、Win_MouseDown

C、Form_MouseDown

D、MouscDown_borm1

標準答案：c

知識點球析：事件過程名格式是：控件名_事件過程名。Forml是窗體控件的名

稱，Win是窗體的標題，所以窗體的MouseDown事件過程名是：

Forml_MouseDown,故選A。

23、窗體上有一個名稱為HScrolll的滾動條，程序運行后，當單擊滾動條兩端的

箭頭時，立即在窗體上顯示滾動框的位置（即刻度值）。下面能夠實現上述操作的事

件過程是（）。

A、PrivateSubHScrolll_Change（）PrintHScroll1.ValueEndSub

B、PrivateSubHScrolll_Change（）PrintHScroll1.SmallChangeEndSub

C、PrivateSubHScrolll_Scroll（）PrintHScrolll.ValueEndSub

D、PrivateSubHScrolll_Scroll（）PrintHScrollI.SmallChangeEndSub

標準答案：A

知識點解析：根據題意可知，用戶的操作是單擊滾動條兩端的箭頭，故觸發的是滾

動條的Change事件；在窗體上顯示的是滾動框的位置，即滾動條的當前刻度值，

Value屬性值可返回這個值，綜合一下，故A選項正確。

24、若已把一個命令按鈕的Default屬性設置為True,則下面可導致按鈕的Click

事件過程被調用的操作是（）。

A、用鼠標右鍵單擊此按鈕

B、按鍵盤上的Esc鍵

C、按鍵盤上的回車鍵

D、用鼠標右鍵雙擊此按鈕

標準答案：C

知識點解析：當命令按紐的Default屬性值為True時，程序運行，按回車鍵和單擊

該命令按鈕一樣都會觸發按鈕的Click事件；當命令按鈕的Cancel屬性值為True

時，程序運行，按Esc鍵和單擊該命令按鈕都會觸發按鈕的Click事件。故選C。

25、假定通過復制、粘貼操作建立了一個命令按鈕數組Commandl,以下說法中錯

誤的是（）o

A、數組中每個命令按鈕的名稱（Name屬性）均為Command1

B、若未做修改，數組中每個命令按鈕的大小都一樣

C、數組中各個命令按鈕使用同一個Click事件過程

D、數組中每個命令按鈕的Index屬性值都相同

標準答案：D

知識點解析：命令按鈕控件數組中各控件用相同的名稱和同一Click事件過程，大

小也一樣，但是為了區分它們，各控件的Index屬性值是不同的。故D選項錯誤。

26、以下關于菜單的敘述中，錯誤的是（）。

A、當窗體為活動窗體時，用Clrl+E鍵可以打開菜單編輯器

B、把菜單項的Enabled屈性設置為False,則可刪除該菜單項

C、彈出式菜單在菜單編輯器中設計

D、程序運行時，利用控件數組可以實現菜單項的增加或減少

標準答案：B

知識點解析：當菜單項的Enabed屬性值設置為Fake時，菜單項只是變為無效

項，不可用，不會刪除該菜單項。故B選項錯誤。

27、下面哪個屬性肯定不是框架控件的屬性（）。

A、Text

B、Caption

C、Left

D、Enabled

標準答案：A

知識點解析：框架沒有Text屬性。故選A。

28、窗體上有一個名稱為Optionl的單選按鈕數組，程序運行時，當單擊某個單選

按鈕時，會調用下面的事件過程：PrivateSubOptionl_Click（IndexAs

Integer）...EndSub下面關于此過程的參數Index的敘述中正確的是（）。

A、Index為I表示單選按鈕被選中，為0表示未選中

B、Index的值可正可負

C>Index的值用來區分哪個單選按鈕被選中

D、Index表示數組中單選按鈕的數量

標準答案：C

知識點解析：Index參數值返回的是單選按鈕數組中各單選按鈕的索引值，用它來

區分各單選按鈕。故A、D選項錯誤，C選項正確；Index的值只能是非負數，故

B選項錯誤。

29、要想使列表框只允許單選列表項，應設置的屬性為（）。

A、Style

Selected

C、MultiSelect

D、Enabled

標準答案：C

知識點解析：列表框的Style屬性是設胃列表框的外形；Selected屬性在程序運行

中設置或返回列表項的選中狀態；Enabled屬性設置列表框可用不可用；

MultSelect用來設置選搽列表項的方式。。為默認，只允許單選列表項；1為復選，

可同時選中一個或多個列表項，但要一個一個選中；2也為復選，可一個一個選中

列表項，也可連續選中。故選C。

30、在窗體上畫一個名稱為Textl的文本框和一個名稱為Commandl的命令按鈕，

然后編寫如卜事件過程：PrivateSubCommandl_Click()DimiAsInteger,n

AsIntegerFori=0To50i=i+3n=n+1Ifi>10

IhenExitborNextlextl.lcxt=Str(n)EndSub程序運行后，單擊命令按

鈕，在文本框中顯示的值是()o

A、2

B、3

C、4

D、5

標準答案：B

知識點解析：程序中For循環的結束有兩種情況，一種是循環完指定的次數，一種

是達到一定的條件后直接退出循環。由于在循環體中循環變量i的值被修改：i=i

十3,囚此，每次循環開始時i的取值為0,4,8,i為8時執行i—i十3—11,n-n+l

=3,這時i的值大于10,退出For循環，因此For循環執行了3次，即n的值為

3。所以在文本框中會顯示3。

31、窗體上有一個名稱為Textl的文本框，一個名稱為CDI的通用對話框，一個

標題為“打開文件”的命令按鈕，如圖所示。

命令按鈕的單擊事件過程如下:Private

SubCommandI_Click()CDI.ShowOpenOpenCDl.FileNameForInputAs#l

MsgBoxCDLFileNameLineInput#1,sTextl.Text=sClose#1EndSub

單擊命令按鈕，執行以上事件過程，打開選定的文件，讀取文件的內容并顯示在文

本框中.以下敘述中正確的是()o

A、程序沒有錯誤，可以正確完成打開文件、讀取文件中內容的操作

B、執行Open命令時出錯，因為沒有指定文件的路徑

C、Open語句是錯誤的.應把語句中的ForInput改為ForOulput

D、LineInput命令格式錯

標準答案；A

知識點解析：第1條語句中用ShowOpen方法顯示“打開”對話框后，在對話框中選

中文件，單擊“打開”按鈕后,CDLFileName屬性就會返回打開文件的路徑,所以

用Open語句打開文件時，就可用CDLFileName指定打開文件的路徑，故B選項

說法錯誤。因為第4條語句中要用LineI叩ut從文件讀取數據，故用Open語句打

開文件時用Inpul模式打開是正確的，故C選項說法錯誤。LineInpu【命令格式

為：LineInput#文件號，變量名，題中LineInput語句格式正確。版D選項錯誤。

本題程序無錯誤，能實現所說功能，故A選項正確。

32、窗體上有一個如右圖所示的圖形控件，控件中顯示了如圖所示的文字，可以判

-inixi

JTOWrKW?

斷這個圖形控件()0------------------------------

A、是圖像框(Image)

B、是圖片框(PictureBox)

C、是形狀控件

D、不是上述3種控件中的一種

標準答案：B

知識點解析：圖片框是“容器”控件，可以作為父控件，而圖像框不能。圖片框可以

通過Print方法接收文本，并可接收由像素組成的圖形，而圖像框不能接收PriM方

法輸入的信息，也不能用繪圖方法在圖像框上繪制圖形。而形狀控件3D效果的樣

式，根據題目圖示顯然不是形狀控件。因此這個圖形控件是圖片框。

33、窗體上有一個由兩個文本框組成的控件數組，名稱為Tex”,并有如下事件過

程：PrivateSubText1_Change(IndexAsInteger)SelectCaseIndex

Case0Text1(1).FonlSize=Text1(O).FontSize*2

Textl(l).Text=Textl(O),TextCase1Textl(0).FontSize=

Textl(l).FontSize/2Text1(O).Text=Text1(1).TextCaseElse

MsgBox"執行Else分支"EndSelectEndSub關于上述程序，以下敘述中錯誤

的是()。

A、Index用于標識數組元素

B、本程序中CaseElse分支的語句永遠不會被執行

C、向任何一個文本框輸入字符，都會在另一個文本框中顯示該字符

D、下標為。的文本框中顯示的字符尺寸將越來越小

標準答案：D

知識點解析：控件數組的Index屬性作為控件數組的下標，用于標識數組元素，題

目中程序功能是當任一個文本框內容改變時設置第2個文本框的字號是第1個文本

框字號的2倍，同時兩個文本框顯示相同文字。假如用戶沒有使用控件數組的

Index屬性的默認值程序將執行到Else分支。

34>設有如下程序：OptionBase1Dima(3,4)AsInteger,b(4,3)AsInteger

PrivateSubCommandl_Click()，循環1Fori=1To3Forj=1To4

b(j,i)=a(i,j)NextjNexti，循環2x=b(l,1)Fori=lTo

4Forj=lTo3Printb(i,j)；Ifx

A、窗體模塊中，不能使用Dim聲明a、b數組

B、循環1可以正常運行

C、循環2中循環變量i、j的終值不對，所以不能正常運行

D、程序可以正常運行，x中保存的是數組b中所有元素中最小的數

標準答案：B

知識點解析：Dim用于在標準模塊、窗體模塊或過程中定義變量或數組。程序可以

正常運行，x中保存的是數組b元素中的最大值。

35、某人編寫了如下程序，用來求10個整數(整數從鍵盤輸入)中的最大值：

EnvatcSubCommandl_Click()Dima(10)AsInteger,maxAsIntegerFork

=1To10a(k)=InputBox("輸入一個整數Nextkmax=0

Fork=1To10Ifa(k)>maxThenmax=a(k)EndIf

NextkPrimmaxEndSub運行程序時發現，當輸入10個正數時,可以得到正

確結果，但輸入10個負數時結果是錯誤的，程序需要修改。下面的修改中可以得

到正確運行結果的是()。

把Ifa(k)>maxThen改為Ifa(k)

B、把max=a(k)改為a(k)=max

C、把第2個循環語句Fork=1To10改為Fork=2To10

D、把max—0改為max—a(10)

標準答案：D

知識點解析：程序中把變量max的初始值設置為0,沒有考慮到負數的情況。應該

把它的初始值設置為數組中的一個元素的值，然后讓數組中的各個元素與這個值比

較，如果比它大，就替生變量max的值，這樣才能得到數組中的最大值。因此要

修改max=0這一行。

36、已知在4行3列的全局數組score(4,3)中存放了4個學生3門課程的考試成績

(均為整數)。現需要計算每個學生的總分，某人編寫程序如下：OplionBasel

PrivateSubCommand1_Click()DimsumAsIntegersnm=0Fori=1To

4Forj=1To3sum=sum+score(i,j)Nextj

Print"第“&i&”個學生的總分是："；sumNextiEndSub運行此程序時發

現，除第1個人的總分計算正確外，其他人的總分都是錯誤的，程序需要修改。以

下修改方案中正確的是()o

A、把外層循環語句Fori=1To4改為Fori=1To3內層循環語句Forj=1To3改

為Forj=1To4

B、把sum=0移到Fori=lTo4和Forj=1To3之間

C^把sum=sum+score。，j)改為sum=sum+score(j,i)

D^把sum=sum+score(i,j)改為sum=score(i,j)

標準答案：B

知識點解析：程序變量sum的值在開始計算第2個學生的總成績時，仍保留著第

一個學生的總成績，這樣會把前面學生的總成績計算進去，顯然不對。因此，sum

=0這一句應該放在第1層For循環體的第一句，BlFori=1to4和forj=lto3之

間。

37、某人編寫了下面的程序：PrivateSubCommandl_Click()DimaAs

Integer,bAsIntegera=InputBox("請輸入整數")b=InputBox("請輸入整

數“)proaprobCallpro(a+b)EndSubPrivateSubpro(nAsInteger)

While(n>0)PrintnMod10；n=n\I0WendPrintEnd

Sub此程序功能是：輸入2個正整數，反序輸出這2個數的每一位數字，再反序輸

出這2個數之和的每一位數字。例如：若輸入123和234,則應該輸出：32

1432753但調試時發現只輸出了前2行(即2個數的反序)，而未

輸出第3行(即2個數之和的反序)，程序需要修改。下面的修改方案中正確的是

()。

A、把過程pro的形式參數nAsInteger改為ByVainAsInteger

B、把Callpro(a+b)改為proa+b

C、把n=n\10改為n=n/10

D、在prob語句之后增加語句c%=a+b,再把Callpro(a+b)改為proc

標準答案：A

知識點解析：在過程定義中過程的形式參數定義時如果沒有ByVai指明參數的傳

遞方式，那么默認為地址傳遞，這樣過程中對形參的改變將影響到實參的值。本程

序中過程定義語句PrivateSubpro(nAsInteger)說明形參n為按地址傳遞的，而在

過程內語句n=n\10改變了形參的值，因此，a、b的值就不再是最初輸入的值了，

表達式a+b就不是期望的兩個輸入數的和。因此得不到正確結果。只要把Private

Subpro(nAsInteger)改為PrivateSubpro(ByValnAsInteger),程序即可得到正確結

果，因此A選項正確。

38、在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下事件過程：

PrivateSubCommandl_Click()c=1234cl=Trim(Str(c))Fori=1To4Print

NextEndSub程序運行后，單擊命令按鈕，要求在窗體上顯示如下內容：112123

1234則在橫線處應填入的內容為()。

A、Right(cl,i)

B、Lcft(cl,i)

C、Mid(cl,i,1)

D、Mid(cl,i,i)

標準答案：B

知識點解析：程序中使用Slr(c)將數值1234轉換成為一個字符串“1234”，又使用

Trim函數去除了字符串首尾可能存在的空格，保證了字符串中只有1、2、3、4這

4個字符。在For循環中從左邊遞次輸出這些字符就需要使用Leli()函數，Lefl是左

部截取函數，可以截取字符串左邊指定個數的字符串，以Left(cl,i)的形式即可

每次循環取出期望的字符串。因此答案為B。

39、命令按鈕Command1的單擊事件過程如下：PrivateSubCommandI_Click()

Dima(10,10)AsIntegerx=0Fori=1To3Forj=1To3

a(i,j)=i*2ModjIfx

A、1

B、2

C、3

D、4

標準答案：B

知識點解析：題目中定義了一個二維數組，為數組賦初值并找出這些值中最大的輸

出。數組中的值為：a(l,1)=1*2modl=0a(l,2)=1*2mod2=0a(l,3)=

l*2mod3=2a(2,1)=2*2mod1=0a(2,2)=2*2mod2=0a(2,3)=2*2mod3=1

a(3,1)=3*2modl=0a(3,2)=3*2mod2=0a(3,3)=3*2mod3=0顯然最大值

為2,因此Printx語句將在窗體上顯示2.

4。、設有如下Command1的單擊事件過程及tun過程：ErivatcSub

Commandl_Click()DimxAsIntegerx=Va1(InputBox("請輸入一個整數"))

fun(x)EndSubPrivateSubfun(xAsInteger)IfxMod2=0Thenfun(x/2)

Printx；EndSub執行上述程序，輸入6,結果是()。

A、36

B、63

C、6

D、程序死循環

標準答案：A

知識點解析：題目中fun過程是一個遞歸過程，它的結束條件是參數值為奇數。第

一次調用，參數值為6,是偶數所再次調用fun過程，這次參數為6/2=3,是奇

數，不再調用自身，接著執行下一句輸出參數值即3,然后返回第一次調用過程中

執行下一句輸出第一次調用參數值，即6。因此程序會輸出36。

二、基本操作題(本題共［題，每題1.0分，共I分。)

41、⑴在名稱為Forml的窗體上添加一個名稱為L1的標簽，標簽上標題為“請輸

入密碼“，添加一個名稱為Tex”的義本框，其寬、高分別為2000和300,設置適

當的屬性，使得在輸入密碼時，文本框中顯示為字符，此外再把窗體的標題設

置為“密碼窗口”，以上這些設置都必須在屬性窗口中進行，程序運行時的窗體如圖

所示。注意：存盤時必須存放在考生文件夾下，工程文件名保存為sjU.vbp,窗

在名稱為Forml的窗體上添加一個名稱為Pl的圖片框，請編寫適當的事件過程，

使得程序在運行時，每單擊一次圖片框。就在圖片框中輸出“單擊圖片框”，每單擊

圖片框外的窗體一次，就在窗體中輸出“單擊窗體”，運行時的窗體如圖所示。要求

在程序中不得使用變量，每個事件過程中只能寫一條語句。注意：存盤時必須存

放在考生文件夾下，工程文件名保存為sjl2.vbp,窗體文件名保存為Bjt2.frm。

標準答案：步驟1：新建一個窗體，按照要求建立控件并設比其屬性。如圖3.1

——E

r

-

■?

?0

-■

“:

-。0

-：■

、

?

I：

所示。程序中用到的控什及

1控件文本框標卷育體

屬性|、unwHeiglitPa^swordCharWidthNameCaption

請愉人密碼

設置值frxtl300■2000LI

wn

屬性如表3.7所示。

步驟2：調試并運行程序，效果如圖3.12所示。

圖3?12步驟3；關閉程序后按題目要求保存

工程和窗體文件。（2）步驟1：新建一個窗體，按照題目要求建立控件并設置其屬

性。如圖3.13所示。圖3.13步驟

2：打開代碼編輯窗口，在指定位置編寫如下代碼。PrivateSubFormClick（）

Forml.Print”單擊窗體"EndSubPrivateSubPlClick（）Pl.Print”單擊圖片框”End

Sub步驟3：調試并運行程序，關閉程序后按題目耍求存盤。

知識點解析：（1）通過標簽的Caption和Name屬性設置標題和名稱；通過文本框

Name、Height>PasswordCharo和Width屬性分別沒置文本框的名稱、高度、顯示

字符和寬度；通過窗體Caplion屬性設置窗體的標題“密碼窗口”。（2）通過圖片

框Name屬性設置圖片框的名稱，運用圖片框Prinl方法，使圖片框上顯示字符，

運用窗體：Print方法，使窗體上顯示字符。

三、簡單應用題（本題共I題，每題1.0分，共I分C）

42、（1）在考生文件央下有一個工程文件sjt3.vbp（相應的窗體義件名為

sjt3.frm）,在窗體上添加一個名稱為Listl的列表框和一個名稱為Textl的文本

框，如圖1所示。編寫窗體的MouseDown事件過程。程序運行后，如果用鼠標單

擊窗體，則從鍵盤上輸入要添加到列表框中的項目（內容任意，不少于三個）；如果

用鼠標右鍵單擊窗體，則從鍵盤上輸入要刪除的項口，將其從列表框中刪除。程序

的運行情況如圖2所示0這個程序不完整，請把它補充完整，并能正確運行。要

求：去掉程序中的汴釋符，把程序中的?改為適當的內容，使其正確運行，但不能

修改程序中的其他部分。最后將修改后的文件按原文件名存盤。

圖2

（2）在考牛文件夾下有一個工程文件爾4.vbp（相應的窗體文件名為sjl4.frm）,其

功能是通過調用過程FindMin求數組的最小值。程序運行后，在4個文本框中各輸

入一個整數，然后單擊命令按鈕，即可求出數組的最小值，并在窗體上顯示出來

（如圖所示）。要求：去掉程序中的注釋符，把程序中的?改為正確的內容，使其實

現上述功能，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存

標準答案：步驟1：打開奉題工程文件，按表3.18所列在窗體畫出控件并設置其

FormMouseDown（ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle）If

Button=lThenTextl.Text=InputBox（"晰入要?添加的項目”）

Listl.AddltemTextl.Text'將Textl中的內容加入列表EndIfIfButton=2Then

Textl.Text=InputBox（"清愉入安刪除的項目"）'列表總數用ListCount求得Fori=0

ToListl.ListCount.「判斷列表項是否為要刪除的項If

Listl.List(i)=Textl.TextThen'刪除i所時應的項Listl.RemovellemiEndIfNexti

EndIfEndSub程序結束步驟3：調試并運行程序，關閉程序后按題目要求存盤。

(2)步驟1：打開本題工程文件。步驟2：打開代碼編輯窗口，去掉程序中的汴釋符

“，”，將問號改為正確的內容。OptionBase1PrivateFunctionFindMin(a()As

Integer)DimStartAsIntegerDimFinishAsInteger,iAsIntegerStart=LBound(a)'隸

數組下界值Finish=UBound(a)'求數組上界值Min=a(Start)，將第一個數賦給最小值進

行比較Fori=StartToFinish'循環判斷找-最小值Ifa(i)<MinThenMin=a(i)Nexti

FindMin=MinEndFunctionPrivateSubCommandl_Ciick()DimarilDima「24)As

Integerarrl=Array(Val(Textl.Text),Val(Text2.Text),Val(Text3.Text),

Val(Text4.Text))'中請arrl數組并初始化Fori=lTo4arr2(i)=CInt(arrl<i)),CInt函

數將中的數值轉換為整型NextiM=FindMin(arr2)Print”最小值是："，MEnd

Sub步驟3：調試并運行程序，關閉程序后按題目要求存盤。

知識點解析：(1)當在窗體上按下鼠標鍵時將觸發其Mouse-Down事件，該事件過

程的參數Bulton值為1時表示當前按下的是鼠標左鍵：當Binion值為2時表爪當

前按下的是鼠標右鍵。向列表框添加項目使用Additem方法，刪除列表項使用

Removehem方法。當執行刪除操作時，本題在For循環語句中逐一判斷列表中各

項是否與輸入內容一致，若一致則刪除列表框中該項。程序中用到了InpulBox。函

數，其格式為：InputBox(prompt[,title][,default](，xpos][,ypos][,helpfile,

context])其中常用參數為prompt和mpt是一個字符串，其長度不得超過

1024個字符，它是在對話框內顯示的信息，用來提示用戶輸入。title：是一個字

符串，它是對話框的標題，顯示在對話框頂部的標題區。(2)文本框罩的內容(包括

數字)默認都是當做字符串來處理的，如果需要參與數據運算，則需先用Val()函數

將其轉化為數字(例如Val(Textl.Text))。CInl函數將數值轉換為整型。這里需要

指出的是，利用Array對數組各元素賦值，聲明數組的類犁只能是Variant。在本

題的FindMin過程中，用變量Min記錄最小值，最初把數組的第一個元素的值賦

給Min,然后通過For循環語句將其后的元素依次與之比較，如果小于Min的值則

與之交換，依次類推，最終Min的值就是數組各元素中的最小值。在窗體上打印

信息可以通過Prim方法來實現，其形式為：[對象.]Prim要顯示的內容

四、綜合應用題(本題共1題，每題7.0分，共1分。)

43、在考生文件夾卜有一個工程義件sjt5.vbpo程序運行時，單擊“顯示數據”按

鈕，則將考生文件夾下in5.dat文件的內容讀入一維數組a中，并按下標順序將數

組a各元素的值顯示在Listl列表框中；單擊“移動”按鈕，則將數組a中的最大值

移動到數組的最前面，其他數據的排列順序不變，并將移動后的結果顯示在Iflst2

列表框中。單擊“保存”按鈕，則保存移動后的結果，要求：“顯示數據”和“保存”按

鈕的Click事件過程已經給出，請編寫“移動”按鈕的Click事件過程實現上述功

能。程序窗體界面如圖所示。注意：考生不得修改窗體文件中已經存在的控件和

程序，在結束程序運行之前必須單擊“移動”按鈕，并單擊“保存”按鈕保存結果，否

則無成績。最后程序按原文件名存盤。

燎妁被楣：移動后的鰭果:

ITO

“I302

IT0

l80IS4

M淤

l3f024

l3s4134

158

l201270

-5s

顯示副加保存I

標準答案：步驟1：打開本題工程文件。步驟2：打開代碼編輯窗扣，去掉程序中

的注釋符將問號改為正確的內容。Dimi,max,maxindexAsIntegermax=a(l)

Fori=2ToUBornd(a)Ifa(I)>maxThenmax=a(1)maxindex=iEndIfNexti

List2.Addltem(a(maxindex))Fori=1ToUBound(a)IfiomsxindexThen

List2.Additem(a(i))EndIfNexti步驟3；淵試并運行程序，關閉程序后按題日要

求存盤。

知識點解析：本題考查數組的使用，通過循環結構找出數組中的最大值及對應的下

標，并將值分別保存起來。然后利用For循環和List,additem方法將數組元素值

添加到列表框中顯示。

國家二級(VB)機試模擬試卷第2套

一、選擇題(本題共40題，每題1.0分，共40分。)

1、數據庫設計過程不包括

A、概念設計

B、邏輯設計

C、物理設計

D、算法設計

標準答案：D

知識點解析：數據庫設計過程主要包括需求分析、、概念結構設計、邏輯結構分

析、數據庫物理設計、數據庫實施、數據庫運行和維護階段。答案為D選項。

2、在VisualBasic環境下設計應用程序時，系統能自動檢查出的錯誤是()。

A、語法錯誤

B、邏輯錯誤

C、邏輯錯誤和語法錯誤

D、運行錯誤

標準答案：A

知識點解析：VB中系統只能檢查出語法錯誤，不能檢查出邏輯錯誤。故選A,

3、下列合法的變量名是（）0

A、sum-a

B、num_9

C、prmt$

D、5avg

標準答案：B

知識點解析：VB中變量的命名規則為：①必須以字母或漢字開頭②由字母、漢

字、數字或下劃線組成③不能使用VB的保留字。變量名sum-a中有一減號，不

合法；print是VB保留字，不能作變量名，不合法；5avg不能以數字開頭，不合

法。故選B。

4、已知：乂=-6丫=39則表達式？**$8113）”的值為（）。

A、一6.5

B、—6

C、6

D、6.5

標準答案：C

知識點解析：本題按運算符從高到低優先級計算：*（\,所以應該是39\—6）*Sgn（-

6）=39\（-6）*（-1）=（39\6=6,故選Co

5、在VisualBasic中，所有標準控件都具有的屬性是（）。

A、Caption

Name

C、Text

D、Value

標準答案：B

知識點解析：VB標準控件中不同控件具有不同屬性，有的相同有的不同，但都具

有Name屬性。故選B。

6、下列有語法錯誤的賦值語句是（）。

A^y=7=9

B、s=m+n

C^Text1.Text=10

D、m+n=12

標準答案：D

知識點解析：賦值語句的格式是：變量名=表達式。賦值號左邊必須是變量名，不

能是表達式或常量。D選項中賦值號左邊m+n是表達式，不是變量名，故D選項

錯誤。

7、在面向對象的程序設計中，可被對象識別的動倫稱為（）o

A、方法

B、事件

C、過程

D、函數

標準答案：B

知識點解析：在VB中可被對象識別的動作稱為事件，事件是由用戶或系統觸發

的，觸發后就會執行相應的事件過程代碼。故選B.

8、下列關于順序文件的描述中，正確的是（）o

A、文件的組織與數據寫入的順序無關

B、主要的優點是占空間少，且容易實現記錄的增減操作

C、每條記錄的長度是固定的

D、不能像隨機文件一樣靈活地存取數據

標準答案.D

知識,23析：順序文件的特點是：文件中各記錄寫入、存放和讀取的順序是一致

的，即最先寫入的記錄放在文件的最前面，后面寫入的依次往后面存放，最后寫入

的記錄存放在文件的最后。讀取時也是，先讀取完前面的記錄，才能讀取后面的記

錄。所以文件的組織與數據寫入的順序有關，而且讀取文件時效率低，不靈活。故

A選項錯誤，D選項正確。根據順序文件的特點，文件實現記錄的增減不容易。故

B選項錯誤。順序文件的每條記錄中各數據項個數不固定，所以記錄的長度也不固

定。故C選項錯誤。

9、下列操作說明中，錯誤的是（）o

A、在具有焦點的對象上進行一次按下字母鍵操作，會引發KeyPress事件

B、可以通過MouscPointcr屬性設置鼠標光標的形狀

C、不可以在屬性窗口設置MousePoinler屬性

D、可以在程序代碼中設置MousePointer屬性

標準答案：C

知識點解析：可以在屬性窗口中給MousePoinler屬性設置屬性值。故C選項錯

誤。

10、以卜.打開VisualBasic菜單編輯器的操作中，錯誤的是（）。

A、執行“編輯“菜單中的“菜單編輯器”命令

B、執行“工具“菜單中的“菜單編輯器”命令

C、單擊工具欄中的“菜單編輯器”按鈕

D、右擊窗體，在彈出的快捷菜單中選擇”菜單編輯器”命令

標準答案：A

知識點解析：在“編輯”菜單中沒有”菜單編輯器”命令。故A選項錯誤。

11、VisualBasic中的"啟動對象”是指啟動VisualBasic應用程序時,被自動加載并

首先執行的對象。下列關于VisualBasic”啟動對象”的描述中，錯誤的是()。

A、啟動對象可以是指定的標準模塊

B、啟動對象可以是指定的窗體

C、啟動對象可以是SubMain過程

D、若沒有經過設置，則默認的“啟動對象”是第一個被創建的窗體

標準答案：A

知識點解析：VB中后功對象可以是SubMain過程或窗體，不能是標準模塊。故A

選項錯誤。

12、為了使標簽控件在顯示其內容時不覆蓋其背景內容，需進行設置的屬性為

()o

A、BackColor

BorderStyle

C^ForcColor

D、BackStyle

標準效案.D

知識析：標簽控件的BackStyle屬性值為0時-，標簽為透明的，不會遮住背景

內容，BackStyle屬性值為1時，標簽將覆蓋背景。

13、VisualBasic控件一般都規定一個默認屬性，在引用這樣的屬性時，只寫對象

名而不必給出屬性名。默認屬性為C叩tion的控件是()。

A、列表框(LislBox)

B、標簽(Label)

C、文木框(TextBox)

D、組合框(ComboBox)

標準答案：B

知識點解析：標簽主要用來顯示文本信息，它所顯示的內容只能用Caption屬性來

設置或修改，Caplion為標簽控件的默認屬性，引用時可以只寫標簽控件的對象

名。

14、下列說法中，錯誤的是()o

A、將焦點移至命令按鈕上，按Enter鍵，則引發命令按鈕的Click事件

B、單擊命令按鈕，將引發命令按鈕的Click事件

C、命令按鈕沒有Picture屬性

D、命令按鈕不支持DbIClick事件

標準答案：C

知識點解析：按鈕的Picture屬性可以給命令按鈕指定一個圖形，為了使用這個屬

性，必須把Slyle屬性設置為1。單擊命令按鈕或將焦點移至命令按鈕上，按Emer

鍵，都會引發命令按鈕的Click事件。命令按鈕不支持DbIClick事件。

15、為了將“聯想電腦”作為數據項添加到列表框Lisll的最前面，可以使用語句

()。

A、List1.Additem”聯想電腦”，0

B、Bstl.Addllem”聯想電腦”,1

C、List1.Additem0,”聯想電腦”

D、List1.Additem1,”聯想電腦”

標準答案：A

知識點解析：為列表框控件添加數據的方法是Additem,List控件的Additem方法

的語法是：AddItcm(String,index)。其中index是列表框中列表項的索引值，第一

項的索引值為0。

16、下列關于利用通用對話框產生的文件對話框的相關屬性的描述中，錯誤的是

()。

A、InilDir屬性用于設置對話框中顯示的起始目錄

B、Filter屬性用于設置對話框默認的過濾器

C、DcfaultExt屬性用于設置對話框中默認的文件類型

D、FileTitle屬性用于存放對話框中所選擇的文件名

標準答案：B

知識點解析：通用對話框的InilDir屬性用于設置對話框中顯示的起始目錄，Filter

屬性用來指定在對話框中顯示的文件類型，Filterindex用于設置對話框默認的過濾

器，DefaultExt屬性用于設置對話框中默認的文件類型，FileTitle屬性用于存放對

話框中所選擇的文件名。

17、下列事件的事件過程中，參數是輸入字符ASCH碼的是()。

A^KeyDown事件

B、KeyUp事件

C^KeyPress事件

D、Change事件

標準答案：C

知識點解析：KeyPress事件參數KeyAsciiAsInteger,KeyAscii是所按鍵字符的

ASCII碼。KeyDown和KeyUp事件參數有兩個，是KeyCodeAs