國(guó)家二級(jí)VB機(jī)試（常用標(biāo)準(zhǔn)控件）模擬

試卷第1套

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

1、能夠存放組合框的所有項(xiàng)目?jī)?nèi)容的屬性是

A、Caption

B、Text

C、List

D、Selected

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

知識(shí)點(diǎn)解析：本題考查的考點(diǎn)是組合框的基本屬性。Caption屬性設(shè)置列表框的標(biāo)

題；List屬性是一個(gè)數(shù)分，存放組合框中所有項(xiàng)目的內(nèi)容；Text屬性可返回列表框

中當(dāng)前選中項(xiàng)目的內(nèi)容?Selected屬性用于設(shè)置或返回指定索引號(hào)列表項(xiàng)的選中狀

態(tài)。

2、要想使列表框只允許單選列表項(xiàng)，應(yīng)設(shè)置的屬性為

A^Style

B、Selected

C、MultiSelect

D^Enabled

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

知識(shí)點(diǎn)解析：列表框的MulliSelecl屬性用于設(shè)置是否可在列表項(xiàng)中做多個(gè)選擇。

值為0—None（缺省設(shè)置）表示不允許做多項(xiàng)選擇：值為1一Simple表示允許做簡(jiǎn)

單多項(xiàng)選擇；值為2—Extended表示允許配合使用Shift鍵、Ctrl鍵做多項(xiàng)選擇。

3、下面列表框?qū)傩灾校菙?shù)組的是

A、ListCount

B、Selected

C、Listindex

D、MultiSelect

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

知識(shí)點(diǎn)解析：列表框的Lisi屬性是一個(gè)字符串?dāng)?shù)組，數(shù)組的一項(xiàng)就是一個(gè)列表項(xiàng)

目，可以通過(guò)下標(biāo)訪問數(shù)組中的值。ListCount屬性是一個(gè)整型值，代表數(shù)組中的

項(xiàng)目個(gè)數(shù)。Selected屬性是一個(gè)數(shù)組，用于設(shè)置或返回指定索引號(hào)列表項(xiàng)的選中狀

態(tài)。值為True表示被選中：值為False表示未被選中。Lisllndex屬性：可返回當(dāng)前

所選項(xiàng)目的索引號(hào)，其起始值為0,最后一項(xiàng)的值為L(zhǎng)istCount—1。當(dāng)Listindex的

值為-1時(shí)，表示未選定項(xiàng)目。MuhiSelect屬性用于表示是否能夠在控件中進(jìn)行復(fù)選

以及如何進(jìn)行復(fù)選。MultiSelect屬性可取0、1、2這3種值，默認(rèn)時(shí)為0,表示不

允許復(fù)選。

4、窗體上有一個(gè)名稱為CombOl的組合框，要求在其編輯區(qū)輸入文本并按回主鍵

后，編輯區(qū)中的文本被添加到列表中。下面能實(shí)現(xiàn)這一功能的是

A、PrivateSubCombol_keyDown(KeyCode_AsInteger,ShiftAsInteger)

IfKeyCode=13ThenCombo1.AddltemComboI.TextEndIfEndSub

PrivateSubCombo1_KeyDown(KeyCode_AsInteger,ShiftAsInteger)

ltKcyCode=131henCombo1.AddAItcmlextl.lextEndIfEndSub

C^PrivateSubCombol_Click()Combo1.AddltemCombo1.TextEndSub

D^PrivateSubCombol_Click()Combo1.AddltemTextl.TextEndSub

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

知識(shí)點(diǎn)解析：要求在其編輯區(qū)輸入文本并按回車鍵后，編輯區(qū)中的文本被添加到列

表中，所以代碼應(yīng)該寫在組合框的KeyDown方法中；組合框的編輯區(qū)中輸入的文

本通過(guò)組合框的Text屬性返回。

5、要將單選按鈕Optl設(shè)為被選中，應(yīng)設(shè)置的屬性是

A、Value

B、Selected

C、Enabled

D、SetFocus

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

知識(shí)點(diǎn)解析：?jiǎn)芜x按鈕(OplionBUtlon)組常用于提供多個(gè)選項(xiàng)間的唯一選擇。Value

屬性返回或設(shè)置單選按紐的選中狀態(tài)，其中單選按鈕的Value屬性可設(shè)置為兩種

值：False表示未選(默認(rèn)值)；值為True表示選中，選擇某單選按鈕后，該單選按

鈕中將顯示，七”。

6、窗體上有一個(gè)名稱為Combol的組合框，為了引用Combol中最后一個(gè)列表項(xiàng)，

應(yīng)使用的表達(dá)式是

A、Combol.List(ListCount)

Combo1.List(Combol.ListCount—1)

C、Combo1.List(ListCount—1)

D、Combol.List(Combol.ListCount)

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

知識(shí)點(diǎn)解析：列表框的Listindex屬性用于返回或設(shè)置控件中當(dāng)前選擇項(xiàng)目的索引

(下標(biāo))，設(shè)計(jì)時(shí)不可用。當(dāng)Listindex的值設(shè)置為一1時(shí)，表示未選定項(xiàng)目，第一項(xiàng)

的索引值為0,最后一項(xiàng)的索引值為L(zhǎng)istCount—1。

7、窗體上有一個(gè)名稱為Texll的文本框，一個(gè)名稱為Combol的組合框。將文本框

中的內(nèi)容添加到組合框中所使用的命令是

A、Textl.AddltemCombol.Text

B>ComboI.AddkemText!.Text

C^Combol.Text=Textl.Text

D、Textl.Text=Combol.Text

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

知識(shí)點(diǎn)解析：組合框的Addllem方法可以將指定的字符串加入到組合框的尾部，

本題要求加入的是文本框的值，即文本框的Text屬性值。

8、若要清除列表框控件中的所有列表項(xiàng)，應(yīng)該使用的方法是

A、Removeitem

B、Clear

C、Delete

D^Refresh

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

知識(shí)點(diǎn)解析：列表框的Clear方法用于清除列表框中的所有項(xiàng)目。

9、窗體上有名稱為L(zhǎng)isll的列表框。以下能夠?qū)⒘斜砜虍?dāng)前選定的列表項(xiàng)替換為

字符串“Basic”的語(yǔ)句是

A、Listl.AddlterrTBasic”

B、Listl.List（Listl.Listindex尸"Basic”

C、Listl.Text="Basic”

D、以上都可以

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

知識(shí)點(diǎn)解析：列表框的Listindex屬性用于返回或設(shè)置控件中當(dāng)前選擇項(xiàng)目的索引

（下標(biāo)），設(shè)計(jì)時(shí)不可用。當(dāng)前選定的列表項(xiàng)表示成Lisll.List（Listl.Listlndex）o

10、要想不使用Shift或Ctrl鍵就能在列表框中同時(shí)選擇多個(gè)項(xiàng)目，則應(yīng)把該列表

框的MultiSclcct屬性設(shè)置為

A、0-None

B、1—Simple

C、2一Extended

D、3

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

知識(shí)點(diǎn)解析：列表框的MultiSelect屬性用于設(shè)置是否可在列表項(xiàng)中做多個(gè)選擇。

值為0—None（缺省設(shè)置）表示不允許做多項(xiàng)選擇；值為1-Simple表示允許做簡(jiǎn)單多

項(xiàng)選擇：值為2-Extended表示允許配合使用Shift鍵、Ctrl鍵做多項(xiàng)選擇。

11、如果在列表框Listl中沒有選中項(xiàng)目,則Listl.Listindex的值為

A、一1

B、0

C、I

D、2

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

知識(shí)點(diǎn)解析：列表框的Listindex屬性用于返回或設(shè)置控件中當(dāng)前選擇項(xiàng)目的索引

（下標(biāo)），設(shè)計(jì)時(shí)不可用。當(dāng)Listindex的值設(shè)置為一1時(shí)，表示未選定項(xiàng)目，第一項(xiàng)

的索引值為0,最后一項(xiàng)的索引值為L(zhǎng)istCount—1o

12、設(shè)Labell、Command】、Text】、Check1分別為標(biāo)簽、命令按鈕、文本框、復(fù)

選框的名稱，則以下屬性設(shè)置語(yǔ)句中，運(yùn)行時(shí)不會(huì)出錯(cuò)的是

A、Label1.BackStyle=2

B、Command1.Style=l

C、Textl.ScrollBars=4

D、Check1.Value=2

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

知識(shí)點(diǎn)解析：標(biāo)簽的BzckStyle屬性用于設(shè)置是否讓標(biāo)簽覆蓋背景，可以取0（標(biāo)簽

不覆蓋背景，以透明方式顯示）和1（默認(rèn)值，標(biāo)簽覆蓋背景）；按鈕的Style屬性用

來(lái)設(shè)置命令按鈕的外觀，可設(shè)置成Slandard,按鈕以標(biāo)準(zhǔn)的形式顯示，即文字形

式，為默認(rèn)值，值為Gmphical,按鈕將以圖形的方式顯示；文木框的ScrollBars屬

性用于設(shè)置文本框是否有水平或垂直滾動(dòng)條，可設(shè)置成4種值：0—None,表示沒

有滾動(dòng)條（默認(rèn)值）；1一Horizontal,表示只有水平滾動(dòng)條；2-Vertical：表示只有

垂直滾動(dòng)條；3-Both：表示有水平和垂直滾動(dòng)條；復(fù)選框的Value屬性可設(shè)置為

以下3種值:值0—Unchecked表示未選（默認(rèn)值）,“卜消失;值1-Checked表示選

中，復(fù)選框?qū)@示值2—Graved表示以灰色呈現(xiàn)。

13、下列不包含滾動(dòng)條的控件是

A、列表框

B、標(biāo)簽

C、組合框

D、文本框

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

知識(shí)點(diǎn)解析：列表框和組合框當(dāng)其項(xiàng)目較多時(shí)均會(huì)自動(dòng)出現(xiàn)滾動(dòng)條以便用戶能夠查

看每?項(xiàng)；文本框可以通過(guò)設(shè)汽ScrollBars屬性來(lái)設(shè)汽滾動(dòng)條，標(biāo)簽沒有滾動(dòng)條。

14、為了刪除列表框中的一個(gè)列表項(xiàng)，應(yīng)使用的列表框方法是

A^Move

B、Remove

C、Clear

D、Removeitem

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

知識(shí)點(diǎn)解析：Addhem方法可以向列表框中添加一個(gè)列表項(xiàng)，Removehem方法可

刪除列表框中的一列表項(xiàng)；Clear方法可以刪除列表框中的所有列表項(xiàng)。

15、以下不能設(shè)置Picture屬性的控件是

A、窗體

B、列表框

C、復(fù)選框

D、命令按鈕

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

知識(shí)點(diǎn)解析：窗體的Piclure屬性用于設(shè)置窗體的背景圖形；復(fù)選框的Slyle屬性為

1時(shí)將以圖形方式顯示，此時(shí)可以設(shè)置Piclure屬性來(lái)設(shè)置顯示的圖形；命令按鈕的

Picture可以設(shè)置圖形顯示，列表框不具備Picture屬性。

16、設(shè)窗體上有1個(gè)名稱為L(zhǎng)istl的列表框，程序運(yùn)行時(shí)，如果選中了第3個(gè)列表

項(xiàng)(最上面的列表項(xiàng)為第0個(gè)列表項(xiàng))，則下面不成立的是

A、List1.Sclcctcd(Listl.Listindex)的值為1rue

B、Listl.Selected。)的值為True

C、Listl.List(3)的值為True

D、Listl.Listindex的值為3

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

知識(shí)點(diǎn)解析?：列表框的List屬性是一個(gè)字符串?dāng)?shù)組，數(shù)組的一項(xiàng)就是一個(gè)列表項(xiàng)

目，可以通過(guò)下標(biāo)訪問數(shù)組中的值Selected屬性是一個(gè)數(shù)組，用于設(shè)置或返回指定

索引號(hào)列表項(xiàng)的選中狀態(tài)。值為True表示被選中：值為False表示未被選中。

Listindex屬性可返回當(dāng)前所選項(xiàng)目的索引號(hào)，其起始值為0,最后一項(xiàng)的值為

ListCount-I。當(dāng)Lisilndex的值為一1時(shí)，表示未選定項(xiàng)目。

17、下列控件中，不響應(yīng)Click事件的是

A、框架

B、標(biāo)簽

C、圖像框

D、形狀

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

知識(shí)點(diǎn)解析：輸入型控件一般都能響應(yīng)Click事件，但本題的選項(xiàng)均不是輸入型控

件.框架、標(biāo)簽和圖片框、圖像框雖然不是輸入型捽件.但是也能響應(yīng)Click事

件，形狀不能響應(yīng)Qick事件。

18、設(shè)窗體上有一個(gè)名稱為Checkl的復(fù)選框，并有下面程序代碼：PrivateSub

Check1MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)

Checkl.ValuedEndSub根據(jù)上面的事件過(guò)程，可以得出結(jié)論

A、鼠標(biāo)單擊該復(fù)選框，復(fù)選框的標(biāo)題被改為“1”

B、鼠標(biāo)右鍵單擊該復(fù)選框，可以選中該復(fù)選框

C、鼠標(biāo)左鍵單擊該復(fù)選框，它被選中，右鍵單擊它，取消選中

D、鼠標(biāo)右鍵單擊該復(fù)選框，它被選中，左鍵單擊它，取消選中

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

知識(shí)點(diǎn)解析：在復(fù)選框的鼠標(biāo)按下事件中，將復(fù)選框的Value屬性設(shè)置為1。復(fù)選

框的Value屬性可設(shè)置為以下3種值：值O-Unchecked表示未選(默認(rèn)值)，消

失；值1—Checked表示選中，復(fù)選框?qū)@示W(wǎng)”；值2—Grayed表示以灰色呈

現(xiàn)。

19、設(shè)窗體上有一個(gè)名禰為L(zhǎng)isll的列表框，并有若干列表項(xiàng)。下面語(yǔ)句中不能在

所有列表項(xiàng)之后追加一個(gè)列表項(xiàng)的是

A、Listl.List(Listl.ListCount尸'VB程序”

B、Listl.List(Listl.ListCount—1尸“VB程序"

C、Listl.AddltenTVB程序”

D、Listl.Addltem”VB程序“，Listl.ListCount

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

知識(shí)點(diǎn)解析：列表框的List屬性是一個(gè)字符串?dāng)?shù)組，數(shù)組的一項(xiàng)就是一個(gè)列表項(xiàng)

目，可以通過(guò)下標(biāo)訪問數(shù)組中的值。Listindex屬性可返回當(dāng)前所選項(xiàng)目的索引

號(hào)，其起始值為0,最后一項(xiàng)的值為L(zhǎng)istCounl—l。所以A選項(xiàng)為

Listl.List(Listl.ListCount)賦值,是在最后追加了一項(xiàng);C選項(xiàng)使用Additem方

法在最后追加一項(xiàng)；D選項(xiàng)是在Listl.ListCount的位置追加一項(xiàng)，其實(shí)也是在坡

后追加；B選項(xiàng)將會(huì)把現(xiàn)有列表的最后一項(xiàng)值改為“VB程序”。

20、已知列表框控件Listl中已放入若干表項(xiàng)，下列關(guān)于Listl的敘述中錯(cuò)誤的是

A、第一個(gè)表項(xiàng)的序號(hào)為0

B、沒有選中任何一個(gè)表項(xiàng)時(shí)，Lisllndex屬性的值為一1

C、最后一個(gè)表項(xiàng)的序號(hào)為L(zhǎng)istCount

D、可.用MulliSeleci屬性設(shè)置是否可多選

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

知識(shí)點(diǎn)解析?：列表框的List屬性是一個(gè)字符串?dāng)?shù)組，數(shù)組的一項(xiàng)就是一個(gè)列表項(xiàng)

目，可以通過(guò)下標(biāo)訪問數(shù)組中的值。Listlndcx屬性可返回當(dāng)前所選項(xiàng)目的索引

號(hào)，其起始值為0,最后一項(xiàng)的值為L(zhǎng)istCounl—1。當(dāng)Lisllndex的值為一1時(shí)，表

示未選定項(xiàng)目?？捎肕ultiSelect屬性設(shè)置是否可多選。

21、判斷復(fù)選框是否被選中的屬性為

A、Selected

R、Checked

C、Value

D、Index

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

知識(shí)點(diǎn)解析：復(fù)選框的Value屬性可設(shè)置為以下3種值：值0—Unchecked表示未

選(默認(rèn)值)，消失；值1—Checked表示選中，復(fù)選框?qū)@示“<”；值2—

Graved表示以灰色呈現(xiàn)。

22、窗體上有1個(gè)名稱為L(zhǎng)abell的標(biāo)簽；1個(gè)名稱為L(zhǎng)isll,且含有若干表項(xiàng)的列

表框。為了使得單擊Listl中某個(gè)表項(xiàng)時(shí)，在Labell中相應(yīng)地顯示該表項(xiàng)，應(yīng)使用

的程序代碼為

A、PrivateSubListl_Click()Label1.Caption=Listl.IndexEndSub

B、PrivateSubListl_Click()Label1.Caption=Listl.ListCountEndSub

C、PrivateSubListl_Click()Labcll.Caption=Listl.TextEndSub

D、PrivateSubListl_Click()Label1.Caption=Listl.SelectedEndSub

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

知識(shí)點(diǎn)0析：標(biāo)簽控件(Label)常用于顯示用戶不能直接改變的信息，其Caption屬

性用來(lái)設(shè)置其顯示的文本。列表框的Text屬性用于返回列表框中選擇的項(xiàng)目的內(nèi)

容，返回值總與列表框的Lisl(LislIndex)屬性的返回值相同，而列表框的Listindex

屬性只返回當(dāng)前選擇的項(xiàng)目的索引號(hào)。

23、以下關(guān)于控件的敘述中，正確的是

A、列表框包含了組合框的全部功能

B、列表框兼有組合框和文本框的功能

C、列表框和組合框具有完全不同的功能

D、組合框兼有列表框和文本框的功能

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

知識(shí)點(diǎn)解析：組合框(ComboBox)將文本框與列表框的特性組合在一起，既可在組

合框的文本框部分輸入信息，也可在列表框部分選擇項(xiàng)目。

24、判斷單選按鈕是否被選中的屬性為

A、Selected

B、Checked

C、Value

D、Index

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

知識(shí)點(diǎn)解析：Value屬性返回或設(shè)置單選按鈕的選口狀態(tài)，其中單選按鈕的Value

屬性可設(shè)置為兩種值：False表示未選(默認(rèn)值)；值為True表示選中，選擇某單選

按鈕后，該單選按鈕中將顯示

25、窗體上有名稱為Command1的命令按鈕，名稱分別為L(zhǎng)istl、List2的列表框,

其中Listl的MultiSclect屬性設(shè)置為1(Simple),并有如下事件過(guò)程：PrivateSub

Commandl_Click()Fori=0ToListl.ListCount-1IfListl.SeIected(i)=TrueThen

List2.AdditemTextEndIfNextEndSub上述事件過(guò)程的功能是將Listl中被選中

的列表項(xiàng)添加到List2中。運(yùn)行程序時(shí)，發(fā)現(xiàn)不能達(dá)到預(yù)期目的，應(yīng)做修改，下列

修改中正確的是

A、將For循環(huán)的終值改為L(zhǎng)istl.ListCount

B、將Listl.Selected⑴二True改為L(zhǎng)istl.List(i).Selected=True

C、將List2.AdditemText改為L(zhǎng)i$t2.AdditemListl.List(i)

D、將List2.AddkemText改為L(zhǎng)ist2.AdditemList1.Listindex

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

知識(shí)點(diǎn)3析：列表框的List屬性是一個(gè)字符串?dāng)?shù)組，數(shù)組的一項(xiàng)就是一個(gè)列表項(xiàng)

目，可以通過(guò)下標(biāo)訪問數(shù)組中的值。本題中試圖向List2中添加Listl中的列表

項(xiàng)，所以應(yīng)該是Lisl2.AddltemListl.List(i),列表框的Text屬性可返回列表框中

當(dāng)前選中項(xiàng)目的內(nèi)容，但不能加入一個(gè)沒有指明對(duì)象的Text屬性。

26、窗體上有一個(gè)名為L(zhǎng)isll的列表框和一個(gè)名為Commandl的命令按鈕，并有下

面的事件過(guò)程：PrivateSubCommandl_Click()n%=Listl.ListindexIfn>0Then

ch$=Listl.List(n)Listl.List(n)=Listl.List(n—1)：Listl.List(n-l)=chEndIfEnd

Sub程序運(yùn)行時(shí)，選中I個(gè)列表項(xiàng)，然后單擊Commandl按鈕，則產(chǎn)生的結(jié)果是

A、若選中的不是最前面的列表項(xiàng)，則選中的列表項(xiàng)與它前一個(gè)列表項(xiàng)互換位置

B、選中的列表項(xiàng)與它前面的列表項(xiàng)互換位置

C、若選中的不是最后面的列表項(xiàng)，則選中的列表項(xiàng)與它后一個(gè)列表項(xiàng)互換位置

D、選中的列表項(xiàng)與它后面的列表項(xiàng)互換位置

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

知識(shí)點(diǎn)解析：Lisi屬性是一個(gè)數(shù)組，存放列表框中所有項(xiàng)目的內(nèi)容；LisUndex屬性

可返回當(dāng)前所選項(xiàng)目的索引號(hào)，第一個(gè)項(xiàng)目的索引號(hào)為0。Listl.List(n-l)指的是

當(dāng)前選中列表項(xiàng)的前一個(gè)列表項(xiàng)。

27、窗體上有一個(gè)名稱為Combol的組合框，一個(gè)名稱為Commandl的命令按

鈕。要求編寫程序，在組合框中輸入一個(gè)字符串，當(dāng)單擊命令按鈕時(shí)，將該字符串

逐項(xiàng)與組合框中原有列表項(xiàng)進(jìn)行比較，若有相同列表項(xiàng)，則將其刪除；若沒有相同

列表項(xiàng)，則將其添加到組合框中?，F(xiàn)有人編寫如下程序，以期實(shí)現(xiàn)上述功能：

PrivateSubCommandl_Click()strl=Trim(Combol.Text)：flag=OIfstrlo^^Then

Fori=0ToCombol.LisiCount—1Ifstrl=Combol.List(i)Then

Combol.Removeitemi：Combol.TeXt='"'：Hag=lEndIfNextIfflag=lThen

Combol.AdditemCombol.TextEndIfEndSub程序中存在問題，以下關(guān)于程序問

題的敘述中，正確的是

A、For循環(huán)的循環(huán)初值i應(yīng)該從1開始

語(yǔ)句Combol.Removeitemi有錯(cuò)誤

C、語(yǔ)句Combol.AdditemCombol.Text有錯(cuò)，Combol.Text的內(nèi)容已存在于組

合框中

D、應(yīng)把程序倒數(shù)第3行中的Ifflag=l改為IfflagR

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

知識(shí)點(diǎn)解析：本題中首先用一個(gè)循環(huán)遍歷組合框的所有列表項(xiàng)，依次取出每一個(gè)列

表項(xiàng)與strl進(jìn)行比較，若相同則刪除該項(xiàng)，將flag置為1,否則。flag為1；循環(huán)

結(jié)束后如果flag的值為0則說(shuō)明沒有任何一個(gè)現(xiàn)有的列表項(xiàng)與strl相同，需要將

strl添加到組合框中，否則不需添加。

28、在窗體上畫一個(gè)名稱為L(zhǎng)istl的列表框，然后編寫如下程序：PrivateSub

FormClick()Fori=lTo10Item="Item"&i：Lisll.AdditemItemNextiEndSub程

序運(yùn)行時(shí)，單擊窗體，所完成的功能是

A、向列表框中添加10個(gè)項(xiàng)目

B、向列表框中添加II個(gè)項(xiàng)目

C、向列表框中添加10個(gè)數(shù)字

D、向列表框中添加I?10的和

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

知識(shí)點(diǎn)解析：本題中For循環(huán)執(zhí)行了10次，調(diào)用了10次Addllem方法，向列表框

中添加了10個(gè)項(xiàng)目。

29、設(shè)窗體上有一個(gè)名稱為L(zhǎng)istl的列表框和一個(gè)名稱為Checkl的復(fù)選框數(shù)組(下

標(biāo)從0開始)。程序運(yùn)行時(shí)，單擊某個(gè)復(fù)選框，如果列表框中沒有該復(fù)選框的標(biāo)

題，則把該復(fù)選框的標(biāo)題添加到列表框中，否則從列表框中把該復(fù)選框標(biāo)題刪除。

PrivateSubCheck1_Click(IndcxAsInteger)Fork=0ToListl.ListCount-1If

Checkl(Index).Caption=Listl.Lisl(k)ThenExitForNextkIfk

A、k

13、Chcckl.Caption

C>Checkl(k)

D^Checkl(Index).Caption

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

知識(shí)點(diǎn)解析：橫線處應(yīng)該填寫要添加進(jìn)列表框的項(xiàng)目?jī)?nèi)容，本題要求添加復(fù)選框的

標(biāo)題，由于復(fù)選框是一個(gè)控件數(shù)組，要想確定某一個(gè)具體的復(fù)選框需要使用控件數(shù)

組的下標(biāo)來(lái)訪問到控件，然后取出標(biāo)題屬性添加進(jìn)列表框中。

30、設(shè)窗體上有1個(gè)滾動(dòng)條要求單擊滾動(dòng)條右端的簍按鈕一次，滾動(dòng)塊移動(dòng)一定的

刻度值，決定此刻度值的屬性是

A、Max

B、Min

C^SmallChange

D、LargeChange

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

知識(shí)點(diǎn)解析：本題考查滾動(dòng)條屬性設(shè)置。滾動(dòng)條的Max屬性設(shè)置最大值，Min屬

性設(shè)置最小值，SmallChange決定在滾動(dòng)條兩端的箭頭鈕上單擊時(shí)改變的值，

LargeChange決定在滑塊上方或下方區(qū)域單擊時(shí)改變的值。

31、窗體上有兩個(gè)水平滾動(dòng)條HV、HT,還有一個(gè)文本框Textl和一個(gè)標(biāo)題為“計(jì)

算''的命令按鈕CommandI,并編寫了以卜下程序：PrivateSubCommandl_Click()

EndSubPablicSubcalc(xAsInteger,yAsInteger)Textl.Text=x*yEndSub運(yùn)行

程序，單擊“計(jì)算”按鈕，可根據(jù)速度與時(shí)間計(jì)算出距離，并顯示計(jì)算結(jié)果。對(duì)以上

程序，下列敘述中正確的是

A、過(guò)程調(diào)用語(yǔ)句不對(duì)，應(yīng)為calc(HV,HT)

B、過(guò)程定義語(yǔ)句的形式參數(shù)不對(duì)，應(yīng)為Subcalc(xAsControl,yAsControl)

C、計(jì)算結(jié)果在文本框中顯示出來(lái)

D、程序不能正確運(yùn)行

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

知識(shí)點(diǎn)解析：本題考查控件屬性和過(guò)程調(diào)用。在Command1的Click事件過(guò)程中，

調(diào)用calc過(guò)程，傳入的參數(shù)是兩個(gè)滾動(dòng)條的value值。在calc過(guò)程中，把x和y的

乘積(距離)顯示在文本框當(dāng)中。

32、滾動(dòng)條可以響應(yīng)的事件是

A^Load

B、Scroll

C、Click

D、MouseDown

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

知識(shí)點(diǎn)解析：本題考查滾動(dòng)條事件過(guò)程，滾動(dòng)條可以響應(yīng)Scroll事件。

33、設(shè)窗體上有一個(gè)名禰為HS1的水平滾動(dòng)條，如果執(zhí)行了語(yǔ)句：

HS1.Value=(HS1.Max—HS1.Min)/2+HSl.MmWJ：

A、滾動(dòng)塊處于最左端

B、滾動(dòng)快處于最右端

C、滾動(dòng)塊處于中間位置

D、滾動(dòng)塊可能處于任何位置，具體位置取決于Max、Min屬性的值

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

知識(shí)點(diǎn)解析：本題考查滾動(dòng)條的使用。根據(jù)HS1.Value=(HSI.Max-HSl.Min)/

2+HS1.Min可知，HS1.Value是在最小值的基礎(chǔ)上加上滾動(dòng)條長(zhǎng)度的一半，因

此滾動(dòng)條的滾動(dòng)塊位于中間位置。

國(guó)家二級(jí)VB機(jī)試(常用標(biāo)準(zhǔn)控件)模擬

試卷第2套

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

1、在窗體上畫一個(gè)文本框(名稱為Textl)和一個(gè)標(biāo)簽(名稱為L(zhǎng)ahell),程序運(yùn)行

后，在文本框中每輸入一個(gè)字符，都會(huì)立即在標(biāo)中顯示文本框中字符的個(gè)數(shù)。以下

可以實(shí)現(xiàn)上述操作的過(guò)程是()。

A、PrivateSubTextl_Change()Lahel1.Caption=str(kn(Textl.Text))EndSub

B、PlivateSubTextl_Click()LabelI.Caption=str(Lea(Textl.Text))EndSub

C^PrivateSubTextl_Change()LabelI.Caption=Textl.TextEndSub

D、PrivateSubLabell_Change()Label1.Caption=sty(Len(Textl.Text))EndSub

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

知識(shí)點(diǎn)解析：根據(jù)題意可知，在文本框中輸入字符這個(gè)動(dòng)作使標(biāo)簽上顯示的內(nèi)容發(fā)

生變化，說(shuō)明是文本框觸發(fā)了某事件，排除D選項(xiàng)；文本框中每輸入一個(gè)字符，

標(biāo)簽中立即就會(huì)發(fā)生變化，故是Change事件，排除B選項(xiàng)；標(biāo)簽中顯示的是文

本框中字符的個(gè)數(shù)，不是輸入的內(nèi)容，排除C選項(xiàng)。故A選項(xiàng)正確。

2、為了使標(biāo)簽控件在顯示其內(nèi)容時(shí)不覆蓋其背景內(nèi)容，需進(jìn)行設(shè)置的屬性為()。

A、BaekColor

B、BorderStyle

C、ForeColor

D、BackStyle

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

知識(shí)點(diǎn)解析：標(biāo)簽控件的BackStyle屬性值為。時(shí)，標(biāo)簽為透明的，不會(huì)遮住背景

內(nèi)容，BackS【yle屬性值為1時(shí)，標(biāo)簽將覆蓋背景。

3、為了使標(biāo)簽Label1透明且不具有邊框，以下正確的屬性設(shè)置是（）。

A、Label1.BackStyle=OLabel1.BOrdcrStyle=l

B、Label1.BackStyle=OLabel1.BorderStyle=0

C、Label1.BaekStyle=lLabel1.BorderStyle=l

D、Label1.BackStyle=lLabel1.BordcrStyle=0

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

知識(shí)點(diǎn)解析：BackSlyle屬性用于設(shè)置標(biāo)簽的背景樣式，有兩種值可選：0,表示

透明；1,表示不透明。BordcrStylc屬性用來(lái)設(shè)置標(biāo)簽的邊框類型，有兩種值可

選：0,代表標(biāo)簽無(wú)邊框；1。代表標(biāo)簽有邊框。

4、設(shè)Lahell、Command1,Textl,Checkl分別為標(biāo)簽、命令按鈕、文本框、復(fù)選

框的名稱，則以下屬性設(shè)置語(yǔ)句中，運(yùn)行時(shí)不會(huì)出錯(cuò)的是（）。

A、Label1.BaekStyle=2

B、Command1.Style=l

C>Textl.ScrollBars=4

D、CheckI.Value=2

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

知識(shí)點(diǎn)解析：標(biāo)簽的BackStyle屬性只有0、1兩個(gè)屬性值；命令按鈕的Style屬性

是只讀屬性，必須在屬性窗口設(shè)置；文本框的ScrollBars屬性只有0、1、2、3四

個(gè)屬件值.并且必須在屬性窗口設(shè)置c

5、要使標(biāo)簽中的文本靠右顯示，應(yīng)將其Aligment屬性設(shè)理為（）。

A、O-LeftJustify

1-RightJustify

C、2-Center

D、3

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

知識(shí)點(diǎn)解析：O-LeftJustify：文本靠左顯示；1-RighlJustify：文本靠右顯示；2-

Center：文本居中顯示。

6、以下關(guān)于圖片框控件的說(shuō)法中，錯(cuò)誤的是（）。

A、可以通過(guò)Print方法在圖片框中輸出文本

B、圖片框控件中的圖形可以在程序運(yùn)行過(guò)程中被清除

C、圖片框控件中可以放置其他控件

D、用Slretch屬性可以芻動(dòng)調(diào)整圖片框中圖形的劃、

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

知識(shí)點(diǎn)解析：可以通過(guò)Print方法在圖片框中輸出文件，圖片框中的圖形可以在程

序運(yùn)行過(guò)程中通過(guò)載入空文件的方法清除，圖片框控件可以作為父控件，即可以

放置其他控件，Stretch屬性用來(lái)自動(dòng)調(diào)整圖片框中圖形內(nèi)容的大小。

7、在設(shè)計(jì)階段，假定在圖片框Picturel中裝入了一個(gè)圖形，為了刪除該圖片框控

件，應(yīng)采用的正確操作是()。

A、選擇圖片框，然后按Del鍵

B>執(zhí)行語(yǔ)句Picturel.Eicturc=LoadFicturcC，")

C、執(zhí)行語(yǔ)句Piclurel.Picture="n

D、選擇圖片框，在屬性窗口中選擇Picture屬性，然后按回車鍵

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

知識(shí)點(diǎn)解析：刪除圖片框控件，先選擇圖片框，然后按Del鍵。

8、設(shè)窗體上有一個(gè)Picluml圖片框，要求在圖片框中的指定位置(坐標(biāo)為(500,

300))輸出“OK”，下面可以實(shí)現(xiàn)這一功能的事件過(guò)程是()。

A、PrivateSubForm_Click()Picturel.CurrentX=500PictureI.CurrenlY=300

Picture1.PrinfOK'*EndSub

B、PrivateSubForm_Click()Picturel.Lcft=500Picture1.Top=300

Picturel.Print"OK"EndSub

C^PrivaleSubForm_Chck()Picturel.CurrntX=500Picturel.CurrentY=300

Prinf'OK"EndSub

D、PrivateSubForm_Ciick()Pictum1.Left=500Picture1.Top=300Print"OK"End

Sub

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

知識(shí)點(diǎn)解析:VisualBasic中，窗體和圖片框具有CurrentX、CurrentY屬性,經(jīng)常

用這兩個(gè)屬性來(lái)設(shè)置當(dāng)前繪圖點(diǎn)。VisualBasic中在圖片框特定位置顯示文本：

Picturel.CurrentX=x坐標(biāo)設(shè)置當(dāng)前X方向坐標(biāo)Picturel.CurremY=y坐標(biāo)設(shè)置當(dāng)

前Y方向坐標(biāo)Picturel.Print“文本內(nèi)容”在當(dāng)前位也輸出文本

9、為了調(diào)整圖像框的大小以與其中的圖形相適應(yīng)，必須把它的Streich屬性設(shè)置為

()。

A、True

B、False

C、1

D、2

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

知識(shí)點(diǎn)解析：圖像框的Stretch屬性值為False時(shí)，將自動(dòng)放大或縮小圖像框中的圖

形以與圖像框的大小相適應(yīng)。

10、窗體上有一個(gè)如￡$件中顯示了如圖所示的文字，可以判

斷這個(gè)圖形控件（）。

A、是圖像框（Image）

B、是圖片框（PictureBox）

C、是形狀控件

D、不是上述3種控件中的一種

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

知識(shí)點(diǎn)解析：圖片框是“容器”控件，可以作為父控件，而圖像框不能。圖片框可以

通過(guò)Print方法接收文本，并可接收由像素組成的圖形，而圖像框不能接收Print方

法輸入的信息，也不能用繪圖方法在圖像框上繪制圖形。而形狀控件3D效果的樣

式，根據(jù)題目圖示顯然不是形狀控件。因此這個(gè)圖形控件是圖片框。

11、若已把一個(gè)命令按鈕的Default屬性設(shè)置為True,則下面可導(dǎo)致按鈕的Click

事件過(guò)程被調(diào)用的操作是（）。

A、用鼠標(biāo)右鍵單擊此按鈕

B、按鍵盤上的Esc鍵

C、按鍵盤上的Enter鍵

D、用鼠標(biāo)右鍵雙擊此按鈕

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

知識(shí)點(diǎn)解析：當(dāng)命令按班的Default屬性值為True時(shí)，程序運(yùn)行，按回車鍵和單擊

該命令按鈕一樣都會(huì)觸發(fā)按鈕的Click事件；當(dāng)命令按鈕的Cancel屬性值為True

時(shí)，程序運(yùn)行，按Esc鍵和單擊該命令按鈕都會(huì)觸發(fā)按鈕的Click事件。故選C。

12、如果把命令按鈕的Cancel屬性設(shè)置為True,則程序運(yùn)行后（）。

A、按Esc鍵與單擊該命令按鈕的作用相同

B、按同車鍵與單擊該命令按鈕的作用相同

C、按Esc鍵將停止程序的運(yùn)行

D、按回車鍵將中斷程序的運(yùn)行

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

知識(shí)點(diǎn)解析：當(dāng)一個(gè)命令按鈕的Cancel屬性被設(shè)置為True時(shí)，按Esc鍵與單擊該

命令按鈕的作用相同。在一個(gè)窗體中，只能有一個(gè)命令按鈕的Cancel屬性被設(shè)置

為Trueo

13、下列說(shuō)法中，錯(cuò)誤的是（）。

A、將焦點(diǎn)移至命令按鈕上，按Enter鍵，則引發(fā)命令按鈕的Click事件

B、單擊命令按鈕，將引發(fā)命令按鈕的Chck事件

C、命令按鈕沒有Picture屬性

D、命令按鈕不支持DbICIick事件

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

知識(shí)點(diǎn)解析：按鈕的Picture屬性可以給命令按鈕指定一個(gè)圖形，為了使用這個(gè)屬

性，必須把Slyle屬性設(shè)置為1。單擊命令按鈕或?qū)⒔裹c(diǎn)移至命令按鈕上，按Enler

鍵，都會(huì)引發(fā)命令按鈕的Click事件。命令按鈕不支持DbICIick事件。

14、在窗體上畫兩個(gè)單選按鈕,名稱分別為Optionl、Option2.標(biāo)題分別為“宋體”

和“黑體”一個(gè)復(fù)選框（名稱為Check1,標(biāo)題為“粗體”）和1個(gè)文本框（名稱為TexU,

Text屬性為“改變文字字體）窗體外觀如圖所示。程序運(yùn)行后，要求“宋體”單選

按鈕和'、粗體''夏選框被選中，則以下能夠?qū)崿F(xiàn)上述操作的語(yǔ)句序列是（）。

A、Option1.Value=FalseCheck1.Value=True

B、Option1.Value=TrueCheck1.Value=0

C>Option2.Value=FalseCheck1.Valuc=2

D、OptionI.Value=TrueCheck1.Value=l

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

知識(shí)點(diǎn)解析：?jiǎn)芜x按鈕控件的Value屬性值為True表示被選中，F(xiàn)alse表示未被選

中；復(fù)選框控件的Value屬性值為0表示未選中，1表示選中，2表示禁止。本題

中是單選按鈕和復(fù)選框都被選中，故D選項(xiàng)正確。

15、以下不屬于單選按鈕的屬性是（）。

A、Caption

Name

C、Min

D、Enabled

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

知識(shí)點(diǎn)解析：?jiǎn)芜x按鈕沒有Min屬性，滾動(dòng)條控件的屬性中有Min屬性。

16、窗體上有名稱為L(zhǎng)E1的列表框。以下能夠?qū)⒘斜砜虍?dāng)前選定的列表項(xiàng)替換為

字符串“Basic”的語(yǔ)句是

AsListI.AddItem"Basic"

B、List!.List（Listl.Listindex）="Basic"

C、Listl=Text="Basic"

D、以上都可以

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

知識(shí)點(diǎn)解析：Addllem月于將列表項(xiàng)添加到列表框cText屬性是被選定的選項(xiàng)的文

本內(nèi)容。列表框的List屬性用來(lái)列出列表項(xiàng)的內(nèi)容，也可以改變數(shù)組中的已有

值，屬性Listlndex用于返回當(dāng)前選擇的列表項(xiàng)的索引號(hào)。選項(xiàng)B正確。

17、在窗體上畫一個(gè)名禰為L(zhǎng)istl的列表框，然后編寫如下程序：PrivateSub

Form_Click()Fori=1To10Item="Item"&iListl.AddhemItemNextiEndSub程序

運(yùn)行出單擊窗體，所完成的功能是()。

A、向列表框中添加10個(gè)項(xiàng)目

B、向列表框中添加11個(gè)項(xiàng)目

C、向列表框中添加1。個(gè)數(shù)字

D、向列表框中添加1?10的和

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

知識(shí)點(diǎn)解析：Addltcm為添加項(xiàng)目。循環(huán)體執(zhí)行10次，添加了10個(gè)項(xiàng)目，故選

Ao

18、設(shè)窗體上有一個(gè)名禰為L(zhǎng)istl的列表框和一個(gè)名稱為Checkl的復(fù)選框數(shù)組(下

標(biāo)從0開始)。程序運(yùn)行時(shí)，單擊某個(gè)復(fù)選框，如果列表框中沒有該復(fù)選框的標(biāo)

題，則把該復(fù)選框的標(biāo)題添加到列表框中，否則從列表框中把該復(fù)選框標(biāo)題刪除。

PrivateSubCheck1_Chck(IndexAsInteger)Fork=0ToListl.ListCount-1If

Chcckl(Index).Caption=Listl.List(k)ThcnExitForEndIfNextkIfk<

Listl.ListCountThenListl.RemoveltemkElseListl.AdditemEndIfEnd

Sub為使上面程序可以實(shí)現(xiàn)該功能，程序代碼中橫線上應(yīng)該填入的代碼是()。

A、k

B、CheckI.Caption

C、Checkl(k)

D、Chcckl(Index).Caption

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

知識(shí)點(diǎn)解析：題干給出的是沒有該復(fù)選框的標(biāo)題時(shí)，把該復(fù)選框的標(biāo)題添加到列表

框中。Listl.Addhem可以為列表框添加新項(xiàng)，但需要添加的新項(xiàng)要根據(jù)索引添

加。故選D。

19、窗體上有名稱為Commandl的命令按鈕，名稱分別為L(zhǎng)istl、List2的列表框，

其中Listl的MultiSelecl屬性設(shè)也為1(Simple),并有如卜事件過(guò)程：PrivateSub

Commandl_Click()Fori=0ToListl.ListCount-1IfListl.Selected(i)=TrueThen

List2.AdditemTextEndIfNextEndSub上述事件迂程的功能是將Listl中被選中

的列表項(xiàng)添加到List2中。運(yùn)行程序時(shí),發(fā)現(xiàn)不能達(dá)到預(yù)期目的,應(yīng)做修改，下列

修改中正確的是()。

A、將For循環(huán)的終值改為L(zhǎng)istl.ListCount

B、將Listl.Selected(i)=True改為L(zhǎng)istl.List(i).Selected=True

C、將List2.AdditemText改為L(zhǎng)ist2.AdditemListl.List(i)

D、將List2.AdditemText改為L(zhǎng)ist2.AddhemList1.Listindex

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

知識(shí)點(diǎn)解析:題目程序不能將目程中的選中項(xiàng)添加到List2中,List2.Additem

Text一行有誤，應(yīng)該改為L(zhǎng)ist2.AddlternListl.List⑴才能使Listl中每個(gè)選中的行

添加到List2中。列表框控件的List屬性保存了列表框中所有值的數(shù)組，可以通過(guò)

下標(biāo)訪問數(shù)組中的值。

20、耍刪除列表框中最后一個(gè)列表項(xiàng)，正確的語(yǔ)句是（）。

A、Listl.RcmoveltemListCount

B、Listl.RemoveitemListl.ListCount

C、List1.RemoveitemListCount-1

D、ListI.RcmovcltcmListl.ListCount-1

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

知識(shí)點(diǎn)解析：ListCount屬性返回列表框中列表項(xiàng)的個(gè)數(shù)，列表項(xiàng)的索引號(hào)從0開

始，所以要?jiǎng)h除最后一個(gè)列表項(xiàng)，Removcltcm方法中的索引號(hào)就應(yīng)該是

List1.ListCount-1,故D選項(xiàng)正確。

21、設(shè)窗體上有1個(gè)水平滾動(dòng)條，已經(jīng)通過(guò)屬性窗口把它的Max屬性設(shè)置為1,

Min屬性設(shè)置為100。下面敘述中正確的是（）。

A、程序運(yùn)行時(shí)，若使?jié)L動(dòng)塊向左移動(dòng)，滾動(dòng)條的Value屬性值就增加

B、程序運(yùn)行時(shí)，若使?jié)L動(dòng)塊向左移動(dòng)，滾動(dòng)條的Value屬性值就減少

C、由于滾動(dòng)條的Max屬性值小于Min屬性值，程序會(huì)出錯(cuò)

D、由于滾動(dòng)條的Max屬性值小于Min屬性值，程序運(yùn)行時(shí)滾動(dòng)條的長(zhǎng)度會(huì)縮為

一點(diǎn)，滾動(dòng)塊無(wú)法移動(dòng)

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

知識(shí)點(diǎn)解析：水平滾動(dòng)條的Max和Min屬性值可以是0?32767中任意值。當(dāng)Max

>Min屬性值時(shí)，滾動(dòng)塊伺右移動(dòng)Value屬性值增加，向左移動(dòng)Value屬性值減

少；反之，當(dāng)MaxVMin屬性值時(shí)，滾動(dòng)塊向右移動(dòng)Value屬性值減少，向左增

加；當(dāng)它們Max=Min的，滾動(dòng)塊不能移動(dòng)。故A選項(xiàng)正確。

22、關(guān)于水平滾動(dòng)條，如下敘述中錯(cuò)誤的是（）。

A、當(dāng)滾動(dòng)框的位置改變時(shí)，觸發(fā)Change事件

B、當(dāng)拖動(dòng)滾動(dòng)條中的滾動(dòng)框時(shí)，觸發(fā)Scroll事件

C、LargeChange屬性是滾動(dòng)條的最大值

D、Value是滾動(dòng)條中滾動(dòng)框的當(dāng)前值

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

知識(shí)點(diǎn)解析：LargeChange屬性值是單擊滾動(dòng)塊和左右兩端箭頭之間空白的地方

時(shí)，Value增加或減少的量，Small屬性值才是滾動(dòng)條的最大值。故C選項(xiàng)錯(cuò)誤。

23、窗體上有一個(gè)名稱為VSemlll的垂直滾動(dòng)條，為了設(shè)定單擊滾動(dòng)條兩端箭頭

時(shí)的Value增量值，應(yīng)設(shè)置的屬性是（）。

A、LargeChange

SmallChange

C>Max

D、Min

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

知識(shí)點(diǎn)解析：SmallChange屬性表示當(dāng)用戶單擊滾動(dòng)條兩端的箭頭時(shí):Value屬性

值的增加或減小的量，默認(rèn)值為1。

24、窗體上有兩個(gè)水平滾動(dòng)條HV、HT,還有一個(gè)文本框Textl和一個(gè)標(biāo)題為“計(jì)

算''的命令按鈕Command1,并編寫了以下程序：

PrivateSubCommandl_Click()Callcalc(HV.Value.HT.Value)EndSubPublic

SubCalc(xAsInteger,yAsInteger)Tcxtl.Tcxt=x*yEndSub運(yùn)行程序，單擊“計(jì)

算”按鈕，可根據(jù)速度與時(shí)間計(jì)算出距離，并顯示算結(jié)果。時(shí)以上程序，下列敘

述中正確的是()。

A、過(guò)程調(diào)用語(yǔ)句不對(duì)，應(yīng)為calc(HV,HT)

B、過(guò)程定義語(yǔ)句的形式參數(shù)不對(duì)，應(yīng)為Subcalc(xAsComrol,yAsControl)

C、計(jì)算結(jié)果在文木框中顯示出來(lái)

D、程序不能正確運(yùn)行

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

知識(shí)點(diǎn)解析：訪問滾動(dòng)條控件的值，可以直接使用控件的名稱，也可以在名稱后面

指明Value屬性。滾動(dòng)條位置是用數(shù)值來(lái)表示的，因此定義Calc過(guò)程時(shí)參數(shù)應(yīng)該

定義為Imeger類型。程序中，Textl.Text=x*y語(yǔ)句說(shuō)明計(jì)算的結(jié)果在文本框中顯

不出來(lái)。

25、窗體上有一個(gè)名稱為HScrolIl的滾動(dòng)條，程序運(yùn)行后，當(dāng)單擊滾動(dòng)條兩端的

箭頭時(shí)，立即在窗體上顯示滾動(dòng)框的位置(即刻度值)。下面能夠?qū)崿F(xiàn)上述操作的事

件過(guò)程是()。

A、PrivateSubHScrollI_Change()PrintHScroll1.ValueEndSub

PrivateSubHScrolll_Change()PrintHScrolIl.SmallChangeEndSub

C、PrivmcSubHScrolll_Scroll()PrintHScrolIl.ValueEndSub

D、PrivateSubHScrolll_Scrol1()PrimHScroll1.SmallChangeEndSub

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

知識(shí)點(diǎn)解析：根據(jù)題意可知，用戶的操作是單擊滾動(dòng)條兩端的箭頭，敞觸發(fā)的是滾

動(dòng)條的Change事件；在整上顯示的是滾動(dòng)框的位置，即滾動(dòng)條的當(dāng)前刻度值，

Value屬性值可返回這個(gè)值，綜合一下，故A選項(xiàng)正確。

26、定時(shí)器的Interval屬性的值是一個(gè)整數(shù)，它表示的是()。

A、毫秒數(shù)

B、秒數(shù)

C、分鐘數(shù)

D、小時(shí)數(shù)

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

知識(shí)點(diǎn)解析：Interval的屬性值是以亳秒計(jì)，所以是毫秒數(shù)。故選A。

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

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

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

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

屬性設(shè)置為1000,并編寫了如下程序：PrivateSubTimerl_Timer（）For

k=Linel.XIToLine2.XIStep100IfShape1.Left+Shapcl.Width<Line2.XI

ThenShape1.Left=Shapel.Left+100EndIfNextkEndSub運(yùn)行程序時(shí)發(fā)現(xiàn)圓立即

移動(dòng)到了右邊的直線處，與題目要求的移動(dòng)方式不符。為得到與題目要求相符的結(jié)

果.下面修改方案中正確的是（）.

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

B、把Fork=Linel.XIToLine2.XIStep100和Nextk兩行刪除

C、把Fork二Linel.XIToLine2.XIStep100改為Fork=Line2.XIToLnel.XI

Step100

D、把IfShapel.Left+Shapel.Width<Line2.XIThen改為IfShape1.Left<

Line2.XIThen

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

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

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

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

28、為了暫時(shí)關(guān)閉計(jì)時(shí)器，應(yīng)把它的一個(gè)屬性設(shè)置為False,這個(gè)屬性是（）。

A、Visible

B>Timer

C^Enabled

D、Interval

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

知識(shí)點(diǎn)解析：Enabled是用來(lái)設(shè)置控件是否可用，幣Visible是用來(lái)設(shè)置控件是否可

見。計(jì)時(shí)器控件Enabled屬性設(shè)置為False,則停止計(jì)數(shù)；設(shè)置為True,則開始計(jì)

數(shù)。

29、下面哪個(gè)屬性肯定不是框架控件的屬性（）。

A、Text

B、Caption

C^Left

D^Enabled

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

知識(shí)點(diǎn)解析：框架沒有Text屬性。故選A。

30、下列針對(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,它不接受用戶輸入，不能顯示文本和圖形，也不能與圖形相

連。

31、如果在框架中畫了2個(gè)復(fù)選框，且框架的Enabled屬性被設(shè)置為False,2個(gè)復(fù)

選框的Enabled屬性被設(shè)置為True,則下面敘述中正確的是（）。

A、2個(gè)復(fù)選框可用

B、2個(gè)復(fù)選框不可用

C、2個(gè)復(fù)選框不顯示

D、上述都不對(duì)

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

知識(shí)點(diǎn)解析：對(duì)于框架來(lái)說(shuō)，通常把Enable屬性設(shè)置為True,這樣才能保證框架

內(nèi)的對(duì)象是“活動(dòng)”的。如果把框架的Enable屬性設(shè)置為False,則其標(biāo)題變灰，其

中的所有對(duì)象，包括文本框、命令按鈕、復(fù)選框等其他對(duì)象都會(huì)被屏蔽，雖然顯示

但不可用。

32、以下能夠設(shè)置控件焦點(diǎn)的方法是（）。

A、SetFocus

B、GotFocus

C^LostFocus

D、TabStop

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

知識(shí)點(diǎn)解析：GotFocus和LostFocus是控件獲得焦點(diǎn)和失去焦點(diǎn)時(shí)觸發(fā)的兩個(gè)事

件；TabStop是控件的屬性；SetFocus方法是控件設(shè)置、獲得焦點(diǎn)的方法。故選

Ao

33、以下關(guān)于框架的敘述中，錯(cuò)誤的是（）。

A、框架能夠響應(yīng)Click事件

B、框架是一個(gè)容器

C、框架的Enabled屬性為False時(shí)，框架內(nèi)的控件均被屏蔽

D、框架可以獲得焦點(diǎn)

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

知識(shí)點(diǎn)解析：標(biāo)簽、框架、菜單、直線、形狀、圖像框、計(jì)時(shí)器都不能接收焦點(diǎn)。

國(guó)家二級(jí)VB機(jī)試（常用標(biāo)準(zhǔn)控件）模擬

試卷第3套

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

1、為了使文本框顯示滾動(dòng)條，除要設(shè)置ScrollBars外，還必須設(shè)置的屬性是

A、AutoSize

B、Alignment

C、Multiline

D、MaxLength

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

知識(shí)點(diǎn)解析：ScrollBars屬性用于設(shè)置文本框是否有水平或垂直滾動(dòng)條，可設(shè)置成

4種值：①0-表示沒有滾動(dòng)條（默認(rèn)值）；②1-表示只有水平滾動(dòng)條；③2.表示只

有垂直滾動(dòng)條：④3-表示有水平和垂直滾動(dòng)條。設(shè)置0以外的值時(shí)MultiLine屬性

值必須為Trueo

2、在窗體上畫一文本框，其名稱為Texll,為了在程序運(yùn)行后隱藏該文本框，應(yīng)

使用的語(yǔ)句為

A、Textl.Clear

B、Textl.Visible=False

C、Textl.Hide

D、Textl.Enabled=False

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

知識(shí)點(diǎn)解析：文本框具有Enabled屬性和Visible屬性，Enabled屬性設(shè)置文本框在

運(yùn)行時(shí)是否可用，Visible屬性設(shè)置文本框在運(yùn)行時(shí)是否可見。

3、如果把文本框的Enabled屬性設(shè)置為False并運(yùn)行程序，則以下敘述中正確的是

A、文本框中的文本變?yōu)榛疑?，且不能將光?biāo)置于文本框上

B、文本框中的文本變?yōu)榛疑?，可以將光?biāo)置于文本框上，但不能改變文本框中的

內(nèi)容

C、文本框中的文本變?yōu)榛疑?，可以改變文本框中的?nèi)容

D、文本框中的文本正常顯示，可以將光標(biāo)置于文本框上，但不能改變文本框中的

內(nèi)容

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

知識(shí)點(diǎn)解析：文本框的Enabled屬性返回或設(shè)置一個(gè)值，用來(lái)確定文本框是否可

用。值為True時(shí)，文本框可以響應(yīng)用戶的操作：值為False時(shí)，文本框不能響應(yīng)用

戶的操作，此時(shí)對(duì)象變?yōu)榛疑?，且無(wú)法將光標(biāo)置于其上。

4、要使標(biāo)簽中的文本靠右顯示，應(yīng)將其Aligment屬性設(shè)置為

A、O-LeftJustify

B、I-RightJustify

C、2-Center

D、3

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

知識(shí)點(diǎn)解析：標(biāo)簽的Alignmem屬性用來(lái)確定標(biāo)簽中標(biāo)題的放置方式，可設(shè)置為

0（靠左，默認(rèn)）、1（靠右）或2（居中）。

5、下列關(guān)于標(biāo)簽的描述中，錯(cuò)誤的是

A、標(biāo)簽可以響應(yīng)Click事件

B、標(biāo)簽不能響應(yīng)DbIClick事件

C、為了使標(biāo)簽的Wordwrap屬性起作用，必須將其AutoSize屬性設(shè)置為True

D、標(biāo)簽上顯示的文本就是Caption屬性的值

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

知識(shí)點(diǎn)解析：標(biāo)簽的默認(rèn)屬性是Caption屬性，即在標(biāo)簽上顯示的文本。wlordwrap

屬性用于設(shè)置標(biāo)簽調(diào)整大小的方式，可取True和False兩種值，默認(rèn)為False。值

為True,標(biāo)簽在垂直方向根據(jù)標(biāo)題內(nèi)容變化大小，水甲方向不變：值為False,標(biāo)

簽在水平方向根據(jù)標(biāo)題內(nèi)容變化大小，垂直方向不變。為了使wordwrap屬性牛

效，必須把標(biāo)簽的Autosize屬性設(shè)置為True。標(biāo)簽可觸發(fā)click和DbIClick事件。

6、以下關(guān)于圖片框控件的說(shuō)法中，錯(cuò)誤的是

A、可以通過(guò)Print方法在圖片框中輸出文本

B、圖片框控件中的圖形可以在程序運(yùn)行過(guò)程中被清除

C、圖片框控件中可以放置其他控件

D、用Stretch屬性可以芻動(dòng)調(diào)整圖片框中圖形的大小

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

知識(shí)點(diǎn)解析：圖片框控件可作為容器使用，即圖片框控件中可以放置其他控件；圖

片框也可用Print方法在圖片框上輸出文本數(shù)據(jù)；圖片框控件中的圖形可以在程序

運(yùn)行過(guò)程中被清除或者重新設(shè)置：用Sketch屈性可以自動(dòng)調(diào)整圖像框中圖形的大

7、窗體上有1個(gè)Timerl計(jì)時(shí)器，1個(gè)Shapel形狀控件，還有下面程序代碼：Dim

flagAsBooleanPrivateSubTimer1Timer()PrivateSubForm_Load()IfflagThen

flag=TrueShapel.Height=Shapel.Height*2Timerl.Enabled=TrueShape

1.Width=Shape1.Width*2Timerl.IntervaI=1000ElseEndSubShape

1.Height=Shape1.Height*0.5Shape1.Width=Shape1.Width*0.5EndIf

flag=NotflagEndSub執(zhí)行程序所產(chǎn)生的效果是

A、Shapel的尺寸在縮小到原來(lái)一半和恢復(fù)原狀這2種狀態(tài)間切換，每秒切換一次

B、Shapel的尺寸在擴(kuò)大到原來(lái)2倍和恢復(fù)原狀這2種狀態(tài)間切換，每秒切換一次

C、Sh叩cl的尺寸在縮小到原來(lái)一半和擴(kuò)大到原來(lái)2倍這2種狀態(tài)間切換，每秒切

換一次

D、Shapel的尺寸會(huì)不斷擴(kuò)大

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

知識(shí)點(diǎn)解析：在計(jì)時(shí)器事件中會(huì)判斷窗體級(jí)變量Hag的值，如果為真則形狀尺寸

擴(kuò)大一倍，否則縮小到一半。由于第一次開始計(jì)時(shí)器事件的時(shí)候flag的值為

True,所以首先會(huì)將形狀擴(kuò)大一倍，然后第二次計(jì)時(shí)器事件將形狀恢復(fù)原狀。

8、以下不能用形狀控件畫出的圖形是

A、矩形

B、圓形

C、橢圓

D、扇形

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

知識(shí)點(diǎn)解析：設(shè)置形狀控件的Shape屬性，可以使其呈現(xiàn)為矩形、正方形、圓角矩

形、圓角正方形、橢圓和圓。

9、設(shè)窗體上有3個(gè)圖像框：Imagel、Image2、Image3,并有下面的程序代碼:

PrivateSubFormLoad()PrivateSubImagc2Click()

Image1.Picture=LoadPicture("LEAF.bmp"lImage3.Picture=hnage2.Picture

Imagc2.Picturc=LoadPicturc("OPEN.bmp")Imagc2.Picturc=Imagc1.Picture

Image3.Visible=FalseImage1.Picture=Image3.PictureEndSubEndSubPrivate

SubImagel_Click()Imase2.Picture=Image1.PictureEndSub在程序運(yùn)行期間單

擊Imagc2,則在窗竺上看到的結(jié)果是

A、在Image3中顯示Image2中的圖片

B、Image1、Image2中原有圖片被交換了

C>ImagekImage2中都是原來(lái)Imcgcl中的圖片

D、ImageI、Image2中都是原來(lái)Imege2中的圖片

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

知識(shí)點(diǎn)解析：本題中在窗體的Load事件中將Imagc3設(shè)置為不可見，然后在Image1

的單擊事件中將Image2中的圖片放到Imagel中；在Image2的單擊事件中使用

Image3作為中間控件完成了Imagel、Image2中原有圖片的交換。

10、下列說(shuō)法中，錯(cuò)誤的是

A、將焦點(diǎn)移至命令按鈕上，按Emer鍵，則引發(fā)命令按鈕的Click事件

B、單擊命令按鈕，將引發(fā)命令按鈕的Click事件

C、命令按鈕沒有Picture屬性

D、命令按鈕不支持DbICIick事件

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

知識(shí)點(diǎn)解析：命令按鈕最常用的事件是單擊（Click）事件，當(dāng)單擊一個(gè)命令按鈕或者

焦點(diǎn)在命令按鈕上時(shí)按下Enter鍵，都可以觸發(fā)Click事件。命令按鈕不支持

DblClick事件。命令按鈕的Picture屬性用于設(shè)置命令按鈕中要顯示的圖形。（注

意：要使Picture屬性的設(shè)置有效，命令按鈕的Style屬性必須設(shè)置為“

11、下面關(guān)于命令按鈕的敘述中錯(cuò)誤的是

A、命令按鈕上可以顯示圖片

B、命令按鈕上的文字就是其Caplion屬性的值

C、在程序運(yùn)行過(guò)程中，不能改變命令按鈕的標(biāo)題

D、運(yùn)行程序時(shí)，當(dāng)命令按鈕獲得焦點(diǎn)后，按下回車鍵也能激活它的Chck事件

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

知識(shí)點(diǎn)球析：命令按鈕的Picture屬性用來(lái)設(shè)置命令按鈕上顯示的圖片：命令按鈕

上顯示的文字是標(biāo)題（C叩tion）屬性，程序運(yùn)行時(shí)可以通過(guò)改變按鈕的Caption屬性

值來(lái)改變命令按鈕上的文字；運(yùn)行程序時(shí)，當(dāng)命令按鈕獲得焦點(diǎn)后，按下回車鍵也

能激活它的Click事件。

12、設(shè)窗體上有名稱為Option1的單選按鈕，且程序中有語(yǔ)句：If

Optionl.Value=T