國家二級VB機(jī)試（基本操作題）模擬試卷1

國家二級VB機(jī)試（基本操作題）模擬試

卷第1套

一、基本操作題（本題共10題，每題1.0分，共10

分。）

1、⑴在名稱為Forml的窗體上添加一個名稱為L1的標(biāo)簽，標(biāo)簽上標(biāo)題為“請輸入

密碼“，添加一個名稱為Texll的文本框，其寬、高分別為2000和300,設(shè)置適當(dāng)

的屬性，使得在輸入密碼時，文本框中顯示為“*”字符，此外再把窗體的標(biāo)題設(shè)置

為“密碼窗口”，以上這些設(shè)置都必須在屬性窗口中進(jìn)行，程序運(yùn)行時的窗體如圖所

示。注意：存盤時必須存放在考生文件夾下，工程文件名保存為sjll.vbp,窗體

文件名保存為sjtl.frm。

（2）在名稱為Forml的窗體上添加一個名稱為P1的圖片框，請編寫適當(dāng)?shù)氖录^

程，使得程序在運(yùn)行時，每單擊一次圖片框，就在圖片框中輸出“單擊圖片框“，每

單擊圖片框外的窗體一次，就在窗體中輸出“單擊窗體”，運(yùn)行時的窗體如圖所示。

要求在程序中不得使用變量，每個事件過程中只能寫一條語句。注意：存盤時必

須存放在考生文件夾下，工程文件名保存為sjt2.vbp,窗體文件名保存為

標(biāo)準(zhǔn)答案：（1）【操作步驟】步驟1：新建一個窗體，按照要求建立控件并設(shè)置其

屬性，如圖3.11所示。圖3.11

程序中用到的控件及屬性如表3.7所示。

表3.7

IF控件屬性設(shè)置值

NameTextl

Height300

文本框

PaMwordChar,

Width2(XX)

Name1.1

標(biāo)簽

Caption清輸入密碼

窗體Caption-----.密碼力”-----步驟2：調(diào)試并運(yùn)行程

序，效果如圖3.12所示。圖3.12步驟

3：關(guān)閉程序后按題目要求保存工程和窗體文件。（2）【操作步驟】步驟1：新建一

個窗體，按照題目要求建立控件并設(shè)置其屬性，如圖3.13所示。

?313步驟2：打開代碼編輯窗

口，在指定位置編寫如下代碼。參考答案PrivaleSubForm_Click()Forml.Print'1

單擊窗體"EndSubPrivateSubPl_Click()Pl.Print"單擊圖片框"EndSub步驟3：

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

知識點(diǎn)解析：暫無解析

2、(1)在名稱為Forml的窗體上添加兩個名稱分別為Textl和Text2的文本框，它

們的高、寬分別為300、2400和1200、2400<>窗體的標(biāo)題為“窗口”。請通過屬性

窗口設(shè)置適當(dāng)?shù)膶傩?，滿足如下要求：①Text2可以顯示多行文本，并且有垂直和

水平兩個滾動條；②程序運(yùn)行時在Textl中顯示輸入的字符為“*程序運(yùn)行后的

窗體如圖所示。

注意：存盤時必須存放在考生文件夾下，工程文件名保存為sjtl.vbp,窗體文件

名保存為sjtl.Gm。（2）在名稱為Forml的窗體上添加一個名稱為Imagel的圖像

框，其高、寬分別為1900、1700,通過屬性窗口把考生文件夾下的圖像文件

picl.bmp載入圖像框；再畫兩個命令按鈕控件，名稱分別為Cl、C2,標(biāo)題分別

為“放大”、“縮小”，如圖所示。要求：①請編寫適當(dāng)?shù)氖录^程，程序運(yùn)行后，

如果單擊“放大”按鈕，則將圖像框的高度、寬度均增加100;單擊“縮小”按鈕，則

將圖像框的高度、寬度均減少100,要求程序中不得使用任何變量。②通過屬性

窗口設(shè)置圖像框的適當(dāng)屬性，使得在放大、縮小圖像框時，其中的圖像也自動放

大、縮小。注意：存盤時必須存放在考生文件夾下，工程文件名保存為

標(biāo)準(zhǔn)答案：（1）【操作步驟】步驟1:新建一個窗體，按照題目要求建立文本框控

件并設(shè)置其屬性，程序中涉及的控件及屬性見表3.8和表3.9o

表3.8

控件窗體文本框1

屬性CaptionNameWidthHeightPasswordChur

設(shè)置值窗口Textl2400300?

表3.9

控件文本框2

屬性NameWidthHeightMuhilJneScrollBars

設(shè)置值Tcxt2240012(X)True3_一

步株2：的隊(duì)開世

行程序，關(guān)閉程序后按題目要求存盤。（2）【操作步驟】步驟1：新建一個窗體,

按照題目要求建立控件并設(shè)置圖像框相應(yīng)屬性，如圖3.17所示。

備im-MteTOMfi以一ImxttHl

KWO)Mtt)?BQ0I*B?KO?K9B6?MM)■*：?IMD0M*<A)SOttD

Q

圖3.17步驟2：按照步驟1設(shè)置其他

控件相關(guān)屬性，程序中涉及的控件及屬性見表3.10。

表3.10

屬性）設(shè)置值［

批件

NameImage1

Width1700

圖像框Height190()

PictuirPi(Jbmp

StretchTure

NameCl

命令按鈕1

Caplion放大

Name(2

命令按鈕2

(jiption縮小

步驟3：打開代碼編

輯窗口，在指定位置編寫如下代碼。參考答案PrivateSubClClick。，當(dāng)單擊“放大”

按鈕時，依次將Imag次的高與寬分別加100Imagel.Height=Image!.Height-F100

Imagel.Width=Imagel.Width+100EndSubPrivateSubC2Click。'當(dāng)單擊“縮小”

按鈕,則依次將Imag曰的高與寬分別減100Imagel.Height=Imagel.Height-100

Imagel.Width=Imagel.Width—100EndSub步驟4：調(diào)試并運(yùn)行程序，關(guān)閉程序

后按題目要求存盤。

知識點(diǎn)解析：暫無解析

3、⑴在名稱為Forml的窗體上添加兩個名稱分別為Framel、Frame2的框架，標(biāo)

題分別為“字號”、“修飾”；在Framel中添加兩個單選按鈕，名稱分別為Option］、

Option?,標(biāo)題分別為“10號字”、“20號字”，且標(biāo)題顯示在單選按鈕的左邊；在

Frame2中添加一個名稱為Checkl的復(fù)選框，標(biāo)題為“下劃線”。程序運(yùn)行后的窗體

如圖所示。注意：存盤時必須存放在考生文件夾下，工程文件名保存為

字號-1?海

.“rrw

宿事r

sjtl.vbp,窗體文件名保存為sjtl.frnio^rr-7-：（2）

在名稱為Forml的窗體上從上到下添加兩個文本框，名稱分別為Texll、Text2；

再添加一個命令按鈕，名稱為Commandl,標(biāo)題為“選中字符數(shù)是”。程序運(yùn)行時，

在Tex”中輸入若干字符，選中部分內(nèi)容后，單擊“選中字符數(shù)是"按鈕，則選中的

字符個數(shù)顯示在Text2中（如圖所示）。請編寫按鈕的Click事件過程。要求：程序

中不得使用變量，事件過程中只能寫一條語句。注意：存盤時必須存放在考生文

件夾下，工程文件名保存為sjt2.vbp,窗體文件名保存為sjt2.frmo

標(biāo)準(zhǔn)答案：（1）【操作步驟】步驟1：建立界面，添加相應(yīng)的控件并設(shè)置控件的屬

性。程序中的控件及屬性見表3.43o

表3.43

設(shè)置俄￥

控件屬性

NarnrFrame]

假架1

(laplion字號

NameFran*2

樞染2

Caption修飾

NameOplionI

單選按鈕1

Caption10號字

NameOption2

單選按鈕2

(Option20號字

NameCheck1

復(fù)選樞

Caplion下劃線

步驟2：調(diào)試并運(yùn)行程

序，關(guān)閉程序后按題目要求存盤。（2）【操作步驟】步驟1：建立界面，添加相應(yīng)

的控件并設(shè)置控件的屬性。程序中涉及的控件及屬性見表3.44o

*3.44

KarnrTrxll

文本傕I

(^aplKin

NamrTrxt2

文本框2

Ciption

NanirCommand1

小選按鈕

Caption選中字符數(shù)"_步驟2：打開代碼編輯窗

FI,在指定位置編寫如卜代碼。參考答案PrivatesubCommandI_Click（）Text2=

Textl.SelLen.gthEndSub步驟3：調(diào)試并運(yùn)行程序,關(guān)閉程序后按題目要求存

盤。

知識點(diǎn)解析：暫無解析

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

名稱為Forml標(biāo)題為“選課”的窗體上畫一個復(fù)選框數(shù)組，名稱為CH1,共有四個

復(fù)選框，按順序其標(biāo)題分別是“數(shù)學(xué)”、“語文”、“外語”、“計算機(jī)”，其中"語文”、

“計算機(jī)”復(fù)選財型也狀杳,運(yùn)行時的窗體如圖3—147所示。請畫控件并設(shè)置

廠”

P謖叉

「用I

p用m

相應(yīng)屬性。圖3/47注意：存盤時必須存放在考生文件夾下，工程文

件名為sjtl.vbp,窗體文件名為sjtl.frm。（2）在名稱為Form1的窗體上畫一個名

稱為HS1的水平滾動條，其刻度值范圍為1?100；畫一個命令按鈕，名稱為C1,

標(biāo)題為“移動滾動框”。請編寫適當(dāng)?shù)氖录^程，使得在運(yùn)行時，每單擊命令按鈕一

次（假定單擊次數(shù)少于10次），滾動框向右移動10人刻度。運(yùn)行時的窗體如圖3—

148所示。要求程序中不得使用變量，事件過程中只能寫一條語句。

PAN'注意：存盤時必須存放在考生文件夾下，工程

文件名為sjt2.vbp,窗體文件名為sjt2.frm。

標(biāo)準(zhǔn)答案：第1小題【操作步驟】步驟1：新建一個“標(biāo)準(zhǔn)EXE”工程。步驟2：

在窗體Forml中加入一個復(fù)選框，并用“復(fù)制”和“粘貼”的方法，生成包含四個元素

的復(fù)選框數(shù)組。步驟3：分別設(shè)置窗體和復(fù)選框數(shù)組中各元素的相關(guān)屬性。步驟

4：按要求將文件保存至考生文件夾中。第2小題【操作步驟】步驟1：新建一個

“標(biāo)準(zhǔn)EXE”工程，按要求畫出控件并設(shè)置相應(yīng)屬性。步驟2：在代碼編輯窗口，

編寫命令按鈕的Click事件過程。參考代碼：PrivateSubCl_Click()HS1.Value=

HS1.Value+lOEndSub步驟3：按要求將文件保存至考生文件夾中。

知識點(diǎn)解析：暫無解析

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

(1)在標(biāo)題為“列表框”、名稱為Fonnl的窗體上畫一個名稱為Listl列表框，通

過屬性窗口輸入四個列表項(xiàng)：“數(shù)學(xué)”、“語文”、“歷史”、“地理”，列表項(xiàng)采用“復(fù)選

框形式”，如圖1-88所示。列表框的寬為1100,高不限。圖1-88

注意：存盤時必須存放在考生文件夾下，工程文件名為sjtl.vbp,窗體文件名為

sjtl.frmo(2)在名稱為Fomil的窗體上建立一個名稱為“menul”、標(biāo)題為“文件”

的彈出式菜單，含有三個菜單項(xiàng)，它們的標(biāo)題分別為“打開”、“關(guān)閉”、“保存”，名

稱分別為“ml”、“m2”、“m3”。再畫一個命令按鈕,名稱為“Command1”、標(biāo)題為

“彈出菜單”。要求：編寫命令按鈕的Click事件過程，使程序運(yùn)行時，單擊“彈出菜

單”按鈕即可彈出“文件”菜單(如圖1—89所示)°圖1?89

注意：程序中不得使用變量，事件過程中只能寫一條語句。存盤時必須存放在考生

文件夾下，工程文件名為sjt2.vbp,窗體文件名為sjt2.frm。

標(biāo)準(zhǔn)答案：第1小題【操作步驟】步驟1：新建一個“標(biāo)準(zhǔn)EXE”工程，如表2—

25在窗體中畫出控件并設(shè)置其相關(guān)屬性。

表2?25控件屬性設(shè)置

對象屬性值

NameForm!

窗體

Caption列表框

NameListl

List數(shù)學(xué)、語文、歷史、地理

列表框

Style1-Checkbox

Width1100

______________________________VzfS0J.?及照/J比、1垓'J^>-v9rI這I

保存至考生文件夾中。第2小題【操作步驟】步驟1：新建一個“標(biāo)準(zhǔn)EXE”工

程，選擇【工第2小題具】一【菜單編輯器】命令，打開菜單設(shè)計器，如表2—26

裹2-26

標(biāo)題名稱內(nèi)縮符號可見

文件menul0

1

打開ml1y

保存m217

關(guān)閉m31

中的設(shè)置建立菜單項(xiàng)。-

步驟2：在窗體上畫一人名為Commands標(biāo)題為“彈出菜單.”的命令按鈕，打開代

碼編輯窗口，編寫''彈出菜單''按鈕的單擊事件過程。參考代碼：PrivateSub

Commandl_Click()Form1.PopupMenumenulEndSub步驟3：按要求將文件保存至

考生文件靈中。

知識點(diǎn)解析：暫無解析

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

(1)在名稱為FomH的窗體上畫一個水平滾動條，其名稱為HScroHl,Min屬性

為0,Max屬性為100,LargeChange屬性為5,SmallChange屬性為2,然后再畫

一個文本框，其名稱為Tex”,初始內(nèi)容為空白，編寫適當(dāng)?shù)氖录^程。程序運(yùn)行

后，在文本框中輸入0100之間的一個值，然后單擊窗體，則滾動條的滾動柱移

------------------------------------昉不。

圖1-288

要求：程序中不得使用任何變量。

存盤時必須存放在考生文件夾下，工程文件名為sjll.vbp,窗體文件名為sjU.frm。

(2)在名稱為Forml的窗體上畫一個標(biāo)簽，其名稱為Labell,標(biāo)題為“程序設(shè)

計”，AutoSizc屬性為True；然后再畫一個列表框，通過屬性窗口輸入5個項(xiàng)目，

分別為10、16、20、24、36,如圖1—289(a)所示，編寫適當(dāng)?shù)氖录^程。程序

運(yùn)行后，如果用鼠標(biāo)選中列表框中的某個項(xiàng)目，則把標(biāo)簽中字體的大小設(shè)置為與該

(a)

圖1-289

要求：程序中不得使用任何變量。存盤時必

須存放在考生文件夾下，工程文件名為sjt2.vbp,窗體文件名為sjt2.frm。

標(biāo)準(zhǔn)答案；第1小題【操作步驟】步驟1；新建“標(biāo)準(zhǔn)EXE”工程，往窗體Forml

中加入一個文本框和一個水平滾動條，分別設(shè)置它們的相關(guān)屬性，屬性及其值如表

S2-154

控件屬性值

NameText1

文本框:

Text

NameHScrolll

Min0

水平滾動條Max100

SmallChange2

LargeChange5

2—154所示。步驟2：

打開代碼編輯窗口，輸入如下代碼：參考代碼：PrivateSubForm_Click()

HScrolll.Value=Val(Textl.Text)EndSub步驟3：按要求將文件保存至考生文件夾

中。第2小題【操作步驟】步驟I：新建一個“標(biāo)淮EXE”工程，在窗體上畫一個

列表框和一個標(biāo)簽，按表2—155設(shè)置其相關(guān)屬性。

表2?155

對象屬性值

NameListl

列表框

List10、16、20、24、36

NameLabel1

標(biāo)簽Caption程序設(shè)計

AutoSizeTrue

步驟2：在打開的代碼

編輯窗口中，編寫列表框的單擊事件代碼。參考代碼：PrivateSubListl_Click()

LabelI.FontSize=Val(Listl.Text)EnclSub步驟3：技要求將文件保存至考生文件夾

中o

知識點(diǎn)解析：暫無解析

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

7、在名稱為Forml、標(biāo)題為“列表框練習(xí)”的窗體上畫一個名稱為Listl的列表框，

表項(xiàng)內(nèi)容依次輸入xxx、ddd、mmm和aaa,且以宋體14號字顯示表項(xiàng)內(nèi)容，如圖

3-93(a)所示。最后設(shè)置相應(yīng)屬性，使運(yùn)行后列表框中的表項(xiàng)按字母升序方式排列，

如圖3-93(b)所示。圖3?93注意：存盤時，將

文件保存至考生文件夾下，且窗體文件名為sjtl.frm,工程文件名為sjtl.vbp.

標(biāo)準(zhǔn)答案：審題分析本題只需新建窗體和控件，然后設(shè)置相關(guān)屬性即可。操作步

驟步驟h新建一個“標(biāo)準(zhǔn)EXE”工程，如表4-52在窗體中畫出控件并設(shè)置其相關(guān)

*4-52

對象值

NameForm)

窗體

Caption列表框練習(xí)

NameListl

Listxxx、ddd、mmm?aaa

列表框FontName宋體

FoncSizc14號

Sorted

屬性。--------------------------步驟2：按要求將文件保存

至考生文件夾中?？键c(diǎn)鏈接選擇控件。

知識點(diǎn)解析：暫無解析

8、在名稱為Forml的窗體上，畫一個名稱為Labell的標(biāo)簽，其標(biāo)題為“計算機(jī)等

級考試”，字體為宋體，字號為12號，且能根據(jù)標(biāo)題內(nèi)容自動調(diào)整標(biāo)簽的大小。再

畫兩個名稱分別為Command】、Command2,標(biāo)題分別為“縮小”和“還原”的命令按

鈕(如圖3-94所示)。要求：編寫適當(dāng)?shù)氖录^程，使得單擊“縮小”按鈕，Labell

中所顯示的標(biāo)題內(nèi)容自動減小兩個字號；單擊“還原”按鈕,Labell所顯示的標(biāo)題內(nèi)

計H機(jī)等短考憂

山山

容的大小自動恢復(fù)到12號。圖3.94注意：存盤時，將文件保存至考生

文件夾下，窗體文件名為sjt2.frm,工程文件名為sjt2.vbp。要求程序中不得使

用變量，每個事件過程中只能寫一條語句。

標(biāo)準(zhǔn)答案：審題分析程序運(yùn)行時要改變標(biāo)簽的標(biāo)題的字體大小，可通過修改其

FontSize屬性值來實(shí)現(xiàn)。操作步驟步驟1：新建一個“標(biāo)準(zhǔn)EXE”工程，如表4-53

在窗體中畫出控件并設(shè)置其相關(guān)屬性。

?4-53

對象?性值

NameLabel1

AutoSizeTrue

標(biāo)簽

Caption計算機(jī)等級考試

Font宋體12號

NameCommand!

命令按鈕1

Caption縮小

NameCommand2

命令按鈕2

Caption-------絲-------步驟2：打開代碼編輯窗口，編

寫兩個命令按鈕的Click事件過程。參考代碼：PrivateSubCommandl_Click()

Label1.FontSize=Labell.FontSize-2EndSubPrirateSubCommand2_Click()

Label!.FonlSize=12EndSub步驟3：按要求將文件保存至考生文件夾中?？键c(diǎn)鏈

接字體與字形。

知識點(diǎn)解析：暫無解析

9、請根據(jù)以下各小題的要求設(shè)計VisualBasic應(yīng)用程序(包括界面和代碼)。在名稱

為Fonnl的窗體上畫一個名稱為Framel、標(biāo)題為“框架”的框架，在框架內(nèi)添加兩個

名稱分別為。paonl、Op【ion2的單選按鈕，其標(biāo)題分別為“第一項(xiàng)、'、’、笫二項(xiàng)要

求通過設(shè)置控件的屬性將“第二項(xiàng)"設(shè)置為被選中，框架為不可用。運(yùn)行程序后的窗

體如圖2-114所示。注意：存盤時必須存放在考生文件夾下，工程文件名為

sjtl.vbp,窗體文件名為sjll.frmo

標(biāo)準(zhǔn)答案：步驟1：新建一個"標(biāo)準(zhǔn)EXE”工程。步驟2：在Forml中畫出一個框架

知識點(diǎn)解析：哲無解析

10、在名稱為Forml的窗體上畫一個圖像框，名稱為Imagel,其高、寬分別為

1900.1700,通過屬性窗口把考生文件夾下的圖像文件picl.bmp裝入圖像框；再

畫兩個命令按鈕，名稱分別為C、C2,標(biāo)題分別為“放大“、“縮小"，如圖2-167所

示。要求：①請編寫適當(dāng)?shù)氖录^程，程序運(yùn)行后，如果單擊''放大"按鈕，則把

圖像框的高度、寬度均增加100；單擊“縮小”按鈕，則把圖像框的高度、寬度均減

少100o要求程序中不得使用任何變量。②通過屬性窗口設(shè)置圖像框的適當(dāng)屬

性，使得在放大、縮小圖像框時，其中的圖像也自動放大、縮小。注意：存盤時

必須存放在考生文件夾下，工程文件名為sjt2.vbp,窗體文件名為sj12.frm。

162.167

標(biāo)準(zhǔn)答案：步驟1：新建一個“標(biāo)準(zhǔn)EXE”工程，如表3-95在窗體中畫出控件并設(shè)

”95

■

Name

SvcfchTrue

陽■靠Fxturt卬y

WKkh

心再1900

SameCi

命令1

*A

SrnC2

?令依他2

Cotton

置其相關(guān)屬性。-----------_li—步驟2：打開代碼編輯窗口,

編寫兩個命令按鈕的Click事件過程。參考代碼：PrivateSubCl_Click（）

Imagel.Width=Imagel.Width+100Imagel.Height=Imagel.Height+100EndSub

PrivateSubC2_Click()Image1.Width=Imagel.Width-100

Imagel.Height=Imagel.Height-100EndSub步驟3：按要求將文件保存至考生文

件夾中。

知識點(diǎn)解析：暫無解析

家二級VB機(jī)試（基本操作題）模擬試

卷第2套

一、基本操作題（本題共70題，每題7.0分，共10

分。）

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

名稱為Forml的窗體上畫出如圖3—46所示的三角形。下表給出了直線Linel、

Line2的坐標(biāo)值，請按此表畫Linel、Line2,并畫出直線Line3,從而組成如圖3—

名稱XIY1X2Y2

Linel60016001600600

Line2600160026001600

46所示的三角形。圖3N6注

意：存盤時必須存放在考生文件夾下，逑文件名為sjtl.vbp,窗體文件名為

sjtl.frmo(2)在名稱為Form1的窗體上畫一個名稱為Listl的列表框，并任意輸入

若干列表項(xiàng)；再畫一個名稱為Textl的文本框，無初始內(nèi)容。請編寫Listl和Textl

的Click事件過程。程序運(yùn)行后，如果單擊列表框中的某一項(xiàng)，則在文本框中顯示

該項(xiàng)相應(yīng)的順序號，若單擊第一項(xiàng)，則在文本框中顯示1；若單擊第二項(xiàng)，則在文

本框中顯示2,以此類推(如圖3—47所示)；如果單擊文本框，則把該列表項(xiàng)的內(nèi)

容顯示在文本框中。注意：要求程序中不得使

用變量，事件過程中只能寫一條語句。存盤時必須存放在考生文件夾下，工程文件

名為sjt2.vbp,窗體文件名為sjt2.frm。

標(biāo)準(zhǔn)答案：（1）【操作步驟】步驟1：新建一個“標(biāo)準(zhǔn)EXE”工程，按表4—29在窗

體中畫出控件并設(shè)置其相關(guān)屬性。

表4-29

對象屬性值

NameLinel

XI600

直線1X21600

YI1600

Y2600

NameLme2

XI600

直線2X22600

Yl1600

Y21600

NameLinc3

XI1600

直線3X22600

Yl600

Y21600

-----步驟2：按要求

將文件保存至考生文件夾中。（2）【操作步驟】步驟1：新建一個“標(biāo)準(zhǔn)EXE”工

程，按表4-30在窗體中畫出控件并設(shè)置其相關(guān)屬性。

*4-30

對象J性值.

NameListl

列表框

List任意列表項(xiàng)

NameTextl

文木框

Text

_____________________________________?生腥o.土r?ZPm如相南

口，編寫列表框和文本框的單擊事件過程。參考代碼：PrivateSubListl_Click()

Textl.Text=Listl.Listindex+1EndSubPrivateSubTextl_Click()Textl.Text=

Listl.List(Listl.Listindex)EndSub步驟3：按要求將文件速存至考生文件夾中。

知識點(diǎn)解析：暫無解析

2、在名稱為Forml的窗體上添加一個名稱為Command1的命令按鈕，其標(biāo)題為

“移動本按鈕”，如圖所示。要求編寫適當(dāng)?shù)氖录^程，使得程序運(yùn)行時，每單擊

按鈕一次，按鈕向左移動100o要求：程序中不得使用變量，事件過程中只能寫入

一條語句。注意：存盤時必須存放在考生文件夾下，工程文件名保存為

sjt2.vbp,窗體文件名保存為sjt2.frm0

標(biāo)準(zhǔn)答案：［操作步驟］步驟1：新建一個窗體，按照要求建立控件并設(shè)汽相應(yīng)屬性

如表3.14所示。

步驟2：打開代碼編輯窗口，在指定位置編寫如下代碼。參考代碼Privatesub

Commandl_Click()Command1.Left=Commandl.Left—100EndSub步驟3：調(diào)試

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

知識點(diǎn)解析：暫無解析

3、請根據(jù)以下各小題的要求設(shè)計VisualBasic應(yīng)用程序(包括界面和代碼)。(1)在

名稱為Forml的窗體上畫一個名稱為C1、標(biāo)題為“改變顏色”的命令按鈕，窗體標(biāo)

題為“改變窗體背景色，編寫程序，使得單擊命令按鈕時，將窗體的背景顏色改為

紅色(&HFF&)。運(yùn)行程序后的窗體如圖3—78所不。

圖3?78要求：程序中不得使用變量，每個事

件過程中只能寫一條語句。存盤時必須存放在考生文件夾下，工程文件名為

sjtl.vbp,窗體文件名為sjtl.frm。（2）在名稱為Forml的窗體上畫一個名稱

Shapel的形狀控件，在屬性窗口中將其設(shè)置為圓形，畫一個名稱為Listl的列表

框，并在屬性窗口中設(shè)置列表項(xiàng)的值分別為1、2、3、4、5o將窗體的標(biāo)題設(shè)為

“圖形控件”。單擊列表框中的某一項(xiàng)，則將所選的值作為形狀控件的填充參數(shù)。例

如，選擇3,則形狀控件中被豎線填充。如圖3—79所示。

I也3?79要求：程序中不得使用變量，每個事件過程中

只能寫一條語句。存盤時必須存放在考生文件夾下，工程文件名為sjt2.vbp,窗

體文件名為sjt2.fnriu

標(biāo)準(zhǔn)答案：（1）【操作步驟】步驟1：新建一個“標(biāo)準(zhǔn)EXE”工程，在窗體Forml中

畫一個命令按鈕，設(shè)置相關(guān)屬性，其屬性及值如表19所示。

表4Y9

對象J■性

NameForml

演體(,aptio

改變窗體背景色

n

NameCl

命令按鈕Cupdo

改變藤色

n

步驟2：打開代碼

編輯窗口，編寫按鈕的Click事件過程中。參考代碼：PrivateSubCl_Click（）

Forml.BackColor=&HFF&EndSub步驟3：按要求將文件保存至常生文件夾

中。（2）【操作步驟】步驟1：新建一個“標(biāo)準(zhǔn)EXE”工程。步驟2：在窗體Forml

中加入一個列表框和一個形狀控件，并分別如表4—50設(shè)置它們的相關(guān)屬性。

_______表4-50

對象及性值

NameIistl

列表框

Iist1、2、3、4、5

形狀控件NameShape1

Shape3

窗體Caption圖形控件

------------------------步驟3；打開代碼

編輯窗口，編寫列表框的Click事件過程。參考代碼：PrivateSubListl_Click（）

Shape1.FillStyle=Listl.TextEndSub步驟4：按要求將文件保存至考生文件夾

中。

知識點(diǎn)解析：暫無解析

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

名稱為Forml.的窗體上建立一個名稱為Command1的命令按鈕數(shù)組，含三個命

令按鈕，它們的Index屬性分別為0、1、2,標(biāo)題依次為“是”、“否”、“取消”，每

個按鈕的高、寬均為300、800。窗體的標(biāo)題為“按鈕窗口”。運(yùn)行后的窗體圖3-

圖

132所示。3-132注意：存盤時必須存放在考

生文件夾下，工程文件名為sjtll.vbp,窗體文件名為sjtl.frm。（2）在名稱為

Forml的窗體上畫一個名稱為Shal的形狀控件，然后建立一個菜單，標(biāo)題為“形

狀”，名稱為shape。，該菜單有兩個子菜單，其標(biāo)題分別為“正方形”和“圓形”，其

名稱分別為shapel和sh叩e2,如圖3—133所示，然后編寫適當(dāng)?shù)某绦颉３绦蜻\(yùn)行

后，如果選擇“正方形”菜單項(xiàng)，則形狀控件顯示為正方形；如果選擇“圓形”菜單

圖

項(xiàng)，則窗體上的形狀控件顯示為圓形。3-133

注意：程序中不能使用變量，每個事件過程中只能寫一條語句。保存時必須存放在

考生文件夾下，工程文件名為sjt2.vbp,窗體文件名為sjt2.frm。

標(biāo)準(zhǔn)答案：（1）【操作步驟】步驟1：新建一個“標(biāo)準(zhǔn)EXE”工程，表4—77在窗體

中用“復(fù)制”和“粘貼”畫出控件數(shù)組并設(shè)置屬性。

?4-77____________________

對象雇性值

NameForml

窗體

Caption按鈕窗口

NameCommand1

Index0

命令按鈕1Captionft

Width800

Height300

NameCommand1

Index1

命令按鈕2Caption有

WidthKOO

Height300

NameCommand1

Index2

命令按鈕3Caption取消

Width800

Height300

一步驟2：按要求將文件保

存至考生文件夾中。（2）【操作步驟】步驟1：新建一個“標(biāo)準(zhǔn)EXE”工程，在窗體

Forml中畫一個名為Shal的形狀控件。步驟2：選擇【工具】一【菜單編輯器】

命令，打開菜單設(shè)計器，如表4—78所示，設(shè)置建立菜單項(xiàng)。

表4-78

標(biāo)題名稱內(nèi)縮符號

形狀shapeO0

止方.形shape1!

陰形shapc21

一步驟3：打開代碼編輯窗

口，編寫菜單命令的單擊事件過程。參考代碼：PrivateSubShapel_Click（）

Me.Shal.Shape=1EndSubPrivateSubShape2Click（）Forml.Shal=3EndSub

步驟4：按要求將文件保存至考生文件夾中。

知識點(diǎn)解析：暫無解析

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

名稱為Forml的窗體上建立一個名稱為Commandl的命令按鈕數(shù)組，含三個命令

按鈕,它們的Index屬性分別為0、1、2,標(biāo)題依次為“是”、“否”、“取消”，每個

按鈕的高、寬均為300、800c窗體的標(biāo)題為“按鈕窗口”。運(yùn)行后的窗體圖3—132

所示。ffl3-132注意：存盤時必須存放在考生文件夾下，

工程文件名為sjtl.vbp,窗體文件名為sjtl.frm。（2）在名稱為Forml的窗體上畫

一個名稱為Shal的形狀控件，然后建立一個菜單，標(biāo)題為“形狀”，名稱為

shapeO,該菜單有兩個子菜單，其標(biāo)題分別為“正方形”和,,圓形”，其名稱分別為

shapel和sh叩62,如圖3—133所示，然后編寫適當(dāng)?shù)某绦?。程序運(yùn)行后，如果選

擇“正方形”菜單項(xiàng)，則形狀控件顯示為正方形；如果選擇“圓形”菜單項(xiàng)，則窗體上

的形狀控件顯示為圓形。圖3/33注意：程序中不能使用變

量，每個事件過程中只能寫一條語句。保存時必須存放在考生文件夾下，工程文件

名為sjt2.vbp,窗體文件名為sjt2.frmo

標(biāo)準(zhǔn)答案：第1小題【操作步驟】步驟1：新建一個“標(biāo)準(zhǔn)EXE”工程，表4一77

在窗體中用“復(fù)制”和“粘貼”畫出控件數(shù)組并設(shè)置屬性。

?4-77

對象屬性值

NameForm!

窗體

Caption按鈕窗口

NameCommand1

Index0

命令按鈕1Caption是

Width800

Height300

NameCommand1

Index1

命令按鈕2Caption否

Width800

Height300

NameCommand1

Index2

命令按鈕3Caption取消

Width800

Height300

步驟2：按要求將文件保存至

考生文件夾中。第2小題【操作步驟】步驟1：新建一個“標(biāo)準(zhǔn)EXE”工程，在窗

體Forml中畫一個名為Shal的形狀控件。步驟2：選擇【工具】一【菜單編輯

器】命令，打開菜單設(shè)計器，如表4-78所示，設(shè)置建立菜單項(xiàng)。

表4-78

內(nèi)縮符號1

標(biāo)即名稱

形狀shapeO0

正方形shape11

in形shape?1

步驟3：打開代碼編輯窗口，編

寫菜單命令的單擊事件過程。參考代碼：PrivateSubShapel_Click()

Me.Shal.Shapc=1EndSubPrivateSubShape2_Click()Forml.Shal=3EndSub

步驟4：按要求將文件保存至考生文件夾中。

知識點(diǎn)解析：暫無解析

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

（1）在名稱為Forml的窗體上畫一個名稱為Labell、標(biāo)題為“滾動條控件”的標(biāo)

簽，一個名稱為HScrolll的水平滾動條。請通過屬性窗口設(shè)置屬性使水平滾動條

取值范圍的最小值為1,最大值為100,滾動條的寬度為3000,高度為300,滾動

體如圖1一194所示。

圖1-194

注意：存盤時必須存放在考生文件夾下，工

程文件名為sjtl.vbp,窗體文件名為sjtl.frm。（2）在名稱為Foirnl的窗體上畫一

個名稱為Shapel的形狀控件，位置在窗體的頂部，在屬性窗口中將其設(shè)置為圓

形。畫一個名稱為Timerl的計時器，在屬性窗口中將其設(shè)置為不可用，時間間隔

為0.5秒，窗體如圖1—195所示。請編寫窗體的Load事件過程和計時器的事件過

程，使得程序一開始運(yùn)行，計時器即變?yōu)榭捎?，且每?.5秒形狀控件向下移動

存盤時

圖1-195

標(biāo)準(zhǔn)答案：第1小題【操作步驟】步驟1：新建一個“標(biāo)準(zhǔn)EXE”工程，在窗體

Forml中畫一個滾動條和一個標(biāo)簽，并設(shè)置它們的相關(guān)屬性，其屬性及值如表2-

裳2?93

1對象［屬性I值

NameHScrolll

Max100