家二級(jí)（VB）機(jī)試模擬試卷第1套

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

1、已知二叉樹后序遍歷序列是CDABE,中序遍歷序列是CADEB,它的前序遍歷

序列是（）。

A、ABCDE

B、ECABD

C、EACDB

D、CDEAB

標(biāo)準(zhǔn)答案：C

知識(shí)點(diǎn)解析：由于后序遍歷的最后一個(gè)元素為E,所以E為根結(jié)點(diǎn)，所以它的前序

遍歷的首個(gè)元素為E,故排除A和D選項(xiàng)。由于中序遍歷中，7t素B在元素根結(jié)

點(diǎn)E的后面，所以B為二叉樹的右子樹，并且該二叉樹右子樹只有一個(gè)元素，所

以前序遍歷的最后一個(gè)元素應(yīng)為B,故選項(xiàng)C為正確選項(xiàng)，即該二叉樹的前序遍

歷序列是EACDB。

2、命令按鈕Command］的單擊事件過程如下：PrivateSUbCommandl_Click()

Dima(10,10)AsIntegerx=0Fori=lTo3Forj=lTo3a(i,j)=i*2ModjIfx

A、I

B、2

C、3

D、4

標(biāo)準(zhǔn)答案：B

知識(shí)點(diǎn)解析：題目中定義了一個(gè)二維數(shù)組，為數(shù)組賦初值并找出這些值中最大的值

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

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

modl=0a(3,2)=3*2mod2=0a(3,3)=3*2mod3=0顯然最大值為2,因此Printx語(yǔ)

句將在窗體上顯示2。

3、關(guān)系數(shù)據(jù)庫(kù)管理系統(tǒng)能實(shí)現(xiàn)的專門關(guān)系運(yùn)算包括（）。

A、排序、索引、統(tǒng)計(jì)

B、選擇、投影、連接

C、關(guān)聯(lián)、更新、排序

D、顯不、打印、制表

標(biāo)準(zhǔn)答案：B

知識(shí)點(diǎn)解析：關(guān)系數(shù)據(jù)庫(kù)管理系統(tǒng)的專門關(guān)系運(yùn)算包括選擇運(yùn)算、投影運(yùn)算和連接

運(yùn)算。

4、窗體上有兩個(gè)名稱分別為Textl、Text2的文本框。Textl的KeyUp事件過程如

下：PrivateSubText1_KeyUp(KeyCodeAsInteger,ShiftAsInteger)DimcAs

Stringc=UCase(Chr(KeyCode))Text2.Text=Chr(Asc(c)4-2)EndSub當(dāng)向

文本框Textl中輸入小寫字母a時(shí)，文本框Text2中顯示的是()。

A、A

a

C、C

D、c

標(biāo)準(zhǔn)答案：C

知識(shí)點(diǎn)解析：KeyDown和KeyUp事件的KeyCode參數(shù)返回的是“鍵"，即按字母

和“a"時(shí)得到的KeyCode的值是相同的，都是&H41。因此程序中對(duì)輸入?yún)n時(shí)得

到的KeyCode,經(jīng)Chr函數(shù)轉(zhuǎn)為字符后為“A”，經(jīng)Ucase函數(shù)轉(zhuǎn)換仍為“A“，所以變

量c中的字符為“A”。Asc(c)將返回變量c中的第一個(gè)字符的ASCH,加2后，再由

Chr函數(shù)轉(zhuǎn)為字符即為”A“后面的第2個(gè)字符，即所以答案應(yīng)為選項(xiàng)C。

5、在窗體Forml上放一個(gè)名為Texll的文本框和一個(gè)名為Command1的命令按

鈕，然后編寫一個(gè)事件過程。要求程序運(yùn)行后，如果在文本框中輸入一個(gè)字符，則

把命令按鈕的標(biāo)題設(shè)置為“VB等級(jí)考試二級(jí)”。以下能正確實(shí)現(xiàn)上述操作的事件過

程是()。

A、PrivateSubTextl_Change()Command1.Caption=MVB等級(jí)考試二級(jí)"EndSub

B、PrivateSubCommandl_Click()Caption="VB等級(jí)考試二級(jí)"EndSub

C、PrivateSubForml_Click()Textl.Caption="VB等級(jí)考試二級(jí)"EndSub

D、PrivateSubCommandl_Click()Textl.Text=”VB等級(jí)考試二級(jí)"EndSub

標(biāo)準(zhǔn)答案：A

知識(shí)點(diǎn)解析：本題考查文本框的事件。文本框的Click事件是單擊文本框時(shí)觸發(fā)

的，Change事件是每次文本框中文本發(fā)生改變時(shí)都觸發(fā)的事件。題中要求當(dāng)文本

框的字符改變以后實(shí)現(xiàn)要求，因此應(yīng)通過文本框的Change事件更改Command1的

caption屬性。

6、在用Open語(yǔ)句打開文件時(shí)，如果省略“For方式”，則打開的文件的存取方式是

()。

A、順序輸入方式

B、順序輸出方式

C、隨機(jī)存取方式

D、二進(jìn)制方式

標(biāo)準(zhǔn)答案：C

知識(shí)點(diǎn)解析：Open語(yǔ)句打開文件時(shí)的格式為：Open文件說明［For方式^Access存

取類型鎖定］As［#］文件號(hào)［Len=記錄長(zhǎng)度］其中，“方式”可以是：Oulpul指定順序輸

出方式、Inpul指定順序輸入方式、Append指定順序輸出方式，它與Outpul不同的

是，當(dāng)用Append方式打開文件時(shí)，，文件指針被定位在文件末尾，如果文件執(zhí)行寫

操作，則寫入的數(shù)據(jù)附加在原來文件的后面。Random指定隨機(jī)存取方式，也是默

認(rèn)方式。

7、在窗體上畫一個(gè)命令按鈕，名稱為Command］，然后編寫如卜代碼：Oplion

Base0PrivateSubCommandl_Click()DimA1(4)AsInteger,A2(4)AsInteger

Fork=0To2Al(k+l)=InputBox("請(qǐng)輸入一個(gè)整數(shù)”)A2(3—k)

=Al(k+l)NextkPrintA2(k)EndSub程序運(yùn)行后，單擊命令按鈕，在輸

入對(duì)話框中依次輸入2、4、6,則輸出結(jié)果為()。

A、0

B、I

C、2

D、3

標(biāo)準(zhǔn)答案：C

知識(shí)點(diǎn)解析：程序運(yùn)行過程如下：k=0,輸入2,Al(k4-1)=A1(O+1)=A1(1)=

2,A2(3—k)=A2(3—0)=A2(3)=2k=l,輸入4,Al(k+1)=AI(1+1)=A1(2)=

4,A2(3—k)=A2(3—l)=A2(2)=4k=2,輸入6,Al(k+1)=AI(2+1)=A1(3)=

6,A2(3-k)=A2(3-2)=A2(l)=6k=3,For循環(huán)結(jié)束，輸出A2(k)的值即A2(3)

的值，即2。

8、在窗體上有一個(gè)名稱為Drivel的驅(qū)動(dòng)器列表框，一個(gè)名稱為Dirl的目錄列表

框，一個(gè)名稱為Filel的文件列表框，兩個(gè)名稱分別為L(zhǎng)abell、Label2的標(biāo)簽(標(biāo)題

分別為空白和''共有文件要使得驅(qū)動(dòng)器列表框與目耒列表框、目錄列表框與文

件列表框同步變化，并且在標(biāo)簽Labell中顯示當(dāng)前文件夾中文件的數(shù)量。下列能

夠正確實(shí)現(xiàn)上述功能的程序是()。

A、PrivateSubDirl_change()Filel.Path=Dirl.PathEndSubPrivateSub

Drivel_Change()Dirl.Path=Drive1.DriveLabel1.Caption=File1.ListCountEnd

Sub

B、PrivateSubDirl_Change()File1.Path=Dirl.PathEndSubPrivateSub

DriveI_Change()Dirl.Path=Drivel.DriveLabel1.Caption=File1.ListEndSub

C^PrivateSubDirlchange()Filel.Path=Dirl.PathLabe)1.Caption=File

1.ListCountEndSubPrivateSubDrivcl_changc()Dirl.Path=Drive1.Drive

Labell.Caption=Filel.ListCountEndSub

D^PrivateSubDirl_Change()Fiiel.Path=Dirl.PathLabell.Caption=Filel.List

EndSubPrivateSUbDrivcl_Changc()Dirl.Path=DrivcI.DriveLabel

I.Caption=File1.ListEndSub

標(biāo)準(zhǔn)答案：C

知識(shí)點(diǎn)解析：考查文件系統(tǒng)控件。要使驅(qū)動(dòng)器、目錄和文件列表框同步顯示，那么

就需要編寫代碼才能使它們之間彼此同步，在驅(qū)動(dòng)器Drivel的Change事件中，要

Dirl.Path=Drivel.Drive,使目錄的路徑和驅(qū)動(dòng)器一致,同時(shí)在目錄Dirl的

Change事件中要Filel.Path=Dirl.Path,使文件路杼的位置和驅(qū)動(dòng)器一致c可以

在文件列表框中使用ListCounl屬性來統(tǒng)計(jì)文件數(shù)目(當(dāng)文件路徑改變時(shí)統(tǒng)計(jì))。

9、一個(gè)教師可講授多門課程，一門課程可由多個(gè)教師講授。則實(shí)體教師和課程間

的聯(lián)系是()。

Asi：1聯(lián)系

B、1：m聯(lián)系

C、m：1聯(lián)系

D>m：n聯(lián)系

標(biāo)準(zhǔn)答案：D

知識(shí)點(diǎn)解析：因?yàn)橐粋€(gè)教師可講授多門課程，而一門課程又能由多個(gè)老師講授所以

他們之間是多對(duì)多的關(guān)系，可以表示為m：n。

10、窗體的左右兩端各有1條直線，名稱分別為L(zhǎng)inel、Line2；名稱為Shapel的

圓靠在左邊的Linel直線上（見圖）；另有1個(gè)名稱為Timerl的計(jì)時(shí)器控件，其

匕nabled屬性值是True。要求程序運(yùn)行后，圓每秒向右移動(dòng)100,當(dāng)圓遇到Line2

UForml三叵口、

HL，|

時(shí)則停止移動(dòng)。為實(shí)現(xiàn)上述功能，某人把計(jì)

時(shí)器的Interval屬性設(shè)置為1000,并編寫了如下程序：PrivateSubTimerl_Timer（）

Fork=Linel.XIToLine2.XIStep100IfShapel.Left+Shapcl.Width

A、把計(jì)時(shí)器的Interval屬性設(shè)置為I

B、把Fork=IAnel.XIToLine2.X1Step100和Nextk兩行刪除

C、把Fork=Lincl.XIToLine2.XIStep100改為Fork=Linc2.XIToLincl.XI

Step100

D、把IfShapel.Left+Shapel.Width

標(biāo)準(zhǔn)答案：B

知識(shí)點(diǎn)解析：在計(jì)時(shí)器事件中不應(yīng)再設(shè)置步長(zhǎng)為100的For循環(huán)，應(yīng)該把For循環(huán)

去掉，只留下循環(huán)體的語(yǔ)句，計(jì)時(shí)器每秒激發(fā)一次，每次判斷小球是否移到Line2

處，不到就改變自己的Left值即繼續(xù)移動(dòng)。因此B正確。

II、關(guān)于Keypress事件，以下敘述中正確的是（）。

A、在控件數(shù)組的控件上按鍵盤鍵，不能觸發(fā)KeyPress事件

B、按下鍵盤上任一個(gè)鍵時(shí)，都能觸發(fā)KeyPress事件

C、按字母鍵時(shí)，擁有焦點(diǎn)的控件的KeyPress事件會(huì)被觸發(fā)

D、窗體沒有KeyPress事件

標(biāo)準(zhǔn)答案：C

知識(shí)點(diǎn)解析：A選項(xiàng)錯(cuò)誤原因：在控件數(shù)組的任何控件上按鍵盤鍵，會(huì)觸發(fā)

KeyPress事件；B選項(xiàng)錯(cuò)誤原因：只有按鍵盤上的ASCH字符鍵時(shí)，才能觸發(fā)

KeyPress事件。ASCH字符鍵包括標(biāo)準(zhǔn)鍵盤上的字符、數(shù)字、標(biāo)點(diǎn)符號(hào)、<：

Enter>,和鍵等，其他鍵KeyPress事件不能識(shí)別。D選項(xiàng)錯(cuò)誤原因：窗體也有

KeyPresss事件。故C選項(xiàng)正確。

12、設(shè)窗體上有一個(gè)通用對(duì)話框控件CDI,希望在執(zhí)行下面程序時(shí)，打開如圖所示

的文件對(duì)話框：PrivateSubCommand!—Click()CD1.DialogTit1e="打開文件”

CD1.CitDir="C：”CDLFilter="所有文件I*.*IWord文檔I*.docI文本文

件I*.txt"CD1,件eName=""CDLAction=lIfCD1.FileName=""ThenPrint"未打

開文件”ElsePrint"要打開文件”&CD1.FileNameEndIfEndSub

一x.M：工―二網(wǎng)即”用

-ET

.」2

-3廠商9I

文件?中際7NF“1

rUM金方xn弄

但實(shí)際顯示的的對(duì)話框列出了C：

\下的所有的文件盒文件夾，“義件類型”一欄中顯示的是“所有文件”。下面的改正

方案中正確的是（）

A、把CD1.Actio11=l改為CD1.Action=2

B、把"CDI.Filter="后面字符串中的“所有文件”改為“文本文件”

C、在語(yǔ)句CDLActiom=l的前面添加：CDI.Filtcrlndcx=3

D、把CDI.FileName=""改為CDI.FileName="文本文件”

標(biāo)準(zhǔn)答案：C

知識(shí)點(diǎn)解析：在通用對(duì)堵框控件中，F(xiàn)ilter屬性指定了在對(duì)話框中顯示的文件類

型，該屬性可以設(shè)置多個(gè)文件類型，每種文件類型由文件描述和文件通配符與擴(kuò)展

名組成，并由“I”隔開.Filterindex屬性用來指定默認(rèn)的過濾器，F(xiàn)ilter屬性中設(shè)置

了多個(gè)過濾器后，每個(gè)過濾器的對(duì)應(yīng)的能按從左到右順序是1、2...,Fihcrlndcx屬

性默認(rèn)為1,即第一個(gè)過濾器，因此程序中會(huì)顯示：C\下的所有文件。應(yīng)該在通

活框打開之前（CDI.Actions之前）添加CDI.Fliterlndex=3,即使默認(rèn)過濾器為第

3個(gè)過濾器。

13、語(yǔ)句DimAir（-2To4）.AsInteger所定義的數(shù)組的元素個(gè)數(shù)為（）。

A7個(gè)

、

B6個(gè)

、

c5個(gè)

、

D4個(gè)

、

標(biāo)準(zhǔn)答案：A

知識(shí)點(diǎn)解析：本題是定義了一個(gè)一維數(shù)組，下標(biāo)是一2lo4,所以數(shù)組元素的個(gè)數(shù)

是4一（一2）+1=7,故選A。

14>設(shè)a=10,b=5,c=l,執(zhí)行語(yǔ)句Printa>b>c后，窗體上顯示的是（）。

A、True

B、False

C、11

D、出錯(cuò)

標(biāo)準(zhǔn)答案：B

知識(shí)點(diǎn)解析：本題中Pnnt語(yǔ)句中的表達(dá)式只有運(yùn)算符，相同優(yōu)先級(jí)，左結(jié)合。

先計(jì)算a>b,即105,值為True,（即一1）,再計(jì)算一1>1,結(jié)果為False。故B選

項(xiàng)正確。

15、為了使命令按鈕的Picture、DownPicture或DisabledPicture屬性生效,必須把

它的Slyle屬性設(shè)置為（）o

A、0

B、1

C、True

D、False

標(biāo)準(zhǔn)答案：B

知識(shí)點(diǎn)解析：為了使命令按鈕的Picture>DownPicture或DisablePicture屬性生效，

必須把Style屬性設(shè)置為1（圖形格式），否則設(shè)置的圖片無效。

16^某人編寫了向隨機(jī)文件中寫一條記錄的程序，代碼如下：TypeRTvpcName

AsString*10TelAsString*20EndTypePrivateSubCommandI_Click（）DimPAs

RTypeP.Name=InputBox（“姓名”）P.Tel=InputBox（“電話號(hào)”）

Opcn^Books.datt4ForRandomAs#lPut#l,,PQose#lEndSub該程序運(yùn)行時(shí)有錯(cuò)

誤，修改的方法是（）。

A、在類型定義“TypeRType”之前力口上“Private”

B、DimPAsRType必須置于窗體模塊的聲明部分

C、應(yīng)把Open語(yǔ)句中的ForRandom改為ForOutput

D、Put語(yǔ)句應(yīng)該寫為Pul#l,P.Name,P.Tel

標(biāo)準(zhǔn)答案：A

知識(shí)點(diǎn)解析：記錄類型的定義必須放在模塊的聲明部分，當(dāng)在標(biāo)準(zhǔn)模塊中定義時(shí)，

關(guān)鍵字Type前可以有Public（默認(rèn)）或Private,而如果在窗體模塊中定義，則必須

在前面加上關(guān)鍵字PrivateoOpen語(yǔ)句中使用ForRandom表示文件以隨機(jī)方式存

取。Pul語(yǔ)句的語(yǔ)法為：Pul#文件號(hào)，［記錄號(hào)］,變量。其中“變量”是除對(duì)象變量和

數(shù)組變量外的任何變量。

17、窗體上有名稱為Commandl的命令按鈕,名稱分別為L(zhǎng)abell、Label2>Labcl3

的標(biāo)簽。編寫如下程序：PrivatexAsIntegerPrivateSubCommandl_Click（）

StaticyAsIntegerDimzAsIntegern=5z=z+ny=y+nx

=x+yLabel!=xLabel2=yLabel3=zEndSub運(yùn)行程序，連續(xù)3次

單擊命令按鈕后，3個(gè)標(biāo)簽中分別顯示的是()。

A、555

B、15105

C、151515

D、30155

標(biāo)準(zhǔn)答案：D

知識(shí)點(diǎn)解析：變量x被定義為窗體模塊變量，它在整個(gè)窗體模塊中有效。Click事

件中變量y定義為Static,即靜態(tài)變量，它的值在每調(diào)用過程時(shí)都會(huì)保留上次的

值。每次電擊按鈕標(biāo)簽中顯示的值即x、y、z的值是：第一次，n=5,z=z+n=

0+5=5,y=y+n=0+5=5,x=x+y=O+5=5；第二次，n=5,z=z+n=0+

5=5,y=y+n=5+5=10,x=x+y=5+10=15；第三次，n=5,z=z+n=0+

5=5,y=y+n=10+5=15,x=x+y=15+15=30；因此3次單擊命令按鈕后，

3個(gè)標(biāo)簽中分別顯示的是30155o

18、已知：x=-6y=39則表達(dá)式“y\x*Sgn(x)”的值為()。

A、-6.5

B、-6

C、6

D、6.5

標(biāo)準(zhǔn)答案：C

知識(shí)點(diǎn)解析：本題按運(yùn)算符從高到低優(yōu)先級(jí)計(jì)算：*(\,所以應(yīng)該是39\(一

6)*Sgn(-6)(39\(-6){(-1)-(39\6(6,故選Co

19、某二義樹中共有350個(gè)結(jié)點(diǎn)，其中200個(gè)為葉子結(jié)點(diǎn)，則該二叉樹中度為2的

結(jié)點(diǎn)數(shù)為()。

A、不可能有這樣的二叉樹

R、150

C、199

D、149

標(biāo)準(zhǔn)答案：A

知識(shí)點(diǎn)解析：在樹結(jié)構(gòu)中，一個(gè)結(jié)點(diǎn)所擁有的后件個(gè)數(shù)稱為該結(jié)點(diǎn)的度。對(duì)任何一

棵二叉樹，度為0的結(jié)點(diǎn)(即葉子結(jié)點(diǎn))總是比度為2的結(jié)點(diǎn)多一個(gè)。二叉樹中有

350個(gè)結(jié)點(diǎn)，葉子結(jié)點(diǎn)個(gè)數(shù)為200,設(shè)度為1的結(jié)點(diǎn)個(gè)數(shù)為nl,度為2的結(jié)點(diǎn)個(gè)數(shù)

為n2。n2=n0—1=199,n1=350—200—199=一49,顯然節(jié)點(diǎn)個(gè)數(shù)不可能為負(fù)

數(shù)，所以這樣的二叉樹是不存在的。故A選項(xiàng)正確。

20、公司中有多個(gè)部門和多名職員，每個(gè)職員只能屬于一個(gè)部門，一個(gè)部門可以有

多名職員。則實(shí)體部門和職員間的聯(lián)系是

A>1：1聯(lián)系

B>m：1聯(lián)系

C、1：m聯(lián)系

D、m：n聯(lián)系

標(biāo)準(zhǔn)答案：C

知識(shí)點(diǎn)解析：兩個(gè)實(shí)體集間的聯(lián)系實(shí)際上是實(shí)體集間的函數(shù)關(guān)系，主要有一對(duì)一聯(lián)

系（1:1）、一對(duì)多聯(lián)系（l:m）、多對(duì)一聯(lián)系（m:l）、多對(duì)多聯(lián)系（m:n）。對(duì)于

每一個(gè)實(shí)體部門，都有多名職員，則其對(duì)應(yīng)的聯(lián)系為一對(duì)多聯(lián)系（l:m）,答案選

Co

21、某系統(tǒng)結(jié)構(gòu)圖如下圖所示（nN5）該

系統(tǒng)結(jié)構(gòu)圖的最大扇出數(shù)是（）。

A、n

B、3

C、2

D、n+1

標(biāo)準(zhǔn)答案：A

知識(shí)點(diǎn)解析：模塊的扇出是指本模塊的直屬下層模塊的個(gè)數(shù)，或者說是由一個(gè)模塊

直接調(diào)用的其他模塊數(shù)。題干中某系統(tǒng)為一個(gè)模塊，其扇出數(shù)目為n（佗5）,功能2

模塊扇出數(shù)為3,功能n模塊扇出數(shù)為2,則該系統(tǒng)結(jié)構(gòu)圖的最大扇出數(shù)是n。故

本題答案為A選項(xiàng)。

22、窗體上有一個(gè)名稱為Command1的命令按鈕，其單擊事件過程及相關(guān)的代碼

如下：PrivateSubCommandl_Click（）DimxAsInteger,yAsIntegerx=

Val（InputBox（"輸入整數(shù)"））y=Val（InputBox（"輸入整數(shù)"））PrintStr（fun（x,y）+x+y）

EndSubPrivateFunctionfun（ByRefmAsInteger,ByVainAsInteger）m=m*inn=n

+nfun=m+nEndFunction運(yùn)行程序，單擊命令按鈕時(shí)，出現(xiàn)輸入對(duì)話框，分別輸

入3、5,則窗體上顯示的是

A、27

B、28

C、33

D、38

標(biāo)準(zhǔn)答案：C

知識(shí)點(diǎn)解析：函數(shù)fun執(zhí)行后，x值被改變，y值不變。即x=9,y=5：計(jì)算得結(jié)果

為33,選C）o

23、順序文件在一次打開期間（）。

A、只能讀，不能寫

B、只能寫，不能讀

C、既可讀，又可寫

D、或者只讀，或者只寫

標(biāo)準(zhǔn)答案：D

知識(shí)點(diǎn)解析：順序文件的讀寫是由Open語(yǔ)句的打開模式?jīng)Q定。用Output模式打

開，則可對(duì)順序文件進(jìn)行寫操作；用Input模式打開，可對(duì)順序文件進(jìn)行讀操作；

用Append模式打開，可將數(shù)據(jù)追加到文件尾部。打開一次期間，只能讀，或只能

寫，不能同時(shí)進(jìn)行讀寫操作。但隨機(jī)文件和二進(jìn)制文件打開以后可以同時(shí)進(jìn)行讀寫

操作。故D選項(xiàng)正確。

24文件d:\city.txt的內(nèi)容如下：BeiJingTianjinShangHaiChongQing編寫如下事

件過程：PrivateSubForm_Click()DimInDOpen"d:\city.txt"ForInputAs#1Do

WhileNotEOF(1)LineInput#1,InDLoopCloseIPrintInDEndSub運(yùn)行程序，單擊

窗體，輸出結(jié)果是

A、文件city.txt的全部?jī)?nèi)容

B、BeiJing

C、ChongQing

D、空白

標(biāo)準(zhǔn)答案：C

知識(shí)點(diǎn)解析：#1文件以讀操作的方式打開。在文件結(jié)尾的部分退出。退出時(shí)InD

內(nèi)存儲(chǔ)的內(nèi)容是ChongQing,打印的內(nèi)容就是ChongQing,選D)。

25、以下程序段的功能是()。x=8.6y=Int(x+0.5)Printy

A、輸出y的絕對(duì)值

B、實(shí)現(xiàn)x的四舍五入

C、實(shí)現(xiàn)x的絕對(duì)值

D、實(shí)現(xiàn)y的四舍五入

標(biāo)準(zhǔn)答案：R

知識(shí)點(diǎn)解析：本題考查函數(shù)Int的功能，Int(x)的作用是取不大于x的最小的整數(shù)，

可以實(shí)現(xiàn)數(shù)據(jù)的四舍五入。

26、能正確表述"x為大于等于5并且小于20的數(shù)"的VisualBasic表達(dá)式是

A、x>=5Andx<20

B、x>=5Orx<20

C^5<=x<20

D、5<=X<=20

標(biāo)準(zhǔn)答案：A

知識(shí)點(diǎn)解析：選項(xiàng)B表述的是x為大于等于5或者小于20的數(shù)，不符題意；選項(xiàng)

C、選項(xiàng)D的表達(dá)式不符合VB的邏輯表達(dá)式方式，是錯(cuò)誤的。

27、VisualBasic根據(jù)計(jì)算機(jī)訪問文件的方式將文件分成3類，其中不包括()。

A、順序文件

B、Unix文件

C、二進(jìn)制文件

D、隨機(jī)文件

標(biāo)準(zhǔn)答案：B

知識(shí)點(diǎn)解析：本題考查VB文件的分類。VB中根據(jù)文件的訪問形式分為順序文

件、隨機(jī)文件和二進(jìn)制文件。

28、有如卜程序代碼：PrivateSubForm_Click()DimSumAsIntegerSum=0While

Sum<=20Sum=Sum+1WendPrintSumEndSub退行程序，單擊窗體，輸出結(jié)果

是

A、19

B、20

C、21

D、22

標(biāo)準(zhǔn)答案：C

知識(shí)點(diǎn)解析：While循環(huán)只有在“條件”為真(True)的情況下執(zhí)行循環(huán)體。如果條

件從一開始不成立，則一次循環(huán)也不執(zhí)行。本題程序運(yùn)行時(shí)，sum=0,符合條件

sum<=20,執(zhí)行循環(huán)體,sum=0+l=l；當(dāng)sum=l時(shí),sum<=20,繼續(xù)執(zhí)行循環(huán)體,

sum=2；如此卜去，當(dāng)sum=20時(shí)，sum<=20,執(zhí)彳j該循環(huán)體后，sum=21,不再符

合循環(huán)執(zhí)行條件，退出循環(huán)。故本題正確答案為C

29、在列表框或組合框中，能夠表示當(dāng)前被選中列表項(xiàng)序號(hào)的是

A、Listindex

B、Index

C>TopIndex

D、List

標(biāo)準(zhǔn)答案：A

知識(shí)點(diǎn)解析：列表框或組合框中.LiMndex屬件用于設(shè)置或返I國(guó)當(dāng)前被選擇項(xiàng)目

的索引號(hào)；List屬性用夾列出或設(shè)置列表項(xiàng)的內(nèi)容,故正確答案為選項(xiàng)A。

30、以下敘述中錯(cuò)誤的是

A、程序運(yùn)行過程中，可以利用代碼重新設(shè)置菜單項(xiàng)的Visible屬性的值

B、在菜單標(biāo)題中，由所引導(dǎo)的字母指明了訪問該菜單項(xiàng)的訪問鍵

C、在同一窗體的菜單項(xiàng)中，不允許出現(xiàn)標(biāo)題相同的菜單項(xiàng)

D、彈出式菜單也在菜單編輯器中進(jìn)行設(shè)計(jì)

標(biāo)準(zhǔn)答案：C

知識(shí)點(diǎn)解析：選項(xiàng)C中,同一窗體的菜單項(xiàng),是“名稱”不能相同,即“name”屬性不

能相同，但”caption”標(biāo)題屬性可以相同。故正確答案為選項(xiàng)C。

31、下列與隊(duì)列結(jié)構(gòu)有關(guān)聯(lián)的是

A、函數(shù)的遞歸調(diào)用

B、數(shù)組元素的引用

C、多重循環(huán)的執(zhí)行

D、先到先服務(wù)的作業(yè)調(diào)度

標(biāo)準(zhǔn)答案：D

知識(shí)點(diǎn)解析：隊(duì)列的修改是依先進(jìn)先出的原則進(jìn)行的，D正確。

32、設(shè)有如下的程序段：s=Oi=1Whilei<=10s=s+iWendPrints以上程序段

的執(zhí)行結(jié)果是

A、輸出55

B、輸出56

C、死循環(huán)，直到溢出

D、輸出無窮大的數(shù)

標(biāo)準(zhǔn)答案：C

知識(shí)點(diǎn)解析：i=l,循環(huán)條件1<10,s=O+l；下次循環(huán)i的值仍為1,繼續(xù)執(zhí)行；

以此類推，無論執(zhí)行多少次，變量i的值都沒有發(fā)生改變，循環(huán)條件i<=10總是滿

足即“條件”永遠(yuǎn)為真，程序?qū)⒉煌５刂貜?fù)執(zhí)行循環(huán)體，造成“死循環(huán)”，故正確答案

為C選項(xiàng)。

33、以下不屬于VisualBasic數(shù)據(jù)文件的是

A、順序文件

B、隨機(jī)文件

C、數(shù)據(jù)庫(kù)文件

D、二進(jìn)制文件

標(biāo)準(zhǔn)答案：C

知識(shí)點(diǎn)解析：可以從不同的角度對(duì)文件進(jìn)行分類：按照文件的內(nèi)容，可分成程序文

件和數(shù)據(jù)文件；按照文件存儲(chǔ)信息的形式，可分為ASCII文件和二進(jìn)制文件；按

照文件的組織形式，可分成順序文件和隨機(jī)文件；按照存儲(chǔ)介質(zhì)，又可以分為光盤

文件、磁盤文件、磁帶文件、打印文件等。

34、設(shè)數(shù)據(jù)集合為D={1,3,579),D上的關(guān)系為R,下列數(shù)據(jù)結(jié)構(gòu)B=(D,R)

中為非線性結(jié)構(gòu)的是

A、R={(5,1),(7,9),(1,7),(9,3)}

B、R={(9,7),(1,3),(7,1),(3,5))

C、R={(1,9),(9,7),(7,5),(5,3)}

D、R={(1,3),(3,5),(5,9))

標(biāo)準(zhǔn)答案：D

知識(shí)點(diǎn)解析：一個(gè)非空的數(shù)據(jù)結(jié)構(gòu)如果滿足以下兩個(gè)條件：有且只有一個(gè)根結(jié)點(diǎn)；

每一個(gè)結(jié)點(diǎn)最多有一個(gè)前件，也最多有一個(gè)后件，則稱為線性結(jié)構(gòu)，在數(shù)據(jù)結(jié)構(gòu)中

習(xí)慣稱為線性表。A選項(xiàng)中，5為根結(jié)點(diǎn)，線性表為51793。B選項(xiàng)中，9為根結(jié)

點(diǎn)，線性表為97135。C選項(xiàng)中，1為根結(jié)點(diǎn)，線性表為19753。D選項(xiàng)，結(jié)點(diǎn)1與

7都是根結(jié)點(diǎn)，屬于非線性結(jié)構(gòu)，故D選項(xiàng)正確。

35、在黑盒測(cè)試方法中，設(shè)計(jì)測(cè)試用例的主要根據(jù)是()。

A、程序內(nèi)部邏輯

B、程序外部功能

C、程序數(shù)據(jù)結(jié)構(gòu)

D、程序流程圖

標(biāo)準(zhǔn)答案：B

知識(shí)點(diǎn)解析：黑盒測(cè)試是對(duì)軟件已經(jīng)實(shí)現(xiàn)的功能是否滿足需求進(jìn)行測(cè)試和驗(yàn)證，黑

盒測(cè)試完全不考慮程序內(nèi)部的邏輯結(jié)構(gòu)和內(nèi)部特性，只根據(jù)程序的需求和功能規(guī)格

說明，檢查程序的功能是否符合它的功能說明，所以本題選擇B

36、計(jì)算下面分段函數(shù)的正確語(yǔ)句是()。"I

A、y=IIf(x>0,x+1,IIf(x<0,x-1,0))

B、y=IIf(x=0,0,IIf(x>0,x—1,x4-1))

C、y=IIf(x>0,x+l,Hf(x<0,0,x-l))

D、y=IIf(x=0,0,x-1,x+1)

標(biāo)準(zhǔn)答案：A

知識(shí)點(diǎn)解析：HF是條件函數(shù)，它的語(yǔ)法格式是：Hf(〈條件表達(dá)式〉，〈表達(dá)式為

True時(shí)的取值〉，〈表達(dá)式為False時(shí)的取值〉)B選項(xiàng)中，內(nèi)層的HF函數(shù)中，當(dāng)

x>0時(shí)，x+1,否則x-l,所以應(yīng)該是IIf(x>0,x+1,x-l)oC選項(xiàng)中，內(nèi)層的

Hf函數(shù)中,當(dāng)xvO時(shí)，x-1,否則0,所以應(yīng)該是Hf(x<0,x-l,0)oD選項(xiàng)中Ilf

函數(shù)中有4個(gè)參數(shù)不對(duì)，應(yīng)該有3個(gè)參數(shù)。故B、C、D選項(xiàng)均錯(cuò)誤，A選項(xiàng)正

確。

37、編寫如下程序：PrivateSubCommandl_Click()DimiAsInteger,jAs

Integern=lnputBox("輸入一個(gè)大于1的正整數(shù)")Fori=2Ton

Forj=2ToSqr(i)IfiModj=0ThenExitForNextj

Ifj>Sqr(i)ThenPrintiNextiEndSub該程序的功能是()。

A、判斷n是否為素?cái)?shù)

B、輸出n以內(nèi)所有的奇數(shù)

C、輸出n以內(nèi)所有的偶數(shù)

D、輸出n以內(nèi)所有的素?cái)?shù)

標(biāo)準(zhǔn)答案：D

知識(shí)點(diǎn)解析：假設(shè)輸入2、4、9進(jìn)行驗(yàn)證，輸入2時(shí)程序會(huì)輸出2,輸入4時(shí)，程

序會(huì)輸出2、3,可見程序不是判斷n是否為素?cái)?shù)，所以A不對(duì)。由前面驗(yàn)證可

知，程序也不是輸出n以內(nèi)的所以奇數(shù)或偶數(shù)，所以B、C也不對(duì)。如果輸入9

時(shí)，程序會(huì)輸出2、3、5、7,說明程序是輸出n以內(nèi)的所有素?cái)?shù)，所以D正確。

38、窗體上有一個(gè)名稱為Command1的命令按鈕，編寫如下事件過程：Private

SubCommandI_Click()i=0DoWhilei<6Forj=1Toin=n+1Nexti=i+1Loop

PrintnEndSub運(yùn)行程序，單擊命令按鈕時(shí)，窗體上顯示的是

A、10

B、15

C、16

D、21

標(biāo)準(zhǔn)答案：B

知識(shí)點(diǎn)解析：For循環(huán)中n從1累加到i。D。While循環(huán)由循環(huán)變量i控制一共執(zhí)行

6次。選B）。

39、設(shè)x是整型變量，與函數(shù)nf（x>0,-x,x）有相同結(jié)果的代數(shù)式是（）。

A、|x|

B、一岡

C、x

D、—x

標(biāo)準(zhǔn)答案：B

知識(shí)點(diǎn)解析：IIF函數(shù)是條件函數(shù)，本題的含義是如果x>0條件成立，即x為E

數(shù)，就返回一x,即x的負(fù)數(shù)，否則返回x（它本身），兩種情況都是返回負(fù)數(shù)。根據(jù)

這一點(diǎn)，選項(xiàng)B符合要求。故B選項(xiàng)正確。

40、下列針對(duì)框架控件的敘述中，錯(cuò)誤的是（）。

A、框架是一個(gè)容器控件

B、框架也有Click和DblClick事件

C、框架也可以接受用戶的輸入

D、使用框架的主要目的是為了對(duì)控件進(jìn)行分組

標(biāo)準(zhǔn)答案：C

知識(shí)點(diǎn)解析：框架是一個(gè)容器控件，用于將屏幕上的對(duì)象分組?？蚣艹Ｓ玫氖录?/p>

Click和DblClick,它不接受用戶輸入，不能顯示文本和圖形，也不能與圖形相

連。

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

請(qǐng)根據(jù)以下各小題的要求設(shè)計(jì)VisualBasic應(yīng)用程序（包括界面和代碼）。

41、在名稱為Forml的窗體上畫一個(gè)名稱為CD1的通用對(duì)?話框，通過屬性窗口設(shè)

置CD1的初始路徑為C\,默認(rèn)的文件名為None,標(biāo)題為“保存等級(jí)考試”，如

?！ㄌ?hào)續(xù)態(tài)或

何枳EB-F）三］.電d0?

usmr?■SOCMM

UI

QlHKAi2

，二Pr.,Filmict

J-e?m

OW

jTDBWStul

劉似精738c

ren

3rrni

胃口因

(?)nuie

叉胃名,Hi-[GR]

.egI--------------3I

____________________

圖2所示。圖2注意:

存盤時(shí)必須存放在考生文件央下，_￡程文件名為sj〔l.vbp,窗體文件名為

sjtl.frnio

標(biāo)準(zhǔn)答案：|操作步驟|步驟1：新建一個(gè)“標(biāo)準(zhǔn)。EXE”工程，選擇|工程］一［部件］命

令，在彈出的“部件”對(duì)話框的列表中選PWicroSoftCommonDiMogControl.0"

項(xiàng)目，單擊“確定”按鈕。步驟2：在窗體Forml上畫一個(gè)通用對(duì)話框，其相關(guān)屬

表12-7

屬性設(shè)?值

NameCDI

DialogTitJc保存等級(jí)考試

通用對(duì)話刖

FdcNameNone

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

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

存至考生文件夾中。

知識(shí)點(diǎn)解析：通用對(duì)話框的InitDir屬性用于為打開或另存為對(duì)話指定初始的目

錄，如果此屬性沒有指定，則使用當(dāng)前目錄。通用對(duì)話框的初始路徑由InitDir屬

性設(shè)置，默認(rèn)文件名由FileName屬性設(shè):置.，標(biāo)題由DialogTille屬性設(shè)置。

42、在名稱為Forml的窗體上設(shè)計(jì)一個(gè)菜單。要求在窗體上添加名為menu。，標(biāo)

題為“菜單命令”的主菜單，再添加兩個(gè)名稱分別為“mcnul"、“mcnu2”，標(biāo)題分別

為“不可用菜單項(xiàng)、'、"上一菜單項(xiàng)可用''的子菜單，并且使程序運(yùn)行時(shí)，mcnul子菜

單不可用，menu2子菜單已經(jīng)選中（運(yùn)行時(shí)的效果如圖3所示）。

?For?1回區(qū)

榮I

.上一mwr常

圖3再編寫適當(dāng)?shù)氖录^程，使得程序運(yùn)行時(shí)，單擊“上一

菜單項(xiàng)可用”，則“不可用菜單項(xiàng)”變?yōu)楹谏捎茫?。要求程序中不得使用變量，且?/p>

有一條語(yǔ)句。注意：存盤時(shí)必須存放在考生文件夾卜，工程文件名為sii2.vbp,

窗體文件名為sit2.Frir.o

標(biāo)準(zhǔn)答案：［操作步驟］步驟1：新建一個(gè)“標(biāo)準(zhǔn)EXE”工程，打開VB菜單設(shè)計(jì)器設(shè)

計(jì)菜單，各菜單項(xiàng)及屬性設(shè)置如表12—8所示。

?12-8

標(biāo)題名稱是否育效內(nèi)?符號(hào)

菜單命令menuO有效0

不可用菜單項(xiàng)menu!無效1

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

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

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

知識(shí)點(diǎn)解析：①VB中的菜單是通過菜單編輯器來設(shè)計(jì)的。菜單編輯器中的基本設(shè)

置項(xiàng)有：“標(biāo)題”項(xiàng)，對(duì)應(yīng)出現(xiàn)在菜單中的顯示內(nèi)容；“名稱”項(xiàng)，系統(tǒng)識(shí)別菜單項(xiàng)的

唯一關(guān)鍵字（不能重復(fù)）；“索引”項(xiàng)，用于設(shè)置菜單數(shù)組中各元素的索引號(hào)；“快捷

鍵''項(xiàng)，是一個(gè)下拉列表框，用于設(shè)置菜單項(xiàng)的快捷鍵；“幫助上下文”項(xiàng)，設(shè)置當(dāng)

鼠標(biāo)移動(dòng)到某菜單項(xiàng)上按＜F1＞鍵時(shí)顯示的幫助信息在幫助文件中的對(duì)應(yīng)位置；

Visible（可見）項(xiàng)，用于設(shè)置控件或菜單項(xiàng)在程序運(yùn)行時(shí)是否可見，值為True表示可

見，值為False表示不可見；Enabled（有效）項(xiàng)，用于設(shè)置控件或菜單項(xiàng)在程序運(yùn)行

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

輯按鈕區(qū)的七個(gè)按鈕可對(duì)菜單進(jìn)行添加、插入、刪除、提升（設(shè)置為上一級(jí)菜單）、

縮進(jìn)（設(shè)置為下一級(jí)菜單）、上移、下移等操作。②文本框的Text屬性用于設(shè)置或

返回其顯示的文本內(nèi)容。本題原程序設(shè)計(jì)思路：在“上一菜單項(xiàng)可用”命令的單擊

事件過程中，通過語(yǔ)句設(shè)置“不可用菜單項(xiàng)''命令的Enabled屬性值為True。

三、簡(jiǎn)單應(yīng)用題（本題共I題，每題1.0分，共1分C）

43、（1）考生文件夾中有工程文件sjt3.vbpo窗體上有一個(gè)名稱為L(zhǎng)abel1、抓題為

“標(biāo)簽控件”的標(biāo)簽；有一個(gè)名稱為Command］、標(biāo)題為“命令按鈕”的命令按鈕、單

擊上述兩控件中的任一控件，則在標(biāo)簽Label2中顯示所單擊控件的標(biāo)題內(nèi)容（標(biāo)題

內(nèi)容前添加“單擊”二字），下圖是單擊命令按鈕后的窗體外觀。請(qǐng)去掉程序中的注

釋符，把程序中的?改為正確的內(nèi)容。注意：考生不得修改窗

體文件中已經(jīng)存在的控件和程序，最后程序按原文件名存盤。（2）在考生文件天下

有一個(gè)工程文件sit4.vbp,其窗體上有一個(gè)由八個(gè)圖片框控件組成的控件數(shù)組、

兩個(gè)命令按鈕及一個(gè)計(jì)時(shí)器控件，如圖1所示。程序功能：將計(jì)時(shí)器控件設(shè)置為

每隔0.5秒觸發(fā)一次Timer事件。運(yùn)行程序時(shí)，只顯示下標(biāo)為0的圖片框控件數(shù)

組元素，其他圖片樁均不可見。單擊“開始”按鈕，數(shù)組中的每個(gè)圖片框自左至右依

次顯示，時(shí)間間隔為0.5秒，產(chǎn)生“月亮”從左向右移動(dòng)的效果，如圖2所示。月

亮移到右端后再?gòu)淖蠖酥匦麻_始。單擊"停止''按鈕，"月亮''停止移動(dòng)。要求：按

照題目要求設(shè)置控件屬性，去掉程序中的注釋符，把程序中的?改為止確的內(nèi)容。

注意：不能修改程序的其他部分和控件屬性，最后將修改后的文件按原文件名進(jìn)行

圖1

cF?rml?.■尸4乂口,

「一。一’:

||_____JLL]

存盤。圖2

標(biāo)準(zhǔn)答案：(1)步驟1：打開本題工程文件。步驟2：打開代碼編輯窗口，去掉程序

中的注釋符將問號(hào)改為正確的內(nèi)容。參考答案PrivateSubCommandl_Click()

CallShowName(Commandl)'將Command1控件傳入ShowNameEndSubPrivateSub

Labell_Click()CallShowName(Labell)，將Label控件傳入ShowNameEndSub

PrivateSubShowName(cAsControl)'兩者類型都為控件IfTypeOfcIs

CommandBLittonThenLabel2.Caplion="單擊"&Commandl.CaptionEndIfIf

TypeOfcIsLabelThenLabel.Caption="單擊"&Lab?1.CaptionEndIfEndSub步

驟3：調(diào)試并運(yùn)行程序，關(guān)閉程序后按題目要求存盤。(2)步驟I：打開本題工程文

件，將Timerl的Interval屬性設(shè)置為500。步驟2：打開代碼編輯窗口，去掉程序

中的注釋符將問號(hào)改為正確的內(nèi)容。參考答案PrivateSubForm_Load()

Picturel(O).Left=OPicturel(O).Top=100Fork=lTo7Piclurel(k).Visible=False當(dāng)

窗體裝載時(shí)，下標(biāo)為1?7的圖片都不顯示NextEndSubPrivateSub

Command1_C1ick()Timer!.Enabled=True'單擊Command1按鈕,Timer事件觸發(fā)

EndSubPrivateSubCommand2_Click()Timerl.Enabled二FalseEndSubPrivateSub

Timer!Timer（）StaticiAsIntegerPicturel（i）.Visible=Falsei=i+lIfi=8Then判斷圖片

是否執(zhí)行到最后一張i=0'重置i值EndIfPicturel（i）.Visible=TrueEndSub步驟3：

調(diào)試并運(yùn)行程序，關(guān)閉程序后按題目要求存盤。

知識(shí)點(diǎn)解析：（1）單擊兩個(gè)控件中的任一個(gè)，通過Call語(yǔ)句調(diào)用函數(shù)ShowName。實(shí)

現(xiàn)在標(biāo)簽Label2中顯示所單擊控件的標(biāo)題內(nèi)容，自定義函數(shù)ShowName。用于判斷

控件的類型，CommandButton表示命令按鈕，Label表示標(biāo)簽，如果變量C的控件

類型是Com-mandButton,那么Label2的Caption屬性設(shè)置為"單擊

"&Command1.Caption,顯示控件的標(biāo)題內(nèi)容。⑵首先將Timerl的Interval屬性

設(shè)置為500,使計(jì)時(shí)器控件設(shè)置為每隔0.5秒觸發(fā)一次。在FormJLoad事件過程

中，通過圖片框Visible屬性設(shè)置只顯示下標(biāo)為0的圖片框控件數(shù)組元素，其他下

標(biāo)為1?7的圖片框均不顯示。單擊“開始”按鈕，計(jì)時(shí)器的Enabled屬性設(shè)置為

True,TimcrLTimcr事件啟動(dòng)，運(yùn)用循環(huán)語(yǔ)句將數(shù)組中的每個(gè)圖片框自左向右依次

顯示，產(chǎn)生“月亮”從左向右移動(dòng)的效果，循環(huán)變量設(shè)置為局部變量Static,使“月

亮”移到右端后再?gòu)淖蠖酥匦麻_始。單擊“停止”按鈕，“月亮”停止移動(dòng)。

四、綜合應(yīng)用題（本題共1題，每題1.0分，共1分C）

44、在窗體卜建立二個(gè)菜單（名稱分別為Read、Cale和Save.標(biāo)題分別為“讀人數(shù)

據(jù)”、“計(jì)算并輸出“和“存盤”），然后添加一個(gè)文本框（名稱為Textl,可顯示多行，

ScrollBars屬性設(shè)置為2）（如圖所示）。程序運(yùn)行后，如果執(zhí)行“讀入數(shù)據(jù)”命令，則

讀入datainl.txt文件中的100個(gè)整數(shù)，放入一個(gè)數(shù)組中，數(shù)組的下界為1；如果單

擊”計(jì)算并輸出“按鈕，則把該數(shù)組中小于50的元素顯示在文本框中，求出它們的

和，并把所求得的和顯示在窗體上；如果單擊“存盤”按鈕，則將所求得的和存入考

生文件夾下的dataout.txt文件中。在考生文件夾下有一個(gè)工程文件sjt5.vbp。窗

體文件中的RcadDala過程可以把datainl.txl文件中的100個(gè)整數(shù)讀入Arr數(shù)組

中；而WriteData過程可以把指定的整數(shù)值寫到考生文件夾下指定的文件中（整數(shù)值

通過計(jì)算求得，文件名為dataout.txt）。注意：考生不得修改窗體文件中已經(jīng)存在

的程序。存盤時(shí)，工程文件名仍保存為sjt5.vbp,窗體文件名仍保存為

sjt5.frmo

標(biāo)準(zhǔn)答案：步驟1：打開本題工程文件，利用菜單設(shè)計(jì)器，按表3.108中的設(shè)置

建立菜單項(xiàng)，在窗體Foirnl中繪制一個(gè)文本框，其相關(guān)屬性值見表1和表2。

表1

標(biāo)題控件讀入數(shù)據(jù)計(jì)算并愉出存盤

名再ReadCalcSave

內(nèi)編符號(hào)000

表2

控件文本框

屬性NameMultiLineScrollBanText

設(shè)置值Text1TRUE2步驟2：分析并編寫程序代碼。程序

提供代碼OplionBase1DimArr(100)AsIntegerSubReadData()Open

ApP.Path&叭txt7,ForInputAs#lFori=lTol(X)Input#I,Arr(i)Nexti

Close#1EndSubSubWriteData(FilenameAsString,NumAsInteger)Open

App.Path&*\''&FihnamcForOutputAs#lPrint#1,NumClose#1EndSub程序結(jié)束

PrivateSubCaic_Crick()Textl.Text='"'Fori=lTo100IfArr(i)<50Then

Textl.Text=Textl.Text&Arr(i)&Space(5)sum=suiTi+Arr(i)EndIfNextiPrintsum

EndSubPrivateSubRead_Click()ReMDataEndSubPrivateSubSave_Click()

\"1"加口21或@12014.1乂『'.51101￡11(15111)步驟3：調(diào)試并運(yùn)行程序，關(guān)閉程序后按題

目要求存盤。

知識(shí)點(diǎn)解析：在“讀數(shù)”命令的Click事件過程中，通過調(diào)用ReadData過程將數(shù)據(jù)從

inS.txt文件讀人數(shù)組Arr(窗體變量)中；在“計(jì)算”命令的Click事件過程中，在

For循環(huán)語(yǔ)句(循環(huán)變量i的初值為1,終值為100)中依次將數(shù)組Arr中小于50的元

素的值顯示在文本框中，并將其值累加到變量sum；在“保序”命令的Click事件過

程中，通過調(diào)用WriteData過程將Sum的值寫入數(shù)據(jù)文件out5.txlo

國(guó)家二級(jí)（VB）機(jī)試模擬試卷第2套

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

1、以下敘述中錯(cuò)誤的是（）。

A、標(biāo)準(zhǔn)模塊文件的擴(kuò)展名是.bas

B、標(biāo)準(zhǔn)模塊文件是純代碼文件

C、在標(biāo)準(zhǔn)模塊中聲明的全局變量可以在整個(gè)工程中使用

D、在標(biāo)準(zhǔn)模塊中不能定義過程

標(biāo)準(zhǔn)答案：D

知識(shí)點(diǎn)解析：標(biāo)準(zhǔn)模塊獨(dú)立保存為標(biāo)準(zhǔn)模塊文件.bas,故A選項(xiàng)正確。標(biāo)準(zhǔn)模塊

是應(yīng)用程序內(nèi)其他模塊訪問的過程和聲明的容器。當(dāng)應(yīng)用程序比較龐大，含有多個(gè)

窗口，而且?guī)讉€(gè)窗口需耍寫重復(fù)的過程、變量等代碼時(shí)，就可以把這些重復(fù)的代碼

寫在標(biāo)準(zhǔn)模塊。故B選項(xiàng)正確。在標(biāo)準(zhǔn)模塊中定義的Public變量、Public過程屬

于全局變量和全局過程，在整個(gè)工程中的其他窗體、模塊都可以使用。改C選項(xiàng)

正確，在標(biāo)準(zhǔn)模塊中可以定義過程，故D選項(xiàng)錯(cuò)誤。

2、設(shè)有表示學(xué)生選課的三張表，學(xué)生s(學(xué)號(hào)，姓名，性別，年齡，身份證號(hào))，課

程C(課號(hào)，課名)，選課SC(學(xué)號(hào)，課號(hào)，成績(jī))，則表SC的關(guān)鍵字(鍵或碼)為()。

號(hào)

成績(jī)

課

A、,

成績(jī)

號(hào)

學(xué)

B、,

課號(hào)

號(hào)

學(xué)

、,

姓名

號(hào)

C學(xué)

D、,

：c

知識(shí)點(diǎn)解析：學(xué)號(hào)是學(xué)生表s的主鍵，課號(hào)是課程表C的主鍵，所以選課表SC的

關(guān)鍵字就應(yīng)該是與前兩個(gè)表能夠直接聯(lián)系旦能唯一定義的學(xué)號(hào)和課號(hào)，所以選擇

Co

3、下列可作為VisualBasic變量名的是()。

A、A#A

B、constA

C、?xy

D、4A

標(biāo)準(zhǔn)答案：B

知識(shí)點(diǎn)解析：本題考查變量命名規(guī)則。VB中變量的命名應(yīng)遵循以下規(guī)則：只能由

字母、數(shù)字和下劃線組成；第一個(gè)字符必須是英文字母；有效字符為255個(gè)；不能

用關(guān)鍵字做變量名。

4、窗體上有一個(gè)由兩個(gè)文本框組成的控件數(shù)組，名稱為Textl,并有如下事件過

程：PrivateSubTcxtl_Changc(IndcxAsInteger)Sc.cctCaseIndexCascO

Textl(l).FontSize=Textl(0).FontSize*2Textl(1).Text=Textl(O).TextCase1

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

MsgBox”執(zhí)行Else分支"EndSelectEndSub關(guān)于上述程序，以下敘述中錯(cuò)誤的是

()。

A、Index用于標(biāo)識(shí)數(shù)組元素

B、本程序中CaseElse分支的語(yǔ)句永遠(yuǎn)不會(huì)被執(zhí)行

C、向任何一個(gè)文本框輸入字符，都會(huì)在另一個(gè)文本框中顯示該字符

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

標(biāo)準(zhǔn)答案：D

知識(shí)點(diǎn)解析：控件數(shù)組的Index屬性作為控件數(shù)組的下標(biāo)，用于標(biāo)識(shí)數(shù)組元素索。

題目中程序功能是當(dāng)任一個(gè)文本框內(nèi)容改變時(shí)設(shè)置第2個(gè)文本框的字號(hào)是第1個(gè)文

本框字號(hào)的2倍，同時(shí)兩個(gè)文本框顯示相同的文字。假如用戶沒有使用控件數(shù)組的

Index屬性的默認(rèn)值程序?qū)?zhí)行到Else分支。

5、在關(guān)系中凡能惟一標(biāo)識(shí)元組的最小屬性集稱為該表的鍵或碼。二維表中可能有

若干個(gè)鍵，它們稱為該表的()。

A、連接碼

B、關(guān)系碼

C、外碼

D、候選碼

標(biāo)準(zhǔn)答案：D

知識(shí)點(diǎn)解析：在關(guān)系中凡能惟一標(biāo)識(shí)元組的最小屬性集稱為該表的鍵或碼。二維表

中可能有若干個(gè)鍵，它們稱為該表的候選碼或候選鍵。從二維表的所有候選鍵中選

取一個(gè)作為用戶使用的鍵稱為主鍵或主碼。

6、下列數(shù)據(jù)結(jié)構(gòu)中，能用二分法進(jìn)行查找的是()。

A、無序線性表

B、線性鏈表

C、二叉鏈表

D、順序存儲(chǔ)的有序表

標(biāo)準(zhǔn)答案：D

知識(shí)點(diǎn)解析：二分法查找只適用于順序存儲(chǔ)的有序表，表中的元素按值從小到大排

列。

7、下列排序方法中，最壞情況下比較次數(shù)最少的是()。

A、冒泡排序

B、簡(jiǎn)單選擇排序

C、直接插入排序

D、堆排序

標(biāo)準(zhǔn)答案：D

知識(shí)點(diǎn)解析：冒泡排序、直接插入排序與簡(jiǎn)單選擇排序法在最壞情況下均需要比較

n(n-l)/2次,而堆排序在最壞情況下需要比較的次數(shù)是nlog2no

8、下列選項(xiàng)中，不屬于數(shù)據(jù)管理員(DBA)職責(zé)的是()。

A、數(shù)據(jù)庫(kù)維護(hù)

B、數(shù)據(jù)庫(kù)設(shè)計(jì)

C、改善系統(tǒng)性能，提高系統(tǒng)效率

D、數(shù)據(jù)類型轉(zhuǎn)換

標(biāo)準(zhǔn)答案：D

知識(shí)點(diǎn)解析：數(shù)據(jù)庫(kù)管理員(DaiaBaseAdminislralor,DBA)是指對(duì)數(shù)據(jù)庫(kù)的規(guī)劃、

設(shè)計(jì)、維護(hù)、監(jiān)視等的人員，其主要工作如下：數(shù)據(jù)庫(kù)設(shè)計(jì)。DB