家二級(VB)機試模擬試卷3(共9

套)

(共396題)

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

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

1、對建立良好的程序設計風格，下面描述正確的是()。

A、程序應簡單、清晰、可讀性好

B、符號名的命名只要符合語法

C、充分考慮程序的執行效率

D、程序的注釋可有可無

標準答案：A

知識點解析：程序設計應該簡單易懂，語句結構應該簡單直接，不應該為提高效率

而把語句復雜化。

2、表達式Int(?15.8)+Fix(-15.8)+Int(15.8)+Fix(15.8)的運算結果是()。

A、-1

R、-2

C、0

D、1

標準答案：A

知識點解析：本題考查函數Ini的功能，Inl(x)的作用是取不大于x的最小的整數，

Fix(x)則是簡單的取整數部分。

3、工程文件中包含一個模塊文件和一個窗體文件。模塊文件的程序代碼是：

PublicxAsIntegerPrivateyAsInteger窗體文件的程序代碼是：DimaAsInteger

PrivateSubForm_Load()DimbAsIntegera=2：b=3：x=10：y=20End

SubPrivateSubCommandI_Click()a=a+5：b=b+5：x=x+5：y=y+5

Printa；b；x；yEndSub運行程序，單擊窗體上的命令按鈕，則在窗體上顯示的

是()。

A、55155

B、751525

C、78155

D、75155

標準答案：D

知識點解析：程序在模塊文件中定義x為整型全局變量，在整個工程中都起作用，

而y定義為整型私有變量，只能在本模塊文件中起作用。在窗體文件中變量a在本

窗體文本中起作用，窗沐加載事件中定義的變量b和沒有聲明的變量y,只在本事

件過程起作用。程序窗體加載時，對后邊有影響的變量值為a為2,x為10,沒有

指定初值的變量值默認為0，因此單擊命令按鈕后，a=a+5=7,b=b+5=5,x

=x+5=15,y=y+5=5,結果輸出75155。

4、下面不能在信息框中輸出“VisualBasic”的是()。

A、x=MsgBox("VisualBasi")

B、MsgBoxC'VisualBasic")

C、MsgBox"VisualBasic”

D、CallMsgBOX"VisualBasic"

標準答案：C

知識點解析：MsgBox()函數用于顯示提示信息，并可返回一個代表用戶單擊了哪

個按鈕的Integer類型值，當其作為函數使用時必須將參數放在括號內部，而返回

值可以賦值給一個變星，也可以單獨使用此函數而不將其返回值賦值給變量；

MsgBox過程也用于顯示提示信息，作為過程必須使用Call關鍵字來進行調用，其

參數不能加括號。

5、在窗體上有一個文本框Textl和一個標簽Labcll,要求運行程序時，在文本框

中輸入的內容立即顯示左標簽中(如圖I所示)，則空白處應填入的內容是()。

上上?lx

AK

底

圖1PrivateSubTextl()Label1.Caption=Textl.TextEnd

Sub

A^GetFocus

B、Click

C、Change

D、LostFOCBS

標準答案：C

知識點解析：本題考查文本框的事件。文本框的GelFocus事件為文本框獲得焦點

時觸發一次，而單擊文本框時觸發一次Click事件，Change事件是每次文本框中的

文本發生改變時觸發的事件，而LostFocus事件是文本框失去焦點時觸發的事件。

6、窗體上有一個名稱為Timeri的計時器控件，一個名稱為Sh叩el的形狀控件，

其Shape屬性值為3(Circle)o編寫程序如下：PrivateSubFonn_Load()

Shape1.Top=0Timer1.Interval=100EndSubPrivateSubTimerl_Timer()StaticxAs

IntegerShape1.Top=Shape1.Top+100X=x+IIfxMod10=0ThenShapeI.Top=0

EndIfEndSub以下關于上述程序的敘述中，錯誤的是()。

A^每執行一次Timerl_TiHler事件過程，x的值都在原有基礎上增加1

B、Sh即el每移動10次回到起點，重新開始

C、窗底上的Shapel由下而上移動

D、Shape1每次移動100

標準答案：C

知識點解析：題目中變量x定義為Static,即每次進入Timer事件過程時，x都會

保留上次的值，從而實現每執行一次Timcrl_Timer事件過程x的值都在原有基礎

上增加1。程序中判斷調用Timer事件過程10次后，重置Shape1的lop值為0,即

回到起點。控件Shapel的Top屬性是距離窗體頂的位置，數值越大距離越遠，因

此Shape1會由上向下移動。

7、有卜列程序代碼：PrivateSubCommandI-Click()RandomizeDimx(30)As

Integer,sAsIntegerFork%=lTo30x(k)=Int(Rnd*100)NextkFork=lTo30If

x(k)Mod2=1Thens=s+x(k)EndIfNextkPrintsEndSub程序運行后的輸出是()。

A、30個隨機整數中所有個位數為1的數之和

B、30個隨機整數中所有偶數的和

C、30個隨機整數的和

D、30個隨機整數中所有奇數的和

標準答案：D

知識點解析：第一個For循環利用表達式Int(Rnd*100)隨機產生一個［0,99］之間的

整數，并依次賦值給數組中每個元素。第二個For循環語句的功能是：循環遍歷數

組中的所有元素，使用If語句判斷每個元素是否為奇數，若是奇數則將該元素累

加到變量s中。綜上所述，本程序的功能是隨機產生30個整數，并將所有奇數進

行累加輸出。故D選項正確。

8、窗休卜有名稱為Commandl的命令按鈕和名稱為Textl的文本框PrivateSub

Command1_Click()Textl.Text="程序設計"Text1.SetFocusEndSubPrivateSub

Textl_GotFocus()Textl.Text="等級考試"EndSub運行以上程序，單擊命令按鈕

后()。

A、文本框中顯示的是“程序設計？且焦點在文本框中

B、文本框中顯示的是“等級考試”,且焦點在文本框中

C、文本框中顯示的是“程序設計”,且焦點在命令按鈕上

D、文本框中顯示的是“等級考試”,且焦點在命令按鈕上

標準答案：B

知識點解析：運行程序，單擊命令按鈕后，執行Commandl_Click事件過程代碼,

文本框Textl中顯示“程序設計”，并且文本框Textl獲得焦點，此時焦點在Texll

中：當Textl獲得焦點就會觸發它的Got_Focus事件，執行Got_Focu$事件過程，

結果文本框Textl中顯示“等級考試”。故B選項正確。

9、在窗體上域一個名稱為Texll的文本框和一個名稱為Command1的命令按鈕，

然后編寫如下事件過程：PrivateSubCommandl_Click()DimiAsInteger,nAs

IntegerFori=0To50i=i+3n=n+lIfi>10ThenExitForNextTextl.Text=sty(n)End

Sub程序運行后，單擊命令按鈕，在文本框中顯不的值是()。

A、2

B、3

C、4

D、5

標準答案：B

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

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

i=i+3,因此，每次循環開始時i的取值為0,4,8,i為8時執行i=i+3=l1。

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

值為3。所以在文本框口會顯示3。

10、窗體上有1個名稱為Textl的文本框；1個名稱為Timerl的計時器控件，其

Interval屬性值為5000,Enabled屬性值是True。Timerl的事件過程如下：Private

SubTimerl_Timer()StaticflagAsIntegerIfnag=OThenHag=lflag=-flagIfflag=lThen

Textl.ForcColor=&IIFF&'&IIFF&為紅色Else

Textl.ForeColor=&HC000&'&HC000&為綠色EndIfEndSub以下敘述中正確的

是()。

A、每次執行此事件過程時，flag的初始值均為0

B、flag的值只可能取0或1

C、程序有邏輯錯誤，Else分支總也不能被執行

D、程序執行后，文本框中的文字每5秒改變一次顏色

標準答案：D

知識點解析：計時器控件(Timer)用來完成有規律性時間間隔執行的任務，Interval

屬性用于設置計時器事件之間的間隔，以亳秒為單位。木題在每5秒執行一次的

Timer事件過程中，通過靜態變量flag值的交替變換(即?1和1之間)來控制文本框

中文字的顏色，值為-1時為綠色，值為1時為紅色。除程序剛啟動第一次執行

Timer事件過程時，靜態變量flag的初始值為。外，其余各次均為-1或1。

11、關于變量作用域，下列敘述中正確的是()。

A、在窗體的FormLoad事件過程中定義的變量是全局變量

B、局部變量的作用域可以超出所定義的過程

C、在某個Sub過程中定義的局部變量可以與其他事件過程中定義的局部變量同

名，但其作用域只限于該過程

D、在調用過程中，所有局部變量被系統初始化為。或空字符串

標準答案：C

知識點篇析：本題考查變量的作用域。局部變量是在過程內用聲明的變量，只能在

本過程中使用，不同過程中的局部變量可以重名，由Dim或者Prirate聲明的局部

變量在過程調用前才會被初始化為0或空字符串,靜態局部變量不會被初始化為0

或空字符串；在“通用聲明”段中用Public語句聲明的變量為全局變量，可被本應用

程序的任何過程或函數訪問。

12、下列選項中，不屬于模塊間耦合的是（）。

A、內容耦合

B、異構耦合

C、控制耦合

D、數據耦合

標準答案：B

知識點解析：耦合可以分為下列幾種，它們之間的耦合度由高到低排列：內容耦

合——若一個模塊直接訪問另一模塊的內容，則這兩個模塊稱為內容耦合。公共

耦合——若一組模塊都訪問同一全局數據結構，則稱為公共耦合。外部耦合-

若一組模塊都訪問同一全局數據項，則稱為外部耦合。控制耦合一若一模塊明

顯地把開關量、名字等信息送入另一模塊，控制另一模塊的功能，則稱為控制耦

合。標記耦合—若兩個以上的模塊都需要其余某一數據結構的子結構時，不使

用其余全局變量的方式而全使用記錄傳遞的方式，這樣的耦合稱為標記耦合。數

據耦合——若一個模塊訪問另一個模塊.被訪問模塊的輸入和輸出都是數據項參

數，則這兩個模塊為數據耦合。非直接耦合——若兩個模塊沒有直接關系，它們

之間的聯系完全是通過程序的控制和調用來實現的，則稱這兩個模塊為非直接耦

合，這樣的耦合獨立性最強。

13、軟件生命周期中的活動不包括（）。

A、市場調研

B、需求分析

C、軟件測試

D、軟件維護

標準答案：A

知識點解析：軟件生命周期可以分為軟件定義、軟件開發與軟件運行維護二個階

段。主要活動階段是：可行性研究與計劃階段，需求分析，軟件沒計，軟件實現，

軟件測試，運行和維護，所以選擇A。

14、在窗體上畫一個名稱為Commandl的命令按鈕，一個名稱為Label1的標簽，

然后編寫如下事件過程：PrivateSubCommandl_Click（）s=0Fori=lTo15x=2*i—

1IfXMod3=0Thens=s+1NextiLabel1.Caption=sEndSub程序運行后,單擊命

令按鈕，則標簽中顯示的內容是（）。

A、1

B、5

C、27

D、45

標準答案：B

知識點解析：s變量用來計數，如果xMod3=0即如果能被3整除則計數增加1。

程序中x的取值為1、3、5、7、9、11、13、15、17、19、21、23、25、27、29,

其中是3的整數倍的數有3、9、15、21、27共5個，因此s的值為5。

15、現有如下一段程序：PrivateSubCommandl_Click()x=UCase(InputBox("^A：

"))SelectCasexCase,,A"To,,C,Print”考核通過!"Case"D"Print”考核不通過!”Case

ElsePrint”輸入數據不合法!”EndSelectEndSub執行程序，在輸入框中輸入字母

“B”，則以下敘述中正確的是()。

A、程序運行錯

B、在窗體上顯示、'考核通過!”

C、在窗體上顯示“考核不通過!”

D、在窗體上顯示“輸入數據不合法!”

標準答案：B

知識點解析：程序中Ucase函數將輸入的字母轉換為大寫，然后通過select多分支

控制語句選擇輸出不同信息，當輸入字母在“A”到之間時，顯示“考核通過!”，

輸入的是時顯示“考核不通過「如果輸入的是到“D”之外的其他字符貝!顯

示“輸入數據不合法!程序中輸入字母“B”，因此會顯示“考核通過!

16,設窗體上有一?個標簽LabeH和一個計時器Timer!,Timer!的Interval屬性被設

置為1000,Enabled屬性被設置為True。要求程序運行時每秒在標簽中顯示一次系

統當前時間。以下可以實現上述要求的事件過程是()。

A、PrivmeSubTimerl_Timer()Label1.Caption=TrueEndSub

BNPrivateSubTimerl_Timer()Label!.Caption=Time$EndSub

C、PrivateSubTimerl_Timer()Labell.Interval=lEndSub

D、PrivmeSubTimerl_Timer()Fork=lToTimerl.IntervalLabell.Caption=Timer

NextkEndSub

標準答案：B

知識點解析:Timerl的Interval屬性值是1000,Enabled屬性為True,說明定時器

開始工作，每隔1000毫秒(即1秒)觸發一次Timer事件，從而執行一次Timer事件

過程。要想每秒在標簽中顯示一次系統時間，則在Timer事件過程中把系統時間賦

給標簽的Caption屬性就能實現。故選Bo

17、下面不能作為結構化方法軟件需求分析工具的是

A、系統結構圖

B、數據字典(DD)

C、數據流程圖(DFD圖)

D、判定表

標準答案：

知識之解析A：結構化方法軟件需求分析工具主要有數據流圖、數據字典、判定樹和

判定表。

18、能得到組合框Combol中最后一個列表項序號的表達式是()。

A、Combol.Index

oinbol.Listindex

C、Combol.ListCount-1

D、Combol.List(ListCount)

標準答案：c

知識點解析：組合框的lAstCount屬性列出列表框中表項的數量，列表框中表項的

排列從0開始，最后一項的序號為ListCoum—1,C選項正確。本題選擇C選項。

r-1X<0

y=J00Wx<10

19、分段函數入下：I1XN10設x中已經有一個數值。下列程序段

中，能正確計算y值的是()。

A^SelectCasexCageIs<0y=-1CaseIs<10y=0CaseElsey=lEndSelect

B、SelectCasexCageIs<0y=一ICageIs>=0.Is<10y=0CaseIs>=10y=lEnd

Select

C、SelectCasexCasex<0y=一1Casex<10y=0CageElsey=lEndSelect

D、SelectCasexCagex<0y=-1CageX>=0AndX<10y=0CaseElsey=lEnd

Select

標準答案：A

知識點解析:在selectcase.......Endselect結構中,case后可以接下列三種形式的

值：1.表達式［,表達式］;2.表達式To表達式；3.Is關系運算表達式.故C選

項錯誤。且當用關鍵字Is定義條件時，只能是簡單的條件，不能用邏輯運算符將

兩個或多個簡單條件組合在一起，故B選項和D選項均錯誤：A選項符合題意。

本題選擇A選項。

20、以下能對正實數d的第3位小數四舍五入的表達式是

A、0.01*Int(d+0.005)

B、0.01*Int(100*(d+0.005))

C、0.01*Int(100*(d+0.05))

D、0.01*Int(d+0.05)

標準答案：B

知識點解析：Ini函數，返回的是不大于該數的一個整數。d+0.005,是讓第三位小

數進位，達到四舍五入，再乘100,放大100倍，保留小數位，取整后乘0.01還

原為原數。如:5.333+0.005=5.338,乘100后為533.8,取整后為53如乘0.01后

還原為5.33。

21、表達式Str(Len(“123"))+Str(77.7)的值是()。

A、3+77.7

B、377.7

C、80.7

D、12377.7

標準答案：B

知識點解析：本題考查字符串處理函數。Str的功能是把數字轉化為字符，Len函

數的功能是求字符串中字符的個數。題中“十”為字符串連接運算符。

22、用戶在組合框中輸入或選擇的數據可以通過一個屬性獲得，這個屬性是（）。

A、List

B、Listindex

C^Text

D、LislCount

標準答案：C

知識點解析：組合框的List屬性用來列出表項的內容。List屬性保存了列表框中所

有值的數組，可以通過下標訪問數組中的值，其格式為［列表框］.List（下標）；

Listlndex屬性的設置值是已選中的表項的位置，表項位置由索引值指定；Text屈

性值是用戶所選擇的項目的文本或直接從編輯區輸入的文本；ListCount屬性屬性

列出列表框中表項的數量。

23、下列說法中正確的是

A、通過適當的設置，可以在程序運行期間，讓計時器控件顯示在窗體上

B、在列表框中不能進行多項選擇

C、通過設置適當的屬性，可以把列表框中的項目按字母從大到小排序

D、框架也有Click和DblClick事件

標準答案：D

知識點解析：A選項計時器在運行期間，在程序界面是不可見的，故A選項表述

錯誤；B選項列表框不僅能進行單項選擇也能進行多項選擇，故B選項表述錯誤；

C選項中的列表框可以通過Sorted屬性，指定列表中的項目是否自動按字母順序排

列，但是不能按字母從大到小順序排序，故C選項表述錯誤：D選項框架常用的

有鼠標單擊和雙擊事件，它不接收用戶輸入。故D選項正確。

24、為了在按下回車鍵時執行某個命令按鈕的事件過程，需要把該命令按鈕的（）屬

性設置為Trueo

A、Value

B、Cancel

C^Enabled

D、Default

標準答案：D

知識點解析：本題考查控件的常見屬性。對于所有具有Cancel屬性的控件，

Cancel表示該控件是否當按下“Esc”鍵時，執行某個事件過程。Enabled表示控件是

否可以使用，命令按鈕的默認屬性為Default表示當按下回車鍵的時候，執行某

個命令按鈕的事件過程。

25、以下變量名中合法的是（）o

A、X—2

12abc

C、sum_total

D^print

標準答案：C

知識點解析：根據VB中變量名的命名規則，變量x—2中有一減號，不合法；變

量12abe是以數字開頭，不合法；變量prim是VB的保留字，不能作變量名，也

不合法。sum_total是符合命名規則，是合法的。故選C。

26、下列關于數組的敘述中，正確的是

A、數組名的命名規則與簡單變量相同

B>VisualBasic支持數組的隱式定義

C、使用Static語句定義任何類型的數組時，都把該數組的全部元素初始化為0

D、使用Dim語句定義任何類型的數組時，都將把數組的全部元素初始化為空字符

串

標準答案：A

知識點解析：定義格式中的“數組名”與簡單變量相同，可以是VB中任何合法的變

量名，故A項正確。數組必須先定義，后使用，不允許使用隱式定義，故B項錯

誤。用Dim定義數組時，并不能任何類型的數組都初始化為空字符串，比如該語

句把數值數組中的元素全都初始化為0;故選項D錯誤。同樣，當用Static定義數

組時，第一次定義時數組中的元素全都初始化為0；把字符串數組中的元素全都初

始化為空字符串；如果沒有退出程序，每次引用靜態變量的數組后，其值將繼續保

留，作為下次引用時該變量的初始值，故C錯誤。

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

A、棧是一種先進先出的線性表

B、隊列是一種后進先出的線性表

C、棧與隊列都是非線性結構

D、以上三種說法都不對

標準答案：D

知識點解析：棧是一種先進后出的線性表，隊列是一種先進先出的線性表，棧與隊

列都是線性結構。

28、在DoUntil…Loop循環中,判斷循環結束的方法是

A、先判斷循環條件，當條件為False時結束循環

B、先判斷循環條件，當條件為True時結束循環

C、先執行循環體，再判斷循環條件，當條件為False時結束循環

D、先執行循環體，再判斷循環條件，當條件為True時結束循環

標準答案：B

知識點解析：Do循環結構中Do[While|Until循環條件]…Loop先判斷條件后執行循

環體；Do...Loop[While|Unti1循環條件]先執行循環體后判斷柔件。其中Do

Until...Loop循環中，當條件為假時繼續執行循環體，當條件為真時退出循環，故

正確答案為B選項。

29、PrintFormaK1234.56,"###.#”)語句的輸出結果是()。

A、123.4

B、1234.6

C、1234.5

D、1234.56

標準答案：B

知識點解析：Forma【是格式輸出函數，數據要按照“輸出格式字符串”指定格式輸

出。”輸出格式字符串”中#表示顯示一數字，若此位置沒有數字則不顯示。本題中”

輸出格式字符串”整數部分###長度小于1234時，1234按原樣輸出，小數部分#長

度為1,則小數部分保留一位，四舍五入取6,故選B。

30、設變量V=2,B=5,則執行下面語句序列的輸出是Print24;:Print:

PrintV;B

A、VB2425

B、VB2425

C、VB2425

D、252425

標準答案：B

知識點解析；語句Print24輸出字符V和B及數據24,即；VB24。語句

Print：PrintV；B先輸出換行符，再輸出變量V和B的值，即：25。故正確答案

為B選項。

31、在窗體上畫一個文本框Textl,并編寫如下事件過程：PrivateSub

Textl_KeyPrcss(KeyAsciiAsInteger)DimchAsStringch=UCase(Chr(KeyAscii))If

Not(ch>=nA"Andch<="Zn)ThenEndIfEndSub

要求當程序運行時，在文本框Textl中只能輸入字母，無法輸入其它字符，則在橫

線處應填入的語句是

A、Textl.Text="”

B、KeyAscii=0

C、ch=n"

D、Textl.Text=Textl.Text&ch

標準答案：B

知識點解析：當按下某個鍵，所觸發的是擁有輸入焦點的那個控件的KeyPrcss事

件。其中"KeyAscH”是一個預定義變量，執行KeyPress過程時，該變量是指所按鍵

的ASCII碼。類型轉換函數Chr(n):把n轉換成相應的字符，其中表達式n的值是

合法的ASCH碼值。字符串大寫轉換函數Ucase(s)將字符串s中的小寫字母轉換

成大寫字母。Ucase(Chr(KeyAscii))是先將輸入的ASCH碼轉換成字符再將其轉換

成大寫字母。IfNot(ch>=nAMAndch<=°Zn)Then……EndIf；判斷當所輸入字母不

是字母時執行的操作該如何做。Textl.Text二”「將Textl文本框的內容設置為空。

ch二””將空賦值給字符串變量ch,空格的ASCII碼值為32。故正確答案為B選項。

32、軟件設計中模塊劃分應遵循的準則是()。

A、低內聚低耦合

B、高內聚低耦合

C、低內聚高耦合

D、高內聚高耦合

標準答案：B

知識點解析：軟件設計中模塊劃分應遵循的準則是高內聚低偶合、模塊大小規模適

當、模塊的依賴關系適當等。模塊的劃分應遵循一定的要求，以保證模塊劃分合

理，并進一步保證以此為依據開發出的軟件系統可靠性強，易于理解和維護。模塊

之間的耦合應盡可能的低，模塊的內聚度應盡可能的高。

33、耦合性和內聚性是對模塊獨立性度量的兩個標準。下列敘述中正確的是

（）。

A、提高耦合性降低內聚性有利于提高模塊的獨立性

B、降低耦合性提高內聚性有利于提高模塊的獨立性

C、耦合性是指一個模塊內部各個元素間彼此結合的緊密程度

D、內聚性是指模塊間互相連接的緊密程度

標準答案：B

知識點解析?：模塊獨立性是指每個模塊只完成系統要求的獨立的子功能，并且與其

他模塊的聯系最少且接口簡單。一般較優秀的軟件設訂，應盡顯做到高內聚，低耦

合，即減弱模塊之間的耦合性和提高模塊內的內聚性，有利于提高模塊的獨立性，

所以A）錯誤，B）正確。耦合性是模塊間互相連接的緊密程度的度量而內聚性是指

一個模塊內部各個元素間彼此結合的緊密程度，所以C）與D）錯誤。

34、數據庫應用系統中的核心問題是（）o

A、數據庫設計

B、數據庫系統設計

C、數據庫維護

D、數據庫管理員培訓

標準答案：A

知識點解析：數據庫應用系統中的核心問題是數據庫的設計。

35、程序流程圖中帶有箭頭的線段表示的是（）。

A、圖元關系

B、數據流

C、控制流

D、調用關系

標準答案：C

知識點解析：在數據流圖中，用標有名字的箭頭表示數據流。在程序流程圖中，用

標有名字的箭頭表示控制流。所以選擇C。

36、在窗體上畫一個名稱為Command1的命令按鈕，并編寫如下程序：Option

Base1PrivateSubCommandl_Click（）Dima（4,4）Fori=1To4

Forj=lTo4a(i,j)=(i-l)*3+jNextjNextiFor

i=3To4Forj=3To4Printa(j,i)；Nextj

PrintNextiEndSub運行程序，單擊命令按鈕，則輸出結果為()。

A、69710

B、710811

C、811912

D、9121013

標準答案：D

知識點解析:程序中數組元素賦值如下:第1行，a(l,l)=l,a(l,2)=2,a(l,3)=

3,a(l,4)=4；第2行，a(2,l)=4,a(2,2)=5,a(2,3)=6,a(2,4)=7；第3行，

a(3,l)=7,a(3,2)=8,a(3,3)=9,a(3,4)=10；第4行，a(4,1)=10,a(4,2)=ll,

a(4,3)=12,a(4,4)=13；要輸出的元素為：a(3,3)、a(4,3)、a(3,4)、a(4,4),即為

9、12、10、13。因此答案為D。

37、如果一個菜單項的Enabled屬性被設置為False,則程序運行時，該菜單項

()o_

A、不顯示

B、顯示但無效

C、有效可用

D、不顯示但有效可用

標準答案：B

知識點解析：菜單項默認情況下顯示，Enabled屬性值為False表示菜單項無效。

所以菜單項顯示但無效。故選B。

38、設子程序過程定義的首部為：PublicSubS(XAsInteger,YAsSingle)則以下正

確的調用形式為

A、CallS5,4.8

R、CallSub(5,4.8)

C、Sub5,4.8

D、S5,4.8

標準答案：D

知識點解析：(1)用Call語句調用Sub過程：語法：Call過程名(［實參表

列］),實參的個數、類型和順序，應該與被調用過程的形式參數相匹配，有多個

參數時，用逗號分隔。(2)把過程名作為一個語句來用：語法：過程名［實參

1［,實參2…它與(1)的不同點是：去掉了關鍵字和實參列表的括號。

39、下面操作中，不能正確保存正在編輯的工程的是

A、鼠標右鍵單擊”工程資源管理器窗口”中該工程的圖標，在彈出的菜單中選”保存

工程”

B、單擊”文件”菜單，在下拉菜單中選"保存工程”

C、單擊”工程”菜單，在下拉菜單中選“保存工程”

D、直接單擊工具欄上的Q按鈕

標準答案：C

知識點解析：工程的下拉菜單中沒有"保存工程二

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

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

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

B、按鍵盤上的Esc鍵

C、按鍵盤上的回車鍵

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

標準答案：C

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

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

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

二、基本操作題（本題共2題，每題1.0分，共2分0）

請根據以下各小題的要求設計VisualBasic應用程序（包括界面和代碼）。

41、在名稱為Forml的窗體上畫一個名稱為CD1的通用對?話框，通過屬性窗口設

置CD1的初始路徑為C\,默認的文件名為None,標題為“保存等級考試”，如

保,號場域K

三?由dE3

國D?12BAI

o工皿2C

JE..e

二FlTIT

。￡m5

0nttit

，TXT

6ft.

3nni

alrrou

mnuinr

V一.一一二

位保卬1

3■■

圖2所示。圖2注意：

存盤時必須存放在考生文件夾下，工程文件名為sj〔l.vbp,窗體文件名為

sjtl.frnio

標準答案：［操作步驟］步驟1：新建一個“標準。EXE”工程，選擇［工程］一［部件］命

令，在彈出的“部件”對話框的列表中選中“MicrosoftCommonDiMogControl.0"

項目，單擊“確定”按鈕,步驟2：在窗體Forml上畫一個通用對話框，其相關屬

_________衰12?7______________

對徵?性設?值

NameCDl

DialogTitle保存等級考試

通用對話刖

FileNameNone

性設置如表12—7所示。----------InitDir——口——步驟3：編寫

Forml的Iroad事件，加入下面的代碼：CDl.ShowSave步驟4：按要求將文件保

存至考生文件夾中。

知識點解析：通用對話框的InitDir屬性用于為打開或另存為對話指定初始的目

錄，如果此屬性沒有指定，則使用當前目錄。通用對話框的初始路徑由InilDir屬

性設置，默認文件名由FileName屬性設置，標題由DialogTitle屬性設置。

42＞在名稱為Forml的窗體上設計一個菜單。要求在窗體上添加名為menu。，標

題為“菜單命令”的主菜單，再添加兩個名稱分別為“menul"、“menu2”，標題分別

為“不可用菜單項”、“上一菜單項可用”的子菜單，并且使程序運行時，menul子菜

單不可用，menu2子菜單已經選中（運行時的效果如圖3所示）。

圖3再編寫適當的事件過程，使得程序運行時，單擊“上一

菜單項可用1則“不可用菜單項”變為黑色（可用）。要求程序中不得使用變量，且只

有一條語句。注意：存盤時必須存放在考生文件夾下，工程文件名為sil2.vbp,

窗體文件名為sit2.Frir.o

標準答案：［操作步驟］步驟1：新建一個“標準EXE”工程，打開VB菜單設計器設

計菜單，各菜單項及屬性設置如表12—8所示。

泰12-8

標題名稱是否育效內罐符號

菜單命令menuO有效0

不可用菜單項menul無效1

上菜單項可用menu2有效1一步驟2：打開代碼編輯窗口，編

寫“上一菜單項可用”命令的Click事件過程。參考代碼：PrivateSubmenu2_Click（）

menu1.Enabled=TrueEndSub步驟3：按要求將文件保存至考生文件夾中。

知識點解析：①VB中的菜單是通過菜單編輯器來設計的。菜單編輯器中的基本設

置項有：“標題”項，對應出現在菜單中的顯示內容；“名稱”項，系統識別菜單項的

唯一關鍵字（不能重復）；“索引”項，用于設置菜單數組中各元素的索引號；“快捷

鍵''項，是一個下拉列表框，用于設理菜單項的快捷鍵；“幫助上下文”項，設置當

鼠標移動到某菜單項上按VF1＞鍵時顯示的幫助信息在幫助文件中的對應位置；

Visible（可見）項，用于設置控件或菜單項在程序運行時是否可見，值為True表示可

見，值為False表示不可見；Enabled(有效)項，用于設置控件或菜單項在程序運行

時是否有效，值為True時表示有效，值為False時表示無效(顯示為灰色)。通過編

輯按鈕區的七個按鈕可對菜單進行添加、插入、刪除、提升(設置為上一級菜單)、

縮進(設置為下一級菜單)、上移、下移等操作。②文本框的Texl屬性用于設置或

返回其顯示的文本內容。本題原程序設計思路：在“上一菜單項可用”命令的單擊

事件過程中，通過語句設置“不可用菜單項''命令的Enabled屬性值為True。

三、簡單應用題(本題共7題，每題1.0分，共I分。)

43、(1)考生文件夾下有一個工程文什sjt3.vbpo程序的功能是：通過鍵判向文本

框中輸入數字，如果輸入的是非數字字符，則提示輸入錯誤，且文本框中不顯示輸

入的字符。單擊名稱為Command］、標題為“添加”的命令按鈕，則將文本框中的數

字添加到名稱為Combol的組合框中。在給出的窗體文件中已經添加了全部控件，

但程序不完整。要求去淖程序中的注釋符，把程序中的?改為正確的內容。注意：

不能修改程序中的其他部分和其他控件的屬性。最后把修改后的文件按原文件名存

盤。(2)在考生文件夾下有一個工程文件sjt4.vbp。該程序的功能是計算M!+(M

+l)!+(M+2)!+…+N!之和。窗體上有名稱分別為Textl、Text2的兩個文本框，

用于接收輸入的M和N(要求MVNL單擊名稱為Commands標題為“計算”的命

令按鈕，計算M!+(M+l)!+(M+2)!+…+N!的值，并將計算結果顯示在標簽

IblResult中。在給出的窗體文件中已經有了全部控件，但程序不完整，要求去掉

程序中的注釋符，把程序中的?改為正確的內容。注意：不能修改程序的其他部分

和控件屬性。最后把修改后的文件按原文件名存盤。

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

中的注釋符將問號改為正確的內容。PrivateSubCommand1Click()

CombO1.AdditemText1將Textl'中的內容加入Combol中Textl.Text=""'同時

將Textl內容清除EndSubPrivateSubTextlKeyPress(KeyAsciiAsInteger)If

KeyAscii>57orKeyAscii<48Then'數字的Ascii碼值下界MsgBox"請輸入數字!"

心丫人5疝=0，清空￡血汗￡血5此步驟3：調試并運行程序，關閉程序后按題目要求

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

的注釋符，將問號改為正確的內容。PrivateSubCommandlClick()DimmAsInteger

DimnAsIntegerDimsAsLongDimiAsIntegerm=Val(Textl.Text)'將文本框中

的字符轉換成數值型n=Val(Text2.Textls=0Fori=mTon—mt=f(i)調用函數得到

N的階乘s=s+tNextiblRcsult.Caption=sEndSubPrivateFunctionf(ByRcfxAs

Integer)AsLong'ByRef為傳址傳遞DimtAsLongt=lFori=lTox'實現對數值進行

階乘運算t=t*iNext返回計算結果EndFunction步驟3：調試并運行程序，關閉

程序后按題目要求存盤。

知識點解析：(I)單擊命令按鈕，運用組合框的List屬性將文本框中的數字添加到

組合框中，通過ASCII叫來判斷輸入的是否為數字字符。(2)Functionf()過程函數

用于實現對數值階乘的運算，Val()函數實現將文本框中的字符轉換成數值型，通

過循環調用過程函數實現對表達式結果的累加I。

四、綜合應用題(本題共1題，每題1.0分，共7分0)

44、在考生文件夾下有一個工程文件sjt5.vbp,相應的窗體文件為sjt5.frm,此

外還有一個名為datain.txt的文本文件，其內容如下：324378582812985731

42536475869713243546576879805937程序運行后，單擊窗體，將把文件

datain.txt中的數據輸入到二維數組Mat中，按5行、5列的矩陣形式顯示在窗體

上，并輸出矩陣左上一右下對角線上的數據，如圖所示。在窗體的代碼窗口中，已

給出了部分程序，這個程序不完整，請把它補充完整，并能正確運行。要求：去

掉程序中的注釋符，把程序中的?改為正確的內容，使其熨現上述功能，但不能修

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

標準答案：步驟1：打開本題工程文件。步驟2：分析并編寫程序代碼。程序提供

代碼OptionBase1PrivateSubForm_CIick()ConstN=5ConstM=5'Dim?Dimi,

j'OpenApp.Path&”\".&"datain.txt44?As#1Fori=lToNForj=lToM'?Nextj

NextiClose#1PrintPrim”初始矩陣為："PrintFori=lToNForj=lToMPrint

Tab(5*j)；Mat(i?j)；NextjPrintNextiPrintPrint”左上一右下對角線上的數為：”

Fori=lToNForj=lToMHfZThenPrintTab(5*j)；Mat(i,j)；NextjNextiEndSub

程序結束第1個?處填入:Mat(N,M)AsInteger或Mat(5,5)A$Integer第2個?處

填入：ForInput第3個?處填入：Input#1,Mat(i,j)第4個?處填入：i=j步驟3：

調試并運行程序，關閉程序后按題目要求存盤。

知識點解析：Tab函數苒與Print#語句或Print方法?起使用，對輸出進行定位，其

語法為：Tab[(n)]其中，可選的參數n表示在顯示或打印下一個表達式之前移動的

列數。在使用數組時，應先定義。Inpul#句用于讀取順序文件中一項(或多項)數據

給一個變量(或多個變量)，其語法格式為：Inpul#FileNumber,Varlist其中：

FileNumbcr參數表示打開文件的句柄，VaHist為變量列表。語句“OptionBase1”用

于限定數組下標的下限默認為1。本題中文件以Inpul方式打開，使用一個5行、

5列的二維數組Mat來存放數據，并使用一個嵌套的For循環顯示矩陣，對于5*5

的矩陣來說，位于左上到右下對角線上的元素具有行號等于列號的特點。

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

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

1、窗體上有一個命令按鈕和一個文本框，程序執行后，在文本框中輸入12345,

單擊命令按鈕后的輸出結果為()。PrivateSubCommandl_Click()DimAAs

Integer,BAsIntegerTcxtl.SclStart=2：Tcxtl.SclLcngth=2

A=Val(Textl.SelText)：B=Len(Textl.Text)PrintA*BEndSub

A、68

B、115

C、1700

D、170

標準答案：D

知識點解析：本題考查文本框的常見屬性。文本框的SelSlarl屬性和SelLength屬

性表示選中文本的開始位置和長度，第一個字符的位置為0,SelTex［表示選中的

文本。Vai把字符轉化為數字。所以A為34,B為5,因此輸出為34*5=170。

2、窗體上有一個名稱為CD1的通用對話框控件和由四個命令按鈕組成的控件數組

Command1,其下標從左到右分別為0、1、2、3,窗體外觀如圖所示。

命令按鈕的事件過程如下：Private

SubCommandl_Click(IndcxAsInteger)SelectCaseIndexCase0

CD1.Action=1Case1CD1.ShowSaveCase2

CD1.Action=5Case3EndEndSelectEndSub對上述程

序，下列敘述中錯誤的是()。

A、單擊”打開“按鈕，顯示打開文件的對話框

B、單擊“保存”按鈕，顯示保存文件的對話框

C、單擊“打印”按鈕，能夠設置打印選項，并執行打印操作

D、單擊“退出”按鈕，結束程序的運行

標準答案：C

知識點解析：通用對話框中Aclion=1,或用ShowOpen方法都可顯示“打開”文件

對話框；Action=2,或用ShowSave方法都可顯示支件"另存為"對話框；Action=

3,或用ShowColor方法都可顯示"顏色"對話框；Action=4,或用ShowPrint方法

都可顯示“字體”對話框；Action=5,或用ShowHelp方法都可顯示“打印”對話框；

本題中，“打開“、“保存“、“打印“、“退出"按鈕的下標(即Index值)分別是0、1、

2、3,用Index值區分各命令按鈕。當Index=0時，CDl.Action=1,說明單擊”打

開”按鈕，會顯示“打開”文件對話框；當Index=l時，CD1.ShowSave,說明單擊”

保存”按鈕，會顯示文件“另存為”對話框；當Index=3時，End,說明單擊“退出”按

鈕，會結束程序運行。故A、B、D選項正確。當Index=2時，CD1.Action=5,

說明單擊“打印”按鈕，會顯示“打印”對話框，但打開對話框后，只能設置打印選

項，不能執行打印操作。故C選項錯誤。

3、下列有關過程的敘述中錯誤的是（）。

A、如果過程被定義為Slatic類型，則該過程中的局部變量都是Stmic類型

Sub過程中不能嵌套定義Sub過程

C、Sub過程中可以嵌套調用Sub過程

D、事件過程可以像通用過程一樣由用戶定義過程名

標準答案：D

知識點解析：本題考查過程。一般在VB中控件本身的事件過程名稱為'、控件名事

件“，另外還可以自定義過程，主耍有Sub子過程和Funciion函數過程，過程可以

嵌套調用，但不可以嵌套定義。靜態過程中所有的局部變量默認為靜態變量。

4、用來設置文字字體是否斜體的屬性是（）o

A、FontUnderline

FontBold

C、FontSlope

D、Fontltalic

標準答案：D

知識點解析：FontUnderline屬性設置文字是否有下劃線；FontBold屬性是設置文

字是否加粗；FonUlalic屬性是設置文字是否斜體；沒有FontSlope屬性。故選D。

5、下面的數寫成普通十進制數是（）。2.65358979335278D-6

A、0.0000265358979335278

B、0.00000265358979335278

C、0.000265358979335278

D、0.000000265358979335278

標準答案：B

知識點解析：浮點數也稱為實型數或實數，是帶有小數部分的數值。它由3部分組

成：符號、指數及尾數。例如123.45678D3或123.45678D+3的雙精度數，這其

中的”123.45678”部分為尾數部分、"E數為指數部分（E為符號,3為指數）,相當

于123.45678乘以10的3次幕。中是“D-6"，那么應該是乘以10的負6次塞，所

以選項B正確。

6、已知變量x、y為整數型，且x=4,y=12.s為字符串型，且s=a,Lblok為標簽

控件，下列賦值語句不合法的是（）。

A、x=LblOk.Caption

LblOk.caption=Str（x）

C>x*3=y

D、y=x*s

標準答案：C

知識點解析：本題考查標簽控件的屬性。標簽控件Caplion屬性值為字符串，賦值

表達式要求賦值號左邊必須是變量，不能出現表達式。

7^在過程定義中，Private表示（）。

A、此過程可以被其他過程調用

B、此過程不可以被任何其他過程調用

C、此過程只可以被本工程中的其他過程調用

D、此過程只可以被本窗體模塊中的其他過程調用

標準答案：D

知識點解析：本題考查Private的含義。Private表示了過程或者變量的訪問權限，

僅局限于定義的窗體和模塊，也就是此過程只可以被本窗體模塊中的其他過程調

用。

8、如圖2所示，在窗體上有一個文本框控件，名稱為TextTime；一個計時器控

件L.名稱為Jimer1。要求每1s在文本框中顯示一次當前的時間。

?FOFBI|」,□||X

bST06

圖2PrivateSubTimer1TextTime.Text=TimeEnd

Sub在下劃線上應填入的內容是（）。

A、Enabled

B、Visible

C、Timer（）

D、Interval

標準答案：C

知識點解析：本題考查計時器控件。計時器控件只有?個事件，就是Timer。事

件，表示觸發計時器控件時執行的操作。

9、VisualBasic根據計算機訪問文件的方式將文件分成3類，其中不包括（）。

A、順序文件

B、Unix文件

C、二進制文件

D、隨機文件

標準答案：B

知識點解析：本題考杳VB文件的分類。VB中根據文件的訪問形式分為順序文

件、隨機文件和二進制文件。

10、將E-R圖轉換到關系模式時，實體與聯系都可以表示成（）。

A、屬性

B、關系

C、記錄

D、碼

標準答案：B

知識點解析：E-R圖由實體、實體的屬性和實體之間的聯系3個要素組成，關系模

型的邏輯結構是一組關系模式的集合，將E-R圖轉換為關系模型：將實體、實體

的屬性和實體之間的聯系轉化為關系模式。如下表1所示。

表1EF模型與關系間的比較表

E-R模型關系E?R模型關系

屬性屬性實體集關系

實體元組聯系關系

11、假定有以下程序段：Fori=1To3Forj=5To1Step-1Print

i*jNextjNexti貝lj語句Printi*j的執行次藪是()。

A、15

B、16

C、17

D、18

標準答案：A

知識點解析：暫無解析

12、在窗體上畫兩個文本框(名稱分別為Textl和Text2)和一個命令按鈕(名稱為

Command1)?然后編寫如下事件過程：PrivateSubCommandl_Click()x=0Do

Whilex<50x=(x+2)*(x+3)n=n+lLoopTextl.Text=Str(n)Text2.Text=Str(x)End

Sub程序運行后，單擊命令按鈕，在兩個文本框中顯示的值分別為()。

A1和

、

B2和

、

c3和

、

和50

D4

、168

標準答案：B

知識點解析：在文本框中顯示的值即n,