第2章-VB的界面設(shè)計(jì)課件

第2章

VB的界面設(shè)計(jì)

*CSE.CSLG.CN2窗體和控件是創(chuàng)建一個VB應(yīng)用程序界面的基本構(gòu)造模塊：窗體是一種對象，它是放置其他所有控件的容器，其本身有著自己的屬性、方法和事件。控件是放置在窗體中的對象，不同類型的控件有著不同的屬性、方法和事件，以適用于不同的目的。

一個VB應(yīng)用程序至少有一個窗體

*CSE.CSLG.CN32.1窗體標(biāo)題圖標(biāo)控制菜單框最小化按鈕最小化按鈕邊框樣式工作區(qū)窗體對象是創(chuàng)建VB應(yīng)用程序的基礎(chǔ)。是用戶與應(yīng)用程序進(jìn)行交互操作的實(shí)際窗口。

*CSE.CSLG.CN42.1.1窗體的屬性常用屬性1．Name（屬性窗口中為“（名稱）”）

創(chuàng)建的對象名稱,有默認(rèn)的名。在程序中，控件名是作為對象的標(biāo)識而引用，不會顯示在窗體上。2．Caption：窗體標(biāo)題

窗體標(biāo)題是出現(xiàn)在窗體標(biāo)題欄的文本內(nèi)容。缺省名使用窗體名。

窗體對象命名規(guī)則：窗體名稱以字母開頭，可包含數(shù)字和下劃線，但不能含空格和標(biāo)點(diǎn)符號，長度不得超過40個字符。

*CSE.CSLG.CN53．BackColor與ForeColor

窗體的背景色與前景色。用鼠標(biāo)單擊該屬性右側(cè)帶有“…”省略號的按鈕，可從彈出的調(diào)色板上選定顏色。

4．BorderStyle：窗體邊框風(fēng)格

BorderStyle屬性決定了窗體的主要特征，即窗體外觀。該屬性只能通過屬性窗口設(shè)置。

屬性值VB內(nèi)部常量值風(fēng)格0vbBSNone窗口無邊框1vbFixedSingle窗口有單線邊框，運(yùn)行時窗口大小不可改變2vbSizable（缺省值）窗口有雙線邊框，運(yùn)行時可改變窗口大小3vbFixedDouble窗口有雙線邊框，運(yùn)行時窗口不包含最大與最小化按鈕，窗口大小不可改變4vbFixedToolWindow窗口包含一個關(guān)閉按鈕，標(biāo)題欄字體縮小，運(yùn)行時不可改變窗口大小5vbSizableToolWindow窗口包含一個關(guān)閉按鈕，標(biāo)題欄字體縮小，運(yùn)行時可改變窗口大小*CSE.CSLG.CN65．Enabled：活動屬性Enabled屬性允許在程序運(yùn)行時使對象成為有效或無效。取值有兩種：True（有效，這是缺省值）和False（無效）。

6．Visible：可視屬性

Visible屬性決定對象是否可見。True（可見，這是缺省值）和False（不可見）。

7．Font：字體屬性

Font屬性用于設(shè)置或改變窗體上正文的字體、字型、字號等。

*CSE.CSLG.CN78．Left、Top、Height和Width屬性：決定窗體位置和大小

單位均為Twip（緹）。Twip是長度單位，1440Twip=1英寸。9．Icon：圖標(biāo)屬性

定義運(yùn)行時窗體處于最小化時顯示的圖標(biāo)。所加載的文件必須具有.ico擴(kuò)展名和格式。

大部分屬性既可以通過屬性窗口設(shè)置，也可以在運(yùn)行時由代碼來設(shè)置；但有些屬性只能在屬性窗口設(shè)置或者只能通過程序代碼設(shè)置。

*CSE.CSLG.CN82.1.2窗體的方法窗體的方法也就是窗體所具有的行動方式。窗體上常用的方法有：方法功能Hide隱藏窗體（不是卸載）Move移動窗體Print在窗體中輸出文本PrintForm打印窗體Refresh重新繪制窗體Show顯示窗體Cls清除窗體中的圖形或文本*CSE.CSLG.CN92.1.3窗體的事件窗體可以響應(yīng)的常用事件：

1．Activate/Deactivate事件

每當(dāng)一個窗體被激活時，就會產(chǎn)生一個Activate事件；當(dāng)另一個窗體或應(yīng)用程序被激活時，原先處于活動的窗體就會產(chǎn)生Deactivate事件。

2．Load/Unload事件

窗體被裝載時發(fā)生Load事件；當(dāng)使用控制菜單中的“關(guān)閉”命令或用Unload語句關(guān)閉該窗體時，發(fā)生從屏幕上卸載窗體的Unload事件。

*CSE.CSLG.CN103．Click/DblClick事件單擊窗體的空白區(qū)域或無效控件時發(fā)生Click事件；雙擊窗體的空白區(qū)域或無效控件時發(fā)生DblClick事件。4．Resize事件

當(dāng)窗體第一次顯示或窗口狀態(tài)發(fā)生改變。

*CSE.CSLG.CN112.1.4與窗體相關(guān)的操作語句1．Load裝載窗體語句

功能：把窗體（或其他對象）載入內(nèi)存，但并不顯示它；語句格式：LoadObject(Object是對象名)注意：該方法將引發(fā)窗體的Load事件。2．Unload卸載窗體語句

功能：把窗體（或其他對象）從內(nèi)存卸載；語句格式：UnloadObject(Object是對象名)注意：該方法將引發(fā)窗體的UnLoad事件。*CSE.CSLG.CN123．End語句

功能：終止應(yīng)用程序的執(zhí)行，并從內(nèi)存卸載所有窗體；

語句格式：End

注意：Unload語句與End語句的區(qū)別。Unload語句是卸載當(dāng)前窗體，并引發(fā)對象的Unload事件；End語句將終止應(yīng)用程序的執(zhí)行，并從內(nèi)存卸載所有窗體。

*CSE.CSLG.CN13【例2.1】窗體顯示與隱藏的示例程序

在窗體1的“代碼編輯器”窗口中輸入以下程序代碼：PrivateSubForm_Click() Form2.Show '顯示窗體2 Form1.Hide '隱藏窗體1EndSubPrivateSubForm_Load() Label1.FontName=“幼圓”'將標(biāo)簽對象字體設(shè)為幼圓 Label1.FontBold=True '將文字置為粗體EndSub在窗體2的“代碼編輯器”窗口中輸入以下程序代碼：PrivateSubForm_Click() Form2.Hide '隱藏窗體2

Form1.Show ‘顯示窗體1EndSubPrivateSubForm_Load() Caption=“窗體示例”'改變窗體2的標(biāo)題 Label1.FontItalic=True '將標(biāo)簽文字設(shè)置為斜體EndSub*CSE.CSLG.CN14【例2.2】Unload與End使用示例

PrivateSubCmdClose_Click（）UnloadMe 'Me是系統(tǒng)保留字，代表當(dāng)前窗體EndSubPrivateSubForm_Unload（）

'

在此輸入程序結(jié)束前，需要執(zhí)行的代碼

EndEndSub*CSE.CSLG.CN154．Print方法

功能：可以將文本輸出到窗體、圖片框或打印機(jī)上；語句格式：[對象名.]Print[輸出列表]

注意：（1）對象名可以是窗體（Form）、圖片框（PictureBox）或打印機(jī)（Printer）的名稱。省略對象名時，將輸出內(nèi)容輸出到當(dāng)前窗體上。 例如：Print“VB程序設(shè)計(jì)”'在當(dāng)前窗體上輸出

Picture1.Print“VB程序設(shè)計(jì)”'在圖片框上輸出（2）如果省略輸出列表，則輸出一個空行。例如：PrivateSubForm_Click()Print"VB"Print '輸出空行

換行作用Print"程序設(shè)計(jì)"

EndSub*CSE.CSLG.CN16（3）輸出列表的各項(xiàng)之間可以用逗號“，”或分號“；”分隔。當(dāng)采用逗號作分隔符時，每個輸出項(xiàng)寬度為14個字符；當(dāng)采用分號作分隔符時，每個輸出項(xiàng)以緊湊格式輸出，即數(shù)值輸出項(xiàng)的尾部自動加一個符號位（正數(shù)為空格）。

例如：PrivateSubForm_Click() a=3:b=4 Printa,b,a+b Printa,,b Print"a=";a,"b=";b'字符串輸出用于說明 EndSub（4）若語句行末尾沒有分隔符，則輸出當(dāng)前輸出項(xiàng)后自動換行。若以分號或逗號結(jié)束，則輸出當(dāng)前輸出項(xiàng)后不換行，下一個Print語句輸出的內(nèi)容將輸出在同一行上。

*CSE.CSLG.CN172.2VB常用控件控件是包括在窗體對象內(nèi)的對象；每種類型的控件都有自己的一套屬性、方法和事件；在VB應(yīng)用程序的設(shè)計(jì)階段，主要任務(wù)是建立用戶界面；

*CSE.CSLG.CN182.2.1控件的基本操作建立控件方法1：在工具箱中的控件圖標(biāo)上單擊，然后在窗體上用鼠標(biāo)拖放出所需控件的大小。

方法2：在工具箱中的控件圖標(biāo)上雙擊，在窗體中央就自動出現(xiàn)一個缺省大小的控件，然后根據(jù)需要移動控件或更改控件的大小。

*CSE.CSLG.CN19選中控件單擊窗體上放置的控件，即選中該控件。如果需要同時選中多個控件，可按住Ctrl或Shift鍵再單擊需選中的多個控件；在窗體上用鼠標(biāo)拖曳出一個矩形框，則此矩形框所包圍的控件全部被選中。

選中多個控件之后，在屬性窗口中只顯示這些控件共同具有的屬性。如果修改屬性值，那些被同時選中的所有控件的屬性值都會發(fā)生相應(yīng)的改變。

*CSE.CSLG.CN20改變控件大小

選中控件后，將出現(xiàn)8個小方塊。將鼠標(biāo)指針移至控件四周的某個小方塊，拖放鼠標(biāo)即可改變控件大小。在控件的屬性窗口中修改Width和Height的屬性值。

通過VB工具欄的“格式”中的命令項(xiàng)協(xié)調(diào)控件的位置。

*CSE.CSLG.CN21刪除、移動控件

刪除窗體中的控件：先選中要刪除的控件，然后按Delete鍵。移動窗體中的控件：先選中控件，然后將鼠標(biāo)指針移至控件上，按住左鍵拖動鼠標(biāo)即可改變控件位置；如果要精確設(shè)置控件位置，可在控件的屬性窗口中修改Top和Left的屬性值。

*CSE.CSLG.CN22復(fù)制控件

選中控件;執(zhí)行“編輯”菜單中的“復(fù)制”命令或者單擊工具欄上的“復(fù)制”按鈕；

執(zhí)行“編輯”菜單中的“粘貼”命令或者單擊工具欄上的“粘貼”按鈕。

*CSE.CSLG.CN232.2.2控件的焦點(diǎn)和Tab鍵序焦點(diǎn)

焦點(diǎn)就是接收用戶鼠標(biāo)或鍵盤的能力。

一個對象具有焦點(diǎn)時，產(chǎn)生GotFocus事件；對象失去焦點(diǎn)時，產(chǎn)生LostFocus事件。注意：（1）當(dāng)一個對象的Enabled和Visible屬性均為True時，才能接收焦點(diǎn)。設(shè)置一個對象焦點(diǎn)時，可以在程序代碼中使用SetFocus方法。（2）框架(Frame)、標(biāo)簽(Label)、菜單(Menu)、直線(Line)、形狀(Shape)、圖像框(Image)和計(jì)時器(Timer)等都不能接收焦點(diǎn)。（3）窗體只有先用Show方法顯示后，然后才能使用SetFocus方法對該窗體或窗體上的控件設(shè)置焦點(diǎn)。*CSE.CSLG.CN24Tab順序

系統(tǒng)自動按順序?yàn)榇绑w中的每個控件指定一個Tab鍵序。Tab鍵序反映在控件的TabIndex屬性中，其屬性值為0，1，2，…。

*CSE.CSLG.CN252.2.3控件的公共屬性1.

Name——控件對象的名稱

2.

Caption——控件的標(biāo)題

3.

Enabled——決定控件是否對用戶產(chǎn)生的事件做出響應(yīng)

4.

Visible

——決定控件是否可見，默認(rèn)值為True5.

Height，width，Top和Left——Height和width屬性確定控件的高度和寬度。Top表示控件到窗體頂部的距離，Left表示控件到窗體左邊框的距離。

Name值不能在應(yīng)用程序中修改

*CSE.CSLG.CN266.

BackColor和ForeColor——設(shè)置控件的背景色和前景色。7.FontName，F(xiàn)ontSize，F(xiàn)ontBold，F(xiàn)ontItalic，F(xiàn)ontStrikethru和FontUnderline——件中顯示文本所用的字體、字號、是否粗體、是否斜體、是否加刪除線和是否帶下劃線8.

Font

——控件中顯示的文本所用字體的樣式、大小、字體效果等*CSE.CSLG.CN27常用控件文本框控件(TextBox)標(biāo)簽(Label)命令按鈕（CommandButton）

單選按鈕（OptionButton)和復(fù)選按(CheckButton）

框架（Frame）

列表框(ListBox)組合框(ComboBox)圖片框(PictureBox)和圖像框(Image)定時器（Timer）

*CSE.CSLG.CN282.2.4文本框控件(TextBox)

文本框（TextBox）是一個文本編輯區(qū)域，用戶可以在該區(qū)域中輸入、編輯和顯示文本內(nèi)容。

常用屬性

1.Text

——返回／設(shè)置控件中包含的文本2.MultiLine

——返回或設(shè)置一個值，指示文本框控件是否能夠接受和顯示多行文本。3.

Alignment

——設(shè)置或返回一個值，決定文本在控件中的對齊方式，缺省值為0，文本左對齊；若為1，文本右對齊；若為2，文本居中。4.

MaxLength

——返回或設(shè)置一個值，它指出在文本框控件中文本的最大長度。5.

PasswordCha

——確定在文本框中是否顯示用戶輸入的字符*CSE.CSLG.CN29事件（1）Change事件：當(dāng)文本框的Text屬性發(fā)生變化，即文本的內(nèi)容發(fā)生變化時，就引發(fā)本事件。（2）LostFocus事件：當(dāng)鼠標(biāo)指針（插入點(diǎn)）離開文本框時，引發(fā)本事件。（3）Gotfacus事件：文本框獲得焦點(diǎn)時，引發(fā)本事件。（4）Keypress事件：在文本框中輸入一個ASCII碼字符時，引發(fā)本事件。*CSE.CSLG.CN30方法

（1）Refresh方法：刷新文本框。（2）Setfocus方法：設(shè)置焦點(diǎn)。通過本方法可使指定的文本框獲得焦點(diǎn)，也即成為當(dāng)前文本框。獲得焦點(diǎn)的文本框中具有閃動的光標(biāo)。*CSE.CSLG.CN312.2.5標(biāo)簽(Label)

標(biāo)簽(Label)主要用來顯示比較固定的提示性信息。

常用屬性

1.Alignment

——設(shè)置標(biāo)簽中文本的對齊方式，共有3個可選項(xiàng)：0（左對齊，默認(rèn)值），l（右對齊）和2（居中）。2.AutoSize

——確定標(biāo)簽的大小是否根據(jù)標(biāo)簽的內(nèi)容自動調(diào)整大小,默認(rèn)值為False。3.

BorderStyle

——設(shè)置標(biāo)簽的邊框，可以取兩種值，0表示無邊框（默認(rèn)值），l表示有邊框。

4.

BackStyle

——設(shè)置標(biāo)簽的背景模式，共有兩個選項(xiàng)，1表示標(biāo)簽將覆蓋背景（默認(rèn)值），0表示標(biāo)簽是“透明”的。*CSE.CSLG.CN32事件（1）Click（單擊）（2）DblClick（雙擊）

方法（1）Refresh方法：刷新標(biāo)簽框。（2）Move方法：移動標(biāo)簽。*CSE.CSLG.CN332.2.6命令按鈕（CommandButton）

命令按鈕（CommandButton）用于接收用戶的操作信息，并引發(fā)應(yīng)用程序的某個操作。

常用屬性

1.Default

——用于設(shè)置“默認(rèn)按鈕”。2.Cancel

——用于設(shè)置“取消按鈕”。3.

Style

——設(shè)置命令按鈕的外觀

。

*CSE.CSLG.CN34事件

命令按鈕最常用的事件是Click（單擊）事件，但不支持DblClick（雙擊）事件。方法命令按鈕常用的方法是SetFocus方法。*CSE.CSLG.CN35【例2.3】設(shè)計(jì)程序，實(shí)現(xiàn)兩個文本框內(nèi)容的交換

編寫程序代碼:PrivateSubCommand1_Click（）

'“交換”按鈕

t=text1．TextText1．Text=Text2．TextText2．Text=tEndSub*CSE.CSLG.CN36【例2.4】在窗體上建立兩個文本框和兩個命令按鈕

編寫程序代碼：PrivateSubText1_Change()'文本框1內(nèi)容改變時，時間發(fā)生 Text2．Text=Text1．TextEndSubPrivateSubCommand1_Click()'“重新輸入”按鈕 Text1．Text="" Text1．SetFocusEndSubPrivateSubCommand2_Click() '“退出程序”按鈕 EndEndSub*CSE.CSLG.CN372.2.7單選按鈕(OptionButton)和復(fù)選按鈕(CheckButton)

命令按鈕（CommandButton）用于接收用戶的操作信息，并引發(fā)應(yīng)用程序的某個操作。

常用屬性

1.Value

——用來表示單選按鈕或復(fù)選按鈕的狀態(tài)

在單選按鈕中：·Value=0（False）表示沒被選擇 ·Value=1（True）表示被選擇在復(fù)選框中：·Value=0表示沒有選擇該復(fù)選框 ·Value=1表示選中該框

·Value=2表示該復(fù)選框被禁用（灰色）*CSE.CSLG.CN382.Alignment

——用來設(shè)置指定復(fù)選框或單選按 鈕的顯示方式·Alignment=0（默認(rèn)）控件居左，標(biāo)題在控件右側(cè)顯示。

·Alignment=1控件居右，標(biāo)題在控件左側(cè)顯示。3.Style——用來設(shè)置指定復(fù)選框或單選按鈕的 顯示方式

·Style=0（默認(rèn)）標(biāo)準(zhǔn)方式，即同時顯示控件和標(biāo)題。

·Style=1圖形方式，控件用圖形的樣式顯示。事件單選按鈕和復(fù)選按鈕均可響應(yīng)單擊（Click）事件。

*CSE.CSLG.CN39【例2.5】單選按鈕和復(fù)選按鈕應(yīng)用示例事件過程如下：PrivateSubChkCxT_Click() PrivateSubChkXHX_Click()‘“粗斜體”復(fù)選按鈕 '“下劃線”復(fù)選按鈕IfChkCXT.Value=1Then IfChkXHX.Value=1ThenTxt1.FontBold=True Txt1.FontUnderline=TrueTxt1.FontItalic=True ElseElse Txt1.FontUnderline=FalseTxt1.FontBold=False EndIf Txt1.FontItalic=False EndSub

EndIfEndSub

PrivateSubOptHT_Click() PrivateSubOptST_Click()‘“黑體”復(fù)選按鈕 '“宋體”復(fù)選按鈕Txt1.FontName=“黑體”

Txt1.FontName="宋體"EndSub EndSub*CSE.CSLG.CN402.2.8框架（Frame）

框架控件可從功能上把在其范圍之內(nèi)的相關(guān)控件組織在一起?？蚣艿膶傩?、可響應(yīng)的事件與窗體基本相同，方法有Move、Refresh等。

將控件置于框架中的兩種方法（推薦用第一種）(1)先畫出框架，再將其它控件放到框架中。(2)若先畫控件后畫框架，可“剪切”框架外的控件再“粘貼”到框架中。

*CSE.CSLG.CN412.2.9列表框(ListBox)

列表框(ListBox)用于列出可供用戶選擇的項(xiàng)目，用戶可從中選擇一個或多個選項(xiàng)。

常用屬性

List——該屬性是一個字符型數(shù)組，用于存放列表框的表項(xiàng)。2.ListCount——返回列表框中表項(xiàng)的數(shù)目

3.

ListIndex

——返回已選定表項(xiàng)的索引*CSE.CSLG.CN424.Text

——存放當(dāng)前選定表項(xiàng)的文本內(nèi)容5.Selected

——本屬性是一個邏輯值，表示列表框中某一表項(xiàng)是否被選中

6.Sorted——設(shè)置列表框中各表項(xiàng)在運(yùn)行時是否按字母順序排列

7.Columns——確定列表框是水平滾動還是垂直滾動，以及列表中表項(xiàng)的顯示方式8.Style

——確定列表框控件的樣式*CSE.CSLG.CN43事件

列表框可接收Click，DblClick等事件。

方法

（1）AddItern：把一個列表項(xiàng)加入到列表框中。語法格式為：[對象．]AddItem列表項(xiàng)[，索引]（2）Clear和RemoveItem：用于刪除表項(xiàng)。

語法格式如下：[對象．]Clear'刪除全部表項(xiàng)[對象．]RemoveItem索引值'刪除由索引指定的表項(xiàng)*CSE.CSLG.CN44【例2.6】

事件過程如下：PrivateSubForm_Load() '將表項(xiàng)添加到列表框中

List1.AddItem"北京"

List1.AddItem"上海"

List1.AddItem"天津"

List1.AddItem"重慶"

List1.AddItem"太原市"

List1.AddItem"石家莊"

List1.AddItem"武漢市"EndSub

*CSE.CSLG.CN45PrivateSubList1_Click()List2.AddItemList1.Text'在列表框2中添加選中的表項(xiàng)

List1.RemoveItemList1.ListIndex'刪除列表框1中選中的表項(xiàng)EndSub

PrivateSubCommand1_Click()End

EndSub*CSE.CSLG.CN462.2.10組合框(ComboBox)

組合框?qū)嶋H上是列表框和文本框的組合。用戶自己能輸入列表中不包括的內(nèi)容。常用屬性

style——該屬性取值為0，1或2，分別決定了組合框的3種不同類型，即下拉組合框(默認(rèn))、簡單組合框和下拉列表框。*CSE.CSLG.CN472.Text

——該屬性的值是用戶所選定的表項(xiàng)或直接從文本框輸入的表項(xiàng)。

事件

1.第①種組合框可響應(yīng)雙擊（DblClick）事件；

2.

①和③兩種組合框可響應(yīng)單擊（Click）事件，同時在編輯表項(xiàng)時可引發(fā)Change事件。

方法

用于列表框的方法，也適用于組合框。

*CSE.CSLG.CN482.2.11圖片框(PictureBox)和圖像框(Image)

圖片框(PictureBox)和圖像框(Image)都用于顯示圖形，它們可以顯示.bmp（位圖），.ico（圖標(biāo)），.wmf（圖元），.gif和.jpg等類型的圖形文件。常用屬性

1.Picture

——用于設(shè)置在圖片框中要顯示的圖像文件