學(xué)習(xí)課件三章

第3章常用控件與界面設(shè)計(jì)3.1創(chuàng)建窗體3.2常用控件3.3制作菜單3.4多窗體界面程序設(shè)計(jì)

3.5界面設(shè)計(jì)程序示例鹽城工學(xué)院

VisualBasic程序設(shè)計(jì)3.1創(chuàng)建窗體

窗體（Form）是為了設(shè)計(jì)VB應(yīng)用程序界面或?qū)υ捒蚨峁┑拇翱?，是包容用戶界面或?qū)υ捒蛩璧母鞣N控件的“容器”。

1.

窗體的屬性、方法與事件

窗體的屬性定義了它的外觀;窗體的方法定義了它的行為;窗體所能響應(yīng)的事件定義了它與用戶的交互；屬性窗口分為4個(gè)部分：對(duì)象框、屬性顯示方式、屬性列表、屬性解釋。激活屬性窗口的方式：“視圖”-“屬性窗口”、F4、擊“屬性窗口”按鈕、Ctrl+PgUp或Ctrl+PgDn VB為窗體規(guī)定了眾多的屬性、方法與事件。下面介紹窗體常用的屬性、方法與事件。(1)

窗體的常用屬性

1).Name：窗體名稱。

窗體名稱在程序代碼中作為窗體對(duì)象的標(biāo)識(shí)名。窗體名稱可以缺省。窗體名稱也可以自定義。窗體名稱自定義的命名規(guī)則：必須以字母或漢字開(kāi)頭，可以包含數(shù)字和下劃線,但不能包含空格或標(biāo)點(diǎn)符號(hào),窗體名（其他控件對(duì)象名同）長(zhǎng)度不得超過(guò)40個(gè)字符。它是只讀屬性,只能在設(shè)計(jì)階段設(shè)置,不能在運(yùn)行期間改變。

2).Caption：窗體標(biāo)題。窗體標(biāo)題是出現(xiàn)在窗體標(biāo)題欄的文本內(nèi)容。窗體標(biāo)題默認(rèn)與窗體名稱相同。標(biāo)題也可以自定義，只要是字符即可，不受其他約束。3.1創(chuàng)建窗體

注意：窗體名稱與窗體標(biāo)題是有區(qū)別的（窗體名稱作為一個(gè)窗體的標(biāo)識(shí)在程序中被引用，而不是為了顯示；窗體標(biāo)題這是一個(gè)字符串，在窗體的標(biāo)題上顯示）

。

同樣，使用“視圖”菜單中的“調(diào)色板”命令也可以設(shè)置窗體等對(duì)象的前景色和背景色。

3).BackColor與ForeColor：窗體的背景色與前景色。顏色值用一個(gè)長(zhǎng)整數(shù)表示。點(diǎn)擊屬性欄右邊的，會(huì)彈出一個(gè)顏色設(shè)置組合框。(1)

窗體的常用屬性3.1創(chuàng)建窗體

4).BorderStyle：邊框樣式用數(shù)值來(lái)表明窗體邊框的風(fēng)格。

它是只讀屬性，只能在設(shè)計(jì)階段設(shè)置，不能在運(yùn)行期間改變。說(shuō)明：Font是窗體的一種屬性，同時(shí)它又被看作一個(gè)對(duì)象

Font本身還具有Name,Size,Bold,Italic等子屬性。5).Font：正文字體設(shè)置窗體上所顯示的正文的字體、字號(hào)和字形等。點(diǎn)擊字體屬性欄右邊的對(duì)話框按鈕，彈出“字體對(duì)話框”（如圖）。默認(rèn)的字體為“宋體、常規(guī)、小五號(hào)”。(1)

窗體的常用屬性3.1創(chuàng)建窗體

6).Left、Top、Height、Width：窗體的位置(由Left和Top屬性決定)與大小(由Height和Width屬性決定)

默認(rèn)單位為特維（Twip）

7).Enabled：活動(dòng)屬性決定窗體能否被訪問(wèn)。8).Visible:可視屬性。決定窗口是否可見(jiàn)9).Picture:用于設(shè)置窗體上顯示的圖片程序代碼中設(shè)置的方法：對(duì)象名.Picture=LoadPicture(“盤(pán)符\路徑”）(1)

窗體的常用屬性3.1創(chuàng)建窗體

10).Controlbox(控制框)：設(shè)置窗口控制框的狀態(tài)，True（默認(rèn)）時(shí)，窗口左上角會(huì)顯示一個(gè)控制框。如果把BorderStyle屬性設(shè)置為“0-None”，則Controlbox屬性不起作用（即使被設(shè)置為T(mén)rue），只有當(dāng)BorderStyle屬性值為1、2、3時(shí)Controlbox屬性才起作用，它是只讀屬性。

11).Maxbutton(最大化按鈕)、Minbutton(最小化按鈕)

這兩個(gè)屬性用來(lái)顯示窗口右上角的最大化、最小化按鈕，Ture顯示，F(xiàn)alse不顯示。如果把BorderStyle屬性設(shè)置為“0-None”，則這兩個(gè)屬性將被忽略（即使被設(shè)置為T(mén)rue），它是只讀屬性。(2)

窗體的方法窗體可調(diào)用多個(gè)方法。常用的方法有：

Hide：隱藏窗體。

Move：把窗體移到某個(gè)位置。

Print：顯示文本或數(shù)據(jù)。

Show：顯示窗體。Cls方法

格式：[對(duì)象.]Cls

功能：清除運(yùn)行時(shí)在窗體或圖形框中顯示的文本或圖形。

3.1創(chuàng)建窗體

(3)窗體的事件

窗體可以響應(yīng)許多事件。常用的事件有：

Click：?jiǎn)螕簟?/p>

Dblclick：雙擊。

Load：裝載。

Unload：卸載2.定制窗體屬性方法一：在設(shè)計(jì)態(tài)，通過(guò)“屬性”窗口為其設(shè)定各種屬性值方法二：在程序代碼中改變屬性值（運(yùn)行時(shí)改變）格式：Object.Property=Expression

即：對(duì)象名.屬性名=表達(dá)式（屬性值）提示：如果屬性值是字符串，則用西文雙引號(hào)括起來(lái)。3.1創(chuàng)建窗體

3.引用窗體的方法VB中的所謂“方法”可使“對(duì)象”執(zhí)行一個(gè)動(dòng)作或任務(wù)。格式：Object.Method或Object.Method[Arg1,Arg2···]即：對(duì)象名.方法名或?qū)ο竺?方法名[參數(shù)1,參數(shù)···]例：b.隱藏窗體Form，在程序中加入代碼：

Form.Hide

表示隱藏“Form”窗體[例3-1](1)裝載語(yǔ)句

語(yǔ)句格式：LoadObject(2)卸載語(yǔ)句

語(yǔ)句格式：UnloadObject

或：UnloadMe(3)End語(yǔ)句

語(yǔ)句格式：End3.1創(chuàng)建窗體

4.窗體的裝載、卸載、End語(yǔ)句注意：

Unload和End的區(qū)別。3.1創(chuàng)建窗體

5.Print方法格式：[對(duì)象名.]Print[表達(dá)式表][,|;]Print方法可應(yīng)用于窗體、立即窗口、圖片框及打印機(jī)等對(duì)象中顯示文本字符串和表達(dá)式的值。說(shuō)明：對(duì)象名—可以是窗體(Form1.Print)、立即窗口(Debug.Print)、圖片框(Picture1.Print)、打印機(jī)(Printer.Print)，省略時(shí)默認(rèn)為當(dāng)前窗體。輸出列表—需要顯示的內(nèi)容，可以是多項(xiàng)列表，各個(gè)項(xiàng)間用逗號(hào)或分號(hào)分隔。對(duì)于數(shù)值表達(dá)式，將輸出表達(dá)式的值；對(duì)于字符串，則照原樣輸出。如果省略了“輸出列表”，則輸出一個(gè)空行。輸出數(shù)據(jù)時(shí)，數(shù)值數(shù)據(jù)的前面有一個(gè)符號(hào)位（前導(dǎo)格），后面有一個(gè)空格（尾隨格），而字符串前后都沒(méi)有空格。

3.1創(chuàng)建窗體

Print方法可以有以下兩種顯示方式：

第一種顯示方式是顯示變量或表達(dá)式的值：Print方法具有計(jì)算和顯示的雙重功能，對(duì)于表達(dá)式，先計(jì)算出表達(dá)式的值，然后顯示其結(jié)果。例如：

Print3+4,x,x+y‘如果x=7,y=9,則顯示

7716Print"Shanghai"&"Evening",4=6'顯示

ShanghaiEveningFalse3.1創(chuàng)建窗體

第二種顯示方式是原樣顯示字符串的。例如：

x1=3:x2=4Print“x1+x2=”;x1+x2‘顯示結(jié)果為：

x1+x2=7Print方法中，逗號(hào)和分號(hào)是顯示其列表項(xiàng)的分隔符，也可以作為輸出格式的控制，用逗號(hào)分隔稱為標(biāo)準(zhǔn)（又稱分區(qū)）格式，用分號(hào)分隔稱為緊湊格式。

（1）標(biāo)準(zhǔn)格式輸出

“標(biāo)準(zhǔn)格式”輸出就是以14個(gè)字符位置為一個(gè)標(biāo)準(zhǔn)區(qū)段，把一個(gè)輸出行分成若干個(gè)標(biāo)準(zhǔn)區(qū)段，逗號(hào)后面的表達(dá)式在下一個(gè)標(biāo)準(zhǔn)區(qū)段輸出。按標(biāo)準(zhǔn)格式輸出，數(shù)值的正負(fù)號(hào)各占一位。正號(hào)不顯示，但仍占一位。例如：3.1創(chuàng)建窗體

PrivateSubForm_Click()Print"054321"Print"|.............|.............|.............|..............|.."Print9,-12,789,-254Print"Hello!","etoBeijing!","student"EndSub

如果字符串的長(zhǎng)度超過(guò)了標(biāo)準(zhǔn)區(qū)段的長(zhǎng)度，則自動(dòng)后延，后面的字符串，依序后延。例13.1創(chuàng)建窗體

PrivateSubForm_Click()Print"054321"Print"|.............|.............|.............|..............|.."Print"Hello!","etoBeijing!":Font.Size=13Print"Hello!","etoBeijing!"EndSub在VisualBasic中，由于字體可以設(shè)置成不同大小，14個(gè)字符位置的標(biāo)準(zhǔn)區(qū)段的長(zhǎng)度就不再是相同的了。例如：從圖中可以看到：由于最后一行的字符串改變了大小，所以標(biāo)準(zhǔn)區(qū)段的長(zhǎng)度也改變了。例23.1創(chuàng)建窗體

（2）緊湊格式輸出“緊湊格式”輸出就是輸出時(shí)數(shù)字、符號(hào)占一位，數(shù)值項(xiàng)后空一字符位置，字符串后不空格。例如：PrivateSubForm_Click()Print"054321"Print"|.............|.............|.............|..............|.."Print9;-12;789;-254Print"aaa";"bbb";"ccc"Print"Hello!";"etoBeijing!";"student"EndSub例33.1創(chuàng)建窗體

（3）輸出行控制一個(gè)Print方法輸出一行信息，下一個(gè)Print方法將在下一行中輸出，相當(dāng)于每一個(gè)Print方法后有一個(gè)回車(chē)符。但是，如果Print方法行末端寫(xiě)了逗號(hào)或分號(hào)，那么輸出結(jié)果就不換行；若是逗號(hào)，就按標(biāo)準(zhǔn)格式與下一個(gè)Print方法輸出相連接；若是分號(hào)，就按緊湊格式與下一個(gè)Print方法輸出相連接。例如：3.1創(chuàng)建窗體

PrivateSubForm_Click()Print"054321"Print"|.............|.............|.............|..............|.."Print9,-12,789,'行末端有逗號(hào)

Print33,66Print:Print'空推兩行

Print"Hello!";"etoBeijing!";'行末端有分號(hào)Print"GoodEvening!"EndSub例4（4）與Print方法有關(guān)的函數(shù)為了使數(shù)據(jù)按照指定的格式輸出，VisualBasic提供了幾個(gè)與Print配合使用的函數(shù)，包括Tab、Spc、Space$、Cls等，這些函數(shù)可以與Print方法配合，但不能單獨(dú)使用。①Tab函數(shù)

Tab函數(shù)的功能是把光標(biāo)移到由參數(shù)n指定的位置，從這個(gè)位置開(kāi)始輸出信息。要輸出的內(nèi)容放在Tab函數(shù)的后面，并用分號(hào)隔開(kāi)。格式為：Tab(n)其中：n為一整數(shù)或數(shù)值表達(dá)式，它是下一個(gè)輸出位置的序號(hào)，表示在輸出前把光標(biāo)（打印頭）移到該列。通常最左邊的列號(hào)為１，如果當(dāng)前的顯示位置已經(jīng)超過(guò)ｎ，則自動(dòng)下移一行。例如：PrintTab(18);5000將在第18個(gè)字符位置開(kāi)始輸出數(shù)值5000。3.1創(chuàng)建窗體

②Spc函數(shù)在Print的輸出中，用Spc函數(shù)可以跳過(guò)n個(gè)空格。它的格式為：Spc(n)

其中：參數(shù)n是一個(gè)數(shù)值表達(dá)式，其取值范圍為0~32767的整數(shù)。Spc函數(shù)與輸出項(xiàng)之間用分號(hào)隔開(kāi)（不能用“+”）。3.1創(chuàng)建窗體

【例】題目要求同上例一樣，但要求在Print方法中使用格式函數(shù)Spc(n)。[分析與解答]編寫(xiě)窗體代碼如下：PrivateSubForm_Click()Print:PrintFont.Size=14Print"姓名";Spc(5);"學(xué)號(hào)";Spc(5);"語(yǔ)文";Spc(5);"數(shù)學(xué)";Spc(5);"英語(yǔ)"PrintPrint"張三";Spc(5);"0601001";Spc(7);"87";Spc(8);"89";Spc(9);"83"Print"李四";Spc(5);"0601022";Spc(7);"90";Spc(8);"68";Spc(9);"85"Print"王五";Spc(5);"0601019";Spc(7);"78";Spc(8);"90";Spc(9);"72"EndSub3.1創(chuàng)建窗體

例6③Space$()函數(shù)

Space$()函數(shù)也稱空格函數(shù)，它的功能就是返回n個(gè)空格。(中間分隔符可以是+；)格式為：Space$(n)例如：打開(kāi)“立即”窗口，在其中鍵入第一行內(nèi)容“s$=”XXX“+SPACE(10)+”YYY“”后，按回車(chē)鍵，在鍵入“?s$”，按回車(chē)鍵（？代表Print），此時(shí)下一行立即顯示了操作結(jié)果，可以看出：字符串“XXX”于“YYY”中間的10個(gè)空格就是Space$()函數(shù)的作用，如下圖所示。3.1創(chuàng)建窗體

(4)格式輸出函數(shù)

格式：

Format$(數(shù)值表達(dá)式，格式字符串)

功能：

按“格式字符串”指定的格式，以文本方式輸出“數(shù)值表達(dá)式”的值。

說(shuō)明：

“$”可有可無(wú)，按“格式字符串”指定的格式輸出“數(shù)值表達(dá)式”的值；如果缺省“格式字符串”,則功能與Str$函數(shù)基本相同，唯一的差別是，當(dāng)正數(shù)轉(zhuǎn)換成字符串時(shí)，str$函數(shù)在字符串前面留有一個(gè)空格，而Format$函數(shù)則不留空格。3.1創(chuàng)建窗體

字符功能舉例##號(hào)的個(gè)數(shù)表示顯示區(qū)段的長(zhǎng)度，數(shù)值靠左顯示；如果數(shù)值位數(shù)大于區(qū)段長(zhǎng)度，則照原樣顯示。數(shù)字，不在前面或后面補(bǔ)0PrintFormat$(123,“####”)123PrintFormat$(12345,“####”)1234500的功能與#相同，如果數(shù)值位數(shù)小于區(qū)段長(zhǎng)度，不足的位補(bǔ)0。PrintFormat$(123,“0000.00”)0123.00PrintFormat$(12345,“0000.00”)12345.00格式說(shuō)明字符3.1創(chuàng)建窗體

字符功能舉例.顯示小數(shù)點(diǎn)，與#或0結(jié)合使用，小數(shù)部分多余的數(shù)字按四舍五入處理PrintFormat$(1.2345,“00.00”)01.23PrintFormat$(1.2378,“##.##”)1.24%輸出百分號(hào)，通常放在格式字