VB語言程序設(shè)計-在線作業(yè)-3

VB語言程序設(shè)計一在線作業(yè)_3

交卷時間：2016-09-1916:12:53

一、單選題

1

（5分）

通過設(shè)置Line控件的什么屬性，可以繪制虛線、點劃線等多種樣式的直線（）。

A.DrawStyle

B.Style

C.BorderStyle

D.FillStyle

糾錯

得分：5

知識點：VB語言程序設(shè)計

展開解析

2

（5分）

在窗體上畫兩個單選按鈕，名稱分別為Optionl和Option2,標(biāo)題分別為“宋體”和“黑體”；一

個復(fù)選框，名稱為Check。標(biāo)題為“粗體”；?個文本框，名稱為Text）,Text屬性為“改變文

字字體”。要求程序運行時，“宋體”單選按鈕和“粗體”復(fù)選框被選中，則能夠?qū)崿F(xiàn)上述要求的語

句序列是（）o

A.Optionl.Value=TrueCheckl.Value=True

B.Optionl.Value=TrueCheckl.Value=False

C.Option2.Value=FalseCheckl.Value=True

D.Optionl.Value=TrueCheckl.Value=1

組錯

得分：5

知識點：VB語言程序設(shè)計

展開解析

3

（5分）

下列可以把當(dāng)前目錄下的圖形文件pic1.jpg裝入圖片框Picturel中的語句為（）。

A.Picturel.Picture=LoadPictureCpicl.jpg"）

B.Picture="picl.jpg"

C.Picture=LoadPictureCpicl.jpg"）

D.Picture.Handle="picl.jpg"

糾錯

得分：5

知識點：VB語言程序設(shè)計

展開解析

4

（5分）

設(shè)a=2,b=3,c=4,d=5,下列表達(dá)式Notav=cOr4*c=bA2Andbv>a+c的值

是（）。

A.True

B.1

C.-1

D.False

組錯

得分：5

知識點：VB語言程序設(shè)計

展開解析

5

(5分)

假定有以下循環(huán)結(jié)構(gòu)

DoUntil條件

循環(huán)體

Loop

則正確的描述是()O

A.如果"條件"是一個為0的常數(shù)，則一次循環(huán)體也不執(zhí)行

B.如果"條件"是一個不為0的常數(shù)，則至少執(zhí)行一次循環(huán)體

C.不論"條件"是否為"真"，至少要執(zhí)行一次循環(huán)體

D.如果"條件"是一個為0的常數(shù)，則無限次執(zhí)行循環(huán)體

糾錯

得分：5

知識點：VB語言程序設(shè)計

展開解析

6

(5分)

確定一個控件在窗體上的位置的屬性是()o

A.Width和Height

B.Top和Left

C.Top或Left

D.Width或Height

糾錯

得分：5

知識點：VB語言程序設(shè)計

展開解析

（5分）

在窗體上畫兩個名稱分別為Labell和Label2的標(biāo)簽，然后編寫如下事件過程:

PrivateSubForm_Click()

x=-5:s=-5

SelectCases

CaseIs>0

y=x+1

CaseIs>=0

y=x+2

CaseElse

y=x+3

EndSelect

Labell.Caption=x

Label2.Caption=y

EndSub

程序運行后，單擊窗體，標(biāo)簽Labell和Label2中顯示的內(nèi)容分別是（）。

A.-5和-3

B.-5和-4

C.-5和-2

D.-5和-5

糾錯

得分：5

知識點：VB語言程序設(shè)計

展開解析

8

(5分)

以下程序段的輸出結(jié)果是()。

a=Sqr(3)

b=Sqr(2)

c=a>b

Printc

A.True

B.0

C.-1

D.False

糾錯

得分：5

知識點：VB語言程序設(shè)計

展開解析

9

(5分)

閱讀下面的程序：

FunctionF(aAsInteger)

Staticc

b=0

b=b+1

c=c+1

F=a+b+c

EndFunction

PrivateSubCommand1_Click()

DimaAsInteger

a=2

Fori=1To3

PrintF(a)

Nexti

EndSub

運行上面的程序，單擊命令按鈕，輸出結(jié)果為()o

A.468

B.456

C.444

D.479

糾錯

得分：5

知識點：VB語言程序設(shè)計

展開解析

10

(5分)

對一個磁盤上的順序文件進(jìn)行讀操作，打開方式為O。

A.Random

B.Input

C.Output

D.Append

糾錯

得分：5

知識點：VB語言程序設(shè)計

展開解析

11

（5分）

圖像框控件有一個屬性，可以自動調(diào)整圖像框的大小，以適應(yīng)圖像的尺寸，這個屬性是（）o

A.AutoSize

B.Appearance

C.AutoRedraw

D.Stretch

組錯

得分：5

知識點：VB語言程序設(shè)計

展開解析

12

（5分）

為了把窗體上的某個控件變?yōu)榛顒拥?，?yīng)執(zhí)行的操作是（）。

A.雙擊窗體

B.雙擊該控件

C.單擊窗體的邊框

D.單擊該控件的內(nèi)部

糾錯

得分：5

知識點：VB語言程序設(shè)計

展開解析

13

(5分)

下列可作為VB的變量名的是()?

A.3*Delta

B.ABD

C.PrintChar

D.Abs

糾錯

得分：5

知識點：VB語言程序設(shè)計

展開解析

14

(5分)

在顯示菜單時，菜單的哪個屬性為True時將用灰色顯示該菜單項標(biāo)題()o

A.Checked

B.Enabled

C.Visible

D.Caption

糾錯

得分：5

知識點：VB語言程序設(shè)計

展開解析

15

(5分)

下列程序段的執(zhí)行結(jié)果為()O

x=2:y=1

Ifx*y<1Theny=y-1Elsey=y+1

Printy-x>0

A.-1

B.False

C.True

D.1

糾錯

得分：5

知識點：VB語言程序設(shè)計

展開解析

16

（5分）

對用MsgBox顯示的消息框，以下敘述中錯誤的是（）。

A.可以有一個按鈕

B.可以有任意多個按鈕

C.可以有三個按鈕

D.可以有兩個按鈕

糾錯

得分：5

知識點：VB語言程序設(shè)計

展開解析

17

（5分）

閱讀下面的程序：

SubsubP(b()AsInteger)

Fori=1To4

b(i)=2*i

Nexti

EndSub

PrivateSubCommand1_Click()

Dima(1To4)AsInteger

a(1)=5:a(2)=6:a(3)=7:a(4)=8

subPa()

Fori=1To4

Printa(i)

Nexti

EndSub

運行上面的程序，單擊命令按鈕，輸出結(jié)果為（）。

A.程序出錯

B.10121416

C.2468

D.5678

糾錯

得分：5

知識點：VB語言程序設(shè)計

展開解析

18

(5分)

閱讀下面的程序：

PrivateSubForm_Click()

DimCheck,Counter

Check=True

Counter=0

Do

DoWhileCounter<20

Counter=Counter+1

IfCounter=10Then

Check=False

ExitDo

EndIf

Loop

LoopUntilCheck=False

PrintCounter,Check

EndSub

程序運行后，單擊窗體，輸出結(jié)果為Oo

A.10False

B.150

C.20-1

D.10True

糾錯

得分：5

知識點：VB語言程序設(shè)計

展開解析

19

(5分)

當(dāng)窗體最小化時縮小為一個圖標(biāo)，設(shè)置這個圖標(biāo)的屬性是()o

A.Mouseicon

B.Icon

C.Picture

D.MousePoint

組錯

得分：5

知識點：VB語言程序設(shè)計

展開解析

20

(5分)

使文本框獲得焦點