VB期末測(cè)試題及其答案

1.表達(dá)式“34”+5的值是?［單選題］*

A、實(shí)時(shí)錯(cuò)誤，類型不匹配

B,"345"

C、39（正確答案）

D、34

答案解析：加號(hào)運(yùn)算符兩邊只要有一個(gè)是數(shù)值型數(shù)據(jù)，則進(jìn)行加法算術(shù)運(yùn)算

2.DoWhile0...Loop,則?［單選題］*

A、一次循環(huán)也不執(zhí)行

B、執(zhí)行無(wú)窮次循環(huán)

C、至少執(zhí)行一次循環(huán)

D、條件錯(cuò)誤，無(wú)法運(yùn)行

答案解析：While后面的條件。表示False,即循環(huán)條件不成立，故選A。

3.下列VB運(yùn)算符，運(yùn)算級(jí)別最高的是—?［單選題］*

A、\

B、Mod

C、+

D、&

答案解析：這四個(gè)運(yùn)算符的優(yōu)先級(jí)別依次是'（整除）＞乂0或取余）＞+（加法）〉&

（字符串連接）

4.修改窗體的caption屬性的作用是()［單選題］*

A.確定窗體的大小

B.確定窗體的位置

C.確定窗體的名稱

D.改變窗體的標(biāo)題

5.a=7

ifa<6then

a=a-2

Else

a=a+2

Endif

a=a*2

運(yùn)行后a的結(jié)果為［單選題］*

9

10

18

6.如下VB程序段

X=1

y=4

DoWhiley>4

x=x*y

y=y+l

Loop

運(yùn)行后x的值為（）［單選題］*

A.1二確答案）

B.4

C.8

D.20

答案解析：分析程序，只有當(dāng)y>4時(shí)，程序才執(zhí)行X=x*y、y=y+l,但y=4,故不

執(zhí)行循環(huán)體內(nèi)的語(yǔ)句，故x保持不變，所以x=l,故選A。

7.有如下VB程序段：

k=l:s=0

DoWhilek<=3

s=s+k

k=k+l

Loop

該程序段執(zhí)行后，變量k和s的值分別是（）［單選題］*

A.33

B.63

C.46三確答案）

D.1（）4

答案解析：【分析】本題考查的是VB程序設(shè)計(jì)中的基本結(jié)構(gòu)和語(yǔ)句，題中的程序

段是個(gè)循環(huán)結(jié)構(gòu)，當(dāng)滿足k<=3的條件時(shí)執(zhí)行程序，不滿足該條件的話就停止。

【解答】程序段運(yùn)行時(shí)，循環(huán)體中變量k和s的值在程序執(zhí)行過(guò)程中的變化如下：

第一次循環(huán)：k=l,s=l,k=2;第二次循環(huán):k=2,s=3,k=3;第三次循環(huán)：k=3,s=6,k=4o所

以該程序段執(zhí)行后，k和s的值分別是：4和6,應(yīng)選：Co

8.有如下的VB程序段：

Fori=lTo10Step3

s=s+i

Nexti

該程序段運(yùn)行后，語(yǔ)句s=s+i執(zhí)行的次數(shù)是（）［單選題］*

A.1

B.3

C.4（正確答案）

D.10

答案解析：循環(huán)變量i的范圍是比10］,步長(zhǎng)是3,因此i的取值分別是：1、4、

7、10。所以循環(huán)體語(yǔ)句“s=s+i”執(zhí)行的次數(shù)是4次。

9.某VisualBasic程序段如下:

x=-3

Dowhilex<0

x=x+2

Loop

該程序段運(yùn)行后，變量x的值是（）［單選題］*

A.-3

B.-1

C.1（正確答案）

D.3

答案解析：分析程序，當(dāng)滿足x<0時(shí)，執(zhí)行語(yǔ)句x=x+2,第一次循環(huán)：當(dāng)x=-3,

執(zhí)行x=x+2=-3+2=-l,第二次循環(huán)：x=x+2=-l+2=l,故C正確。

故選C。

10.有如下VB程序段：

s=0

Fori=1To15

s=s+iMod2

Nexti

Label1.Caption=Str（s）

該程序運(yùn)行后，在標(biāo)簽Label1中顯示的是（）［單選題］*

A.5

B.7

C.8（正確答案）

D.9

11.下列程序執(zhí)行后變量c的值為（）

c=0

Fori=1To1（）

IfiMod2=0orimod3=1Then

c=c+1

EndIf

Nexti［單選題］*

A.4

B.5

C.6

D.7（正確答案）

答案解析：c=c+l是統(tǒng)計(jì)滿足條件“iMod2=0orimod3=1"的個(gè)數(shù)，其中iMod2

=0中i的值是偶數(shù)即2、4、6、8、10,imod3=1中i的值是1、4、7、10,并集

后是1、2、4、6、7、8、10。

7.在VB中，表示代數(shù)式—ac的表達(dá)式是()

Asqr(b2-4ac)

B.Vb*b-4*a*c

C.sqr(bxb-4xaxc)

D.sqr(b*b-4*a*c)

12.［單

選題1*

A

B

c

D（正確答案）

13.正常情況下，當(dāng)步長(zhǎng)為正時(shí)，循環(huán)變量的值要（）終值才能退出循環(huán)。［單選

題］*

.上工笙工,工笙工C.大于,工

A.大于寺于DB.小于寺于D.小于

答案解析：在For-Next語(yǔ)句中，當(dāng)步長(zhǎng)是正數(shù)時(shí)，循環(huán)變量的值要大于終值才稱

為“超過(guò)”；當(dāng)步長(zhǎng)是負(fù)數(shù)時(shí)，循環(huán)變量的值要小于終值才稱為“超過(guò)”。

14.周伯豪設(shè)計(jì)了一段VB程序，用來(lái)計(jì)算1+3+5+……199的和，該程序中？位置

應(yīng)該輸入的是（）

s=0

Fori=1T

s=s+

Nexti

Print"s=

［單選題］*

A.1

B.2

C.s

D.i

15.周全設(shè)計(jì)了一段VB程序，用來(lái)計(jì)算1+2+3+……100的和，該程序中？位置應(yīng)

該輸入的是（）

s=0

Fori=1T

s=s+

Nexti

PrintHs=

［單選題］*

A.1

B.100(T

c.+

D.i

16.循環(huán)語(yǔ)句中需要反復(fù)執(zhí)行的部分一般稱為（）。［單選題］*

D.循環(huán)體（正確答

A.初值B.終值C.步長(zhǎng)值

案）

答案解析：For和Next之間的部分，可以是一個(gè)或多個(gè)語(yǔ)句，它們是每次循環(huán)時(shí)被

重復(fù)執(zhí)行的程序段，稱為循環(huán)體。

17.For語(yǔ)句中省略步長(zhǎng)時(shí)，表示步長(zhǎng)為（）o［單選題1*

A.負(fù)數(shù)B.-1C.1正確答案）D.0

答案解析：步長(zhǎng)為1時(shí)，“Step1”可以省略

18.循環(huán)語(yǔ)句每循環(huán)一次，循環(huán)變量的值就會(huì)自動(dòng)加上（）,然后賦值給循環(huán)變

量。［單選題］*

AF佰n微估C.步長(zhǎng)值（正確答「狂門在

A.初值B.終值D循環(huán)體

案）

19.VisualBasic是一種面向?qū)ο蟮目梢暬绦蛟O(shè)計(jì)語(yǔ)言，采取了的編程機(jī)

制。［填空題］*

___________________________________（答案:事件驅(qū)動(dòng)）

20.有下面的程序代碼：Commandl.Caption="確定"，則Commandl,Caption和"確

定'分別代表o［單選題］*

對(duì)象，屬性，值（正確答案）

對(duì)象，值，屬性

屬性，對(duì)象，值

21.下列選項(xiàng)可以更改窗體背景圖片的屬性是。［單選題］*

picture(正確答案)

image

photo

22.有如下VB程序段：

s=0

Fork=3To1Step—1

Ifk<=lThenx=1

Ifk<=2Thenx=2

Ifk<=3Thenx=3

s=s+x

Nextk

Textl.Text=Str(s)

該程序段運(yùn)行后，文本框Textl中顯示的內(nèi)容是()［單選題］*

A.9(正確答案)

B.7

C.6

D.5

答案解析：【解答】

閱讀程序，分析得出：

第一次循環(huán):k=3,x=3,s=0+3=3；

第二次循環(huán)：k=2,x=3,s=3+3=6；

第二次循環(huán):k=l,x=3,s=6+3=9.

故該程序段運(yùn)行后，文本框Textl中顯示的內(nèi)容是9.

故選A。

23.下面程序在運(yùn)行時(shí)不出現(xiàn)消息框，文本框中的內(nèi)容是選擇項(xiàng)目的哪個(gè)值？

a=val(textl.text)

SelectCasea

Caseis>=90

Msgbox""優(yōu)秀”",48,""消息""

Caseis>=80

Msgbox""良好"”,48,""消息""

Caseis>=60

Msgbox""及格"",48,""消息""

Caseis<=()

EndSelect［單選題］*

120

8()

65

-30(正確答案)

24.根據(jù)題意補(bǔ)充完整以下程序。編寫(xiě)一個(gè)程序，判斷用戶輸入的分?jǐn)?shù)是否滿足條

件：輸入80及以上，打印“優(yōu)秀”；輸入70至79,打印“良好”；輸入60至69,打

E［T及格”；60以下則打印不及格。

PrivateSubForm_Click()

DimxAsInteger

x=Inputbox("請(qǐng)輸入分?jǐn)?shù)”,x)

SelectCasex

Caseis>=80

Print”優(yōu)秀”

Case70to79

Print"良好”

Case()

Print”及格”

CaseElse

Print”不及格”

EndSelect

EndSub［單選題］*

is>=60

60to69

59to69

60to70

25.在窗體上畫(huà)一個(gè)名稱為Command1的命令按鈕，然后編寫(xiě)如下事件過(guò)程：

PrivateSubCommand1_Click()

x=InputBox("Input")

SelectCasex

Case1,3

Print”分支1"

CaseIs>4

Print”分支2"

CaseElse

PrintHElse分支"

EndSelect

EndSub

程序運(yùn)行后，如果在輸入對(duì)話框中輸入2,則窗體上顯示的是()［單選題］

分支1

分支2

Else分支(正確答案)

程序出錯(cuò)

26.運(yùn)行下面程序后，在彈出的消息窗口中顯示的是()o

PrivateSubForm_CIick()

score=Int(Rnd)+5

SelectCasescore

Case5

a="Good”

Case4

a=nOkM

Case3

a="Pass”

CaseElse

a=nBadH

EndSelect

MsgBoxa

EndSub［單選題］*

A、Bad

B、Pass

C、Ok

D、Good端答案)

27.若整型變量a的值為2、b的值為3,則下列程序段執(zhí)行后整型變量c的值為

Ifa>5then

If