VB期末考試題庫

1.9)+0Mod2的運算結(jié)果是

試卷方案:期

201105VisualBasicA.1B.-1C.-2D.-3

答案：D

不考依萬家

第5題題號:32

題型：5種下列關(guān)于菜單的說法中,錯誤的是.

1.單選題(20題*1=20分)A.每一個菜單項就是個對象，并且可設(shè)置自己的屬

2.程序運行結(jié)果填空題(15空*2=30分)性和事件

3.完善程序填空題(10空*2=20分)B.菜單項不可以響應(yīng)DblClick事件

4.改錯題(3錯*4=12分)C.VB6.0允許創(chuàng)建超過四級的子菜單

5.編程題(共2題，1題為8分，另一題10D.程序執(zhí)行時，如果要求菜單項是灰色，不能被用戶

分=18分)選擇，則應(yīng)設(shè)置菜單項的Enabled屬性為False

一、單項選擇共50題答案：c

第6題題號:42

第1題題號:44

以下關(guān)于數(shù)組的說法中，錯誤的是.

以下有關(guān)對象屬性的說法中，錯誤的是.

A,使用了Preserve子句的Redim語句，只允許改變

A.工具箱中的控件并不是VB中所有的控件

數(shù)組最后一維的上界

B.若將Frame的Enabled屬性設(shè)置為False,則不能

B.對于動態(tài)數(shù)組，Redim語句可以改變其維界但不

使用放置在Frame里面的控件

可以改變其數(shù)據(jù)類型

C.對象的Name屬性在運行時不能改變

C.Erase語句的功能只是對固定大小的數(shù)組進行初始

D.對象的所有屬性都可以在屬性窗口中設(shè)置

化

答案：D

D.Lbound函數(shù)返回值是指定數(shù)組某一維的下界

第2題題號:3答案：C

第7題題號:8

數(shù)學(xué)表達式sin27。+J*+e，的VB算術(shù)表達式

Ix+yI設(shè)a=3,b=2,c=l,運行printa>b>c的結(jié)果是

為.

A.TrueB.FalseC.1D.出錯

A.Sin(27)+Sqr(x+Exp3)/(x+y)

答案：B

B.Sin(27*3.14159/180)+Sqr(x+Exp(3))/Abs(x+y)

C.Sin(27*3.14159/180)+Sqr(x+e_3)/Abs(x+y)第8題題號:4

D.Sin(27*pi/180)+Sqr(x+Exp(3)/Abs(x+y)以下說法不正確的是.

答案：BA.使用不帶關(guān)鍵字Preserve的ReDim語句可以重新

第3題題號:17定義數(shù)組的維數(shù)

B.使用不帶關(guān)鍵字Preserve的ReDim語句可以改變

下列有關(guān)對象的敘述中，正確的是—

數(shù)組各維的上、下界

A.對象由屬性，事件和方法構(gòu)成

C.使用不帶關(guān)鍵字Preserve的ReDim語句可以改變

B.對象的所有屬性既可以在屬性窗口設(shè)置，又可以在

數(shù)組的數(shù)據(jù)類型

程序運行時用賦值語句設(shè)置

D.使用不帶關(guān)鍵字Preserve的ReDim語句可以對■數(shù)

C.對象的事件一定就是由VB預(yù)先設(shè)置好的人工干預(yù)

組中的所有元素進行初始化

的動作

答案：C

D.對象的方法是對象響應(yīng)某個事件后執(zhí)行的一段程

序代碼第9題題號:37

答案：A在列表框Listl中有若干列表項,可以刪除選定列表

第4題題號:46項的語句是.

A.Listl.text二〃〃

表達式

B.Listl.List(Listl.Listindex)二〃〃

CInt(4.5)+Cint(-4.51)+Int(4.9)+Int(-4.1)+Fix(-

C.1istl.ClearB.只能使用Tab鍵將焦點移到該控件

D.Listl.RemoveitemListl.ListindexC.只能在程序中調(diào)用該控件的SetFocus方法

答案：DD.A、B、C三選項中涉及的方法均可使用

第10題題號:41答案：D

第14題題號:55

u女上、，，，e2K$mx+sin3(2x)一5

數(shù)學(xué)表達式一),-乙對應(yīng)的VB以下Case語句中，能正確描述Y的絕對值大于6的是

Jlsinx-cosx2I

表達式是.A.CaseAbs(Y)>6

A.B.Case-6To6

(e*(2*n*x-5)*Log(x)+(Sin(2x))3)/Sqr(Sin(x)-CC.CaseNot(-6To6)

os(x-2))D.CaseIs<-6,Is>6

B.答案：D

(Exp(2*3.14159*x-5)*Log(x)+(Sin(2*x))3)/Sqr(S

第15題題號:45

in(x)-Cos(x*2))

以下關(guān)于變量作用域的敘述中，正確的是

C.

(Exp(2*兀*x-5)*Ln(x)+(Sin(2*x))*3)/Sqr(Sin(x)-

A.窗體中凡用Private聲明的變量只能在某個指定

Cos(x2))

的過程中使用

D.

B.模塊級變量只能用Dim語句聲明

6(2*3.14159*x-5)*Ln(x)+(Sin(2*x))3)/Sqr(Sing

C.凡是在窗體模塊或標(biāo)準(zhǔn)模塊的通用聲明段用

(x)-Cos(x-2))

Public語句聲明的變量都是全局變量

答案：B

D.當(dāng)不同作用域的同名變量發(fā)生沖突時，優(yōu)先訪問局

第11題題號:14限性小的變量

以下有關(guān)數(shù)組參數(shù)的說明中，正確的是一答案：C

A.在過程中也可用Dim語句對形參數(shù)組進行說明第16題題號:16

B.動態(tài)數(shù)組作為實參時，可用ReDim語句在過程中改

以下關(guān)于數(shù)值常量的說法中，錯誤的是—

變對應(yīng)形參數(shù)組的維界

A.八進制數(shù)的表示方法是在數(shù)字前面加&0

C.調(diào)用過程時，數(shù)組名不能作為實參

B.十六進制數(shù)的表示方法是在數(shù)字前面加&H

D.數(shù)組可以按地址傳遞也可以按植傳遞

C.在浮點運算中使用D來分隔尾數(shù)和指數(shù)時,系統(tǒng)將

答案：B

把該數(shù)值作為單精度型數(shù)處理

第12題題號:43D.32768是合法的數(shù)值常量

下列有關(guān)過程的說法中,錯誤的是.答案：C

A.在Sub或Function過程內(nèi)部不能再定義其它Sub第17題題號:27

或Function過程

B.對于使用ByRef說明的形參,在過程調(diào)用時形參和x*3Q(\0

數(shù)學(xué)表達式-~對應(yīng)的VB表達式是

實參只能按傳址方式結(jié)合6+y

C.遞歸過程既可以是遞歸Function過程，也可以是

遞歸Sub過程

A.Abs(e*x+Sin(30)3)/Sqr(x+y))

D.可以像調(diào)用Sub過程--樣使用Call語句調(diào)用

B.Abs(Exp(x)+Sin(30)3)/(Sqr(x+y))

Function過程

C.Abs(e*x+Sin(30*3.14159/180)*3)/(Sqr(x+y))

答案：B

D.

第13題題號:49Abs(Exp(x)+Sin(30*3.14159/180)*3)/Sqr(x+y))

要將焦點設(shè)置在某個控件匕以卜泗個選項中正確的答案：D

是.

A.只能使用鼠標(biāo)直接點擊控件

第18題題號:29答案：D

下面的4個表達式中,有關(guān)個能夠?qū)ingle第24題題號:54

類型變量x(正數(shù))的第3位小數(shù)正確地進行四舍五入下列有關(guān)控件數(shù)組的說法中,錯誤的是.

計算.A.控件數(shù)組由組具有相同名稱和相同類型的控件

Format(x,"00")組成，不同類型的控件無法組成控件數(shù)組

Int(100*(x+0.005))/100B.控件數(shù)組中的所有控件不得具有各自不同的屬性

CInt(100*(x+0.005)/100設(shè)置值

Fix(100*(x+0.005))/100C.控件數(shù)組中的所有控件共享同?個事件過程

A.1個B.2個C.3個D.4個D.控件數(shù)組中每個元素的下標(biāo)由控件的Index屬性

答案：c指定

第19題題號:26答案：B

執(zhí)行以下語句時,會出現(xiàn)錯誤提示的是.第25題題號:7

A.Print"2b3”+12.5B.Print"12.5"+12以下對數(shù)組參數(shù)的說明中，錯誤的是.

C.Print"12.5"&12.5D.Print"2e3”+12A.在過程中可以用Dim語句對形參數(shù)組進行聲明

答案：AB.形參數(shù)組只能按地址傳遞

第20題題號:34C.實參為動態(tài)數(shù)組時，可用ReDim語句改變對應(yīng)形參

數(shù)組的維界

以下Case語句含有錯誤的是.

D.只需把要傳遞的數(shù)組名作為實參，即可調(diào)用過程

A.Case0To10B.CaseIs>10

答案：A

C.CaseIs>10AndIs<50D.Case

3,5,Is>10第26題題號:6

答案：c要向文件datal.txt添加數(shù)據(jù)，正確的文件打開命令

第21題題號:1是.

A.Openz，datal.txt〃ForOutputAs#1

下列語句中，正確的是—

B.0pen，/datal.txt，/ForInputAs#1

A.Textl.SetFocusB.Forml.ClearC.

C.Open^datal.txt^ForAppendAs#5

Label1.SetFocusD.Listl.Cis

D.0pen/zdatal.txt〃ForWriteAs#5

答案：A

答案：c

第22題題號:9

第27題題號:31

下列選項中,所包含的所有表達式能夠?qū)晌徽麛?shù)X

下面有關(guān)數(shù)組處理的敘述中，正確的是.

的個位數(shù)與十位數(shù)對調(diào)(如將78轉(zhuǎn)換為87)的是

A.在過程中使用ReDim語句可以改變動態(tài)數(shù)組數(shù)據(jù)

的類型

@Val(Right(X,l)&Left(X,1))

B.在過程中，可以使用Dim、Private和Static語

②Val(Right(Str(X),l)&Left(Str(X),1))

句來定義數(shù)組

@Val(Right(CStr(X),1)&Left(CStr(X),1))

C.用ReDim語句重新定義動態(tài)數(shù)組時,可以改變數(shù)組

@Val(Mid(X,2,l)+Mid(X,1,1))

的大小，但不能改變數(shù)組的維數(shù)

A.①②B.②③C.②④D.

D.不可以用Public語句在窗體模塊的通用處說明一

①③④

個全局?jǐn)?shù)組

答案：D

答案：D

第23題題號:15

第28題題號:35

以卜關(guān)于子過程或函數(shù)的定義中，正確的是

下面的表達式中,運算結(jié)果為True的是.

A.Subfl(nAsString*1)

A.”abcrd"<="ABCRD”

B.Subfl(nAsInteger)AsInteger

B.Int(134.69)<=CInt(134.69)

C.Functionfl(flAsInteger)AsInteger

C.3>2>1

I).Functionfl(ByVainAsInteger)

D.Mid("Visual”,1,4)=Right("lausiV”,4)A.文件($F)B.文件(&F)C.文件件F)

答案：BD.文件(海)

第29題題號:36答案：B

設(shè)計界面時，要使?個文本框具有水平和垂直滾動條，第34題題號:50

應(yīng)先將其屬性置為True,再將ScrollBar屬在下列屬性中，屬于CommandButton控件、ListBox控

性設(shè)置為3.件共有的是.

A.MultiLineB.AutoSizeC.AlignmentA.Caption、TextB.Visible>FontC.

D.RightToLeftCaption、VisibleD.List>Visible

答案:A答案：B

第30題題號:23第35題題號:22

下面有關(guān)數(shù)組的說法中，正確的是—下列能夠正確表示條件“XWY〈Z”的VB邏輯表達式是

A.數(shù)組的維下界不可以是負(fù)數(shù)

B.模塊通用聲明處有OptionBase1,則模塊中數(shù)組A.XWY<ZB.X<=YAndY<ZC.

定義語句DimA(0To5)會與之沖突XWYORY<ZD.X〈=Y〈Z

C.模塊通用聲明處有OptionBase1,模塊中有Dim答案：B

A(0To5),則A數(shù)組笫一維維下界為0第36題題號:33

D.模塊通用聲明處有OptionBase1,模塊中有

以下關(guān)于Function過程的說法中，錯誤的是

DimA(0To5),則A數(shù)組第一維維下界為1

答案：C

A.Function過程名可以有一個或多個返回值

第31題題號:53B.在Function過程內(nèi)部不得再定義Function過程

下面有關(guān)數(shù)組的敘述中，不正確的是.C.Function過程中可以包含多個ExitFunction語

①在過程中用ReDim語句定義的動態(tài)數(shù)組，其下標(biāo)的句

上下界可以是變量D.可以像調(diào)用Sub過程一樣調(diào)用Function過程

②數(shù)組作為形式參數(shù)時，傳遞的是每個數(shù)組元素的值答案：A

③在窗體模塊的通用聲明處可以用Public說明一第37題題號:52

個全局?jǐn)?shù)組

下面的關(guān)系表達式中，運算結(jié)果為True的是.

④數(shù)組定義語句中可以用負(fù)數(shù)或小數(shù)來指定某一維

A.CInt(1.5)=Int(1.5)B.

的維下界或維上界的值

Fix(1.5)=Int(1.5)

A.②③B.①③④C.①②③④

C.Fix(-1.5)=CInt(-1.5)D.

D.③④

Fix(-1.5)=Int(-1.5)

答案：A

答案：B

第32題題號:11

第38題題號:21

下列關(guān)于對象SetFocus與GotFocus的描述中，正確的

已知X<Y,A>B,則下列表達式中，結(jié)果為True的是

是_____

A.SetFocus是事件,GotFocus是方法B.

A.Sgn(X-Y)+Sgn(A-B)=-lB.

Setfocus和Gotfocus都是事件

Sgn(X-Y)+Sgn(A-B)=-2

C.Setfocus和GotFocus都是方法D.

C.Sgn(Y-X)+Sgn(A-B)=2D.

SetFocus是方法,GotFocus是事件

Sgn(Y-X)+Sgn(A-B)=0

答案：D

答案：c

第33題題號:2

第39題題號:38

創(chuàng)建一個名為，，文件，，的菜單項,欲使其可用Alt+F方

執(zhí)行語句時,會出現(xiàn)出錯提示信息.

式訪問，則在菜單編輯器的標(biāo)題文本框中應(yīng)輸入

A.Print5+7=14B.Print

16384*2

C.Print32768*2D.Print"14”+32D.Abe_10

答案：B答案：D

第40題題號:51第45題題號:10

下列______是正確的VB常量.

sin300+Jlogx+y

數(shù)學(xué)表達式-------------------對應(yīng)的VisualA.D-6B.E-6C.5DD.5E-6

x+y

27r+e答案：D

Basic表達式是.第46題題號:56

A.

若在模塊中用PrivateFunctionFun(AasSingle,B

Sin(30*3.14159/180)+Sqr(Log(x)+y)/2*3.14159+Ex

asInteger)AsInteger定義了函數(shù)Fun.調(diào)用函數(shù)

P(x+y)

Fun的過程中定義了I、J和K三個Integer型變量，

B.

則下列語句中不能正確調(diào)用函數(shù)Fun的語句是

(Sin(30*北/180)+Sqr(Ln(x)+y))/(2*n+Exp(x+y))

C.

A.Fun3.14,JB.CallFund,365)

Sin(30*180/3.14159)+Sqr(Log(x)+y)/(2*3.14159+e

C.Fun(I),(J)D.K=Fun("24","35")

"(x+y))

答案：B

D.

(Sin(30*3.14159/180)+Sqr(Log(x)+y))/(2*3.14159第47題題號:57

+Exp(x+y))若需要在同?窗體內(nèi)安排兩組相互獨立的單選按鈕

答案：D(OptionButton),可使用控件做容器將它們分

第41題題號:48開.

①TextBox②PictureBox③Image

在一個多窗體程序中,可以僅將窗體Form2從內(nèi)存中

④Frame

卸載的語句是________.

A.①或②B.②或③C.②或④

A.Form2.UnloadB.UnloadForm2

D.③或④

C.Form2.EndD.Form2.Hide

答案：c

答案：B

第48題題號:58

第42題題號:12

以下關(guān)于文件的敘述中，錯誤的是。

Print方法可在上輸出數(shù)據(jù).

A.用Output模式打開一個順序文件,即使不對它進

①窗體②文本框③圖片框④標(biāo)簽⑤列

行寫操作，原來的內(nèi)容也被清除

表框⑥立即窗口

B.可以用Print#語句或Write#語句將數(shù)據(jù)寫到順

A.①@⑥B.②③⑤C.①②⑤

序文件中

D.③④⑥

C.若以O(shè)utput、Append、Random,Binary方式打開

答案：A

一個不存在的文件，系統(tǒng)會出錯

第43題題號:47D.順序文件或隨機文件都可以用二進制訪問模式打

若要使邏輯表達式x>yXory<z結(jié)果為True,則x、y、開

z的取值應(yīng)為下列選項中的.答案：C

A.x=3、y=3、z=4B.x=2、y=l、第49題題號:24

z=2

窗體上有若干命令按鈕和一個文本框,程序運行時焦

C.x=l>y=3^z=2D.x=2、y=2、

點置于文本框中，為了在按下回車鍵時執(zhí)行某個命令

z=2

按鈕的Click事件過程，需要將該按鈕的屬

答案：A

性設(shè)置為True.

第44題題號:5A.EnabledB.DefaultC.Cancel

下列____________是合法的變量名.D.Visible

A.absB.-alC.cdcd

答案：B第2題題號:18

第50題題號:13執(zhí)行下面程序，單擊Commandl,則窗體上顯示的第一

r5—cos29°行是—【1】,第三行是―[2]—,最后

數(shù)學(xué)表達式；二二對應(yīng)的VB表達式是一行是—[3]—。

+lny)+5OptionExplicit

PrivateSubCommand1—Click()

A.(x-5-Cos(29))/Sqr(e^x+In(y))+5DimxAsInteger,yAsInteger

B.(x-5-Cos(29))/(Sqr(Exp(x)+Log(y))+5)x=12:y=0

C.DoWhilex>0

(x'5-Cos(29*3.14159/180))/(Sqr(Exp(x)+Log(y))+IfxMod4=0Then

5)y=y+x

D.Else

(x5-Cos(29*3.14159/180))/(Sqr(ex+Log(y))+5y=y-x

答案：cEndIf

二、填空共20題x=x-3

Printx,y

第1題題號:28Loop

運行下列程序，單擊Commandl,在窗體上顯示的第一EndSub

行內(nèi)容是—[1],第二行的內(nèi)容是[2]答案：

第三行的內(nèi)容是—[3]=====(答案1)=====

OptionExplicit912

PrivateSubCommandl_Click()======(答案2)====

DimsAsString3-3

s="Basic”======(答案3)======

Cal1trans(s)0-6

EndSub第3題題號:27

PrivateSubtrans(sAsString)

執(zhí)行下面的程序，單擊Commandl,窗體上顯示的第一

DimjAsInteger,tAsString

行是——第二行是—―【2】_

DimkAsInteger

第四行是[3]。

k=3

OptionExplicit

Do

PrivateSubCommandl_Click()

j=InStr(s,"a〃)

DimaAsInteger,bAsInteger

t=LCase(Right(s,j))

a=l:b=l

s=Right(t,Len(s)-k)&Left(s,Len(t))

Callsubl(a,b)

k=k-l

Printa,b

Prints

EndSub

LoopUntilk=0

PrivateSubsubl(aAsInteger,bAsInteger)

EndSub

a=a+b:b=b+a

答案：

Printa,b

===(答案1)==—=

Ifa>10Then

icBa

a=a+b

====(答案2)====

b=b+a

baicBa

Else

====(答案3)======

Callsubl(a,b)

baba

EndIf

EndSubFori=k+lTon

答案：A(i)=i*n+1

=====(答案1)======Nexti

23Fori=lTon

======(答案2)=======PrintA(i);

58Nexti

=====(答案3)====Print

3455EndSub

第4題題號:26答案：

=======(答案1)======

運行下面的程序，單擊Command1,在窗體上顯示的變

6

量a的值為—【1】,變量b的值為—[2]

====(答案2)===

變量c的值為—[3]o

5

OptionExplicit

=====(答案3)=====

PrivateSubCommandl_Click()

17

DimaAsInteger,bAsInteger,cAsInteger

a=5:b=10:c=15第6題題號:32

Printfun(a,b,c)+fun(a,b,c)運行下面程序，單擊Commandl,在窗體上顯示的變量

Printa,b,cA的值為—【1】一,變量B的值為—[2]

EndSubOptionExplicit

PrivateFunctionfun(xAsInteger,yAsInteger,DimaAsInteger

zAsInteger)AsIntegerPrivateSubCommandl_Click()

z二xDimbAsInteger

x=x+yb=3

y=y+za=4

fun=x+yb=fun(fun(a,b+2),a)+b

EndFunctionPrinta,b

答案：EndSub

====(答案1)======PrivateFunctionfun(nAsInteger,kAsInteger)

30n=n+a

====(答案2)====k=n-k

30fun=n+k+a

====(答案3)======EndFunction

15答案：

第5題題號：16====(答案1)===二

19

執(zhí)行下面的程序，連續(xù)三次單擊命令按鈕Commandl

====(答案2)=====

之后，A數(shù)組共有【11個元素;數(shù)組元素A(2)