第2章對(duì)象及建立簡(jiǎn)單的VB應(yīng)用程序課件

1、 Visual basic程序設(shè)計(jì) 第二章（1）建立簡(jiǎn)單的VB程序2.1第2章 對(duì)象及建立簡(jiǎn)單的VB應(yīng)用程序窗體的常用屬性和方法2.3對(duì)象、事件與事件過程2.2 本章介紹 1、闡述面向?qū)ο蟪绦蛟O(shè)計(jì)的一些重要概念：對(duì)象、事件、方法 2、建立簡(jiǎn)單VB應(yīng)用程序 3、窗體的屬性、方法和事件介紹 4、應(yīng)用舉例2.1 建立簡(jiǎn)單的VB應(yīng)用程序【例2.1】建立如圖所示界面 1個(gè)標(biāo)簽、3個(gè)命令按鈕要求：程序運(yùn)行，顯示“歡迎”單擊“清除”按鈕，不顯示內(nèi)容單擊“顯示”按鈕，顯示“祝你成功！”單擊“退出”按鈕，結(jié)束程序1、界面設(shè)計(jì)2、屬性設(shè)置對(duì)象屬性設(shè)置Form1 Caption VB應(yīng)用程序Command1Comm

2、and2Command3 Caption 顯示(清除、退出) Font 四號(hào)Label1 Caption 空 BorderStyle 1 Alignment 2 Font 楷體、粗體、二號(hào)3、代碼編寫Private Sub Form_Load() Label1.Caption = 歡迎你來學(xué)習(xí)VB！End Sub Private Sub Command1_Click() Label1.Caption = 祝你成功！End SubPrivate Sub Command2_Click() Label1.Caption = End SubPrivate Sub Command3_Click() En

3、dEnd Sub 2.2 對(duì)象、事件與事件過程VB是面向?qū)ο蟮某绦蛟O(shè)計(jì)語言面向?qū)ο蟪绦蛟O(shè)計(jì)是一種以對(duì)象為基礎(chǔ)，以事件來驅(qū)動(dòng)對(duì)象的程序設(shè)計(jì)方法。它將一個(gè)應(yīng)用程序劃分成多個(gè)對(duì)象，并且建立與這些對(duì)象相關(guān)聯(lián)的事件過程。通過對(duì)象對(duì)所發(fā)生的事件產(chǎn)生響應(yīng)，來執(zhí)行相應(yīng)的事件過程，以引發(fā)對(duì)象狀態(tài)的改變，從而達(dá)到處理的目的。2.2.1 對(duì)象對(duì)象是VB應(yīng)用程序的基礎(chǔ)構(gòu)件 對(duì)象是由屬性和方法組成的實(shí)體 窗體、控件、數(shù)據(jù)庫、圖表等都是對(duì)象對(duì)象具有屬性和方法，并響應(yīng)外部事件 在開發(fā)一個(gè)應(yīng)用程序時(shí)，必須先建立各種對(duì)象，然后圍繞對(duì)象進(jìn)行程序設(shè)計(jì)。2.2.2 對(duì)象的屬性屬性是指對(duì)象的特征 每一種對(duì)象都有一組特定的屬性，在屬性窗

4、口中可以看到。有些屬性屬于公共屬性，有些屬性則屬于該對(duì)象的專有屬性。每個(gè)屬性都有一個(gè)缺省值，如果不改變?cè)撝?，?yīng)用程序就使用它，如果缺省值不能滿足要求，就要對(duì)它重新設(shè)置。VB對(duì)象的屬性設(shè)置方法對(duì)象的大部分屬性可用兩種方法來設(shè)置 屬性窗口設(shè)置 程序代碼設(shè)置有少量的屬性不能在程序代碼中設(shè)置程序中設(shè)置屬性的一般格式：對(duì)象名. 屬性名 = 表達(dá)式 動(dòng)態(tài)設(shè)置例：Text1.text=“歡迎”屬 性 名功 能 說 明屬 性 名功 能 說 明Name對(duì)象名稱Left左邊距ForeColor前景色Top上邊距BackColor背景色Width對(duì)象的寬度BackStyle背景樣式Height對(duì)象的高度Border

5、Style邊框樣式Enabled對(duì)象是否有效Font字體格式Visible對(duì)象是否可見VB對(duì)象常用的基本屬性2.2.3 對(duì)象的方法方法是VB提供的一種特殊子程序(過程) 每個(gè)方法完成某個(gè)功能，用來完成諸如顯示對(duì)象、隱藏對(duì)象、繪圖、打印等操作。但其實(shí)現(xiàn)的步驟和細(xì)節(jié)用戶既看不到，也不能修改，用戶能做的就是在編程時(shí)直接調(diào)用它們。方法的調(diào)用格式： 對(duì)象名.方法名 例：Form1.Print “你好！” 在窗體上輸出“你好！” Form2.show 顯示窗體Form2 Form1.cls 清除窗體上顯示的信息2.2.4 對(duì)象的事件對(duì)象的事件是VB預(yù)先定義好的、能被對(duì)象識(shí)別的動(dòng)作。 如：?jiǎn)螕簦–lick）

6、事件 雙擊（DblClick）事件 鍵盤按下（Keypress）事件當(dāng)事件由用戶觸發(fā)（例如單擊）或由系統(tǒng)觸發(fā)（例如裝入）時(shí)，對(duì)象就會(huì)對(duì)該事件做出響應(yīng)。 如：運(yùn)行應(yīng)用程序時(shí)，當(dāng)單擊一個(gè)命令按鈕，對(duì)于命令按鈕這個(gè)對(duì)象，就發(fā)生了一個(gè)單擊事件。事件可由用戶引發(fā)（例如單擊鼠標(biāo)），可由系統(tǒng)引發(fā)（例如定時(shí)器事件），也可由代碼間接引發(fā)。對(duì)象的事件是固定的，用戶不能建立新的事件。不同類型的對(duì)象能識(shí)別不同的事件。如窗體能識(shí)別單擊和雙擊事件，而命令按鈕能識(shí)別單擊事件但不能識(shí)別雙擊事件。每一種對(duì)象能識(shí)別的事件可以從該對(duì)象的代碼窗口右邊事件框的下拉列表中看到。2.2.5 事件過程事件過程 響應(yīng)某個(gè)事件后所執(zhí)行的操作通過

7、一段程序代碼來實(shí)現(xiàn)，這樣的一段程序代碼叫做事件過程 盡管對(duì)象能自動(dòng)識(shí)別預(yù)定義的事件，但對(duì)象是否響應(yīng)具體事件以及如何響應(yīng)具體事件則取決于程序員是否在程序中作了安排，即程序員是否為該對(duì)象的這個(gè)事件編寫了實(shí)現(xiàn)某一功能的程序代碼。事件過程的一般格式: Private Sub 對(duì)象名_事件名() (VB程序代碼) End Sub例如：?jiǎn)螕裘畎粹o“command2”，隱藏文本框text1，則對(duì)應(yīng)的事件過程為： Private Sub Command2_Click() Text1.Visible=False End Sub VB程序的執(zhí)行是由事件來驅(qū)動(dòng)的以下是事件驅(qū)動(dòng)應(yīng)用程序的典型工作過程： （1）啟動(dòng)應(yīng)

8、用程序，裝載和顯示窗體 （2）對(duì)象等待事件的發(fā)生。 （3）事件發(fā)生后，如果在相應(yīng)的事件過程中存在代碼，就執(zhí)行代碼。 （4）應(yīng)用程序等待下一次事件。 2.3 窗體和常用基本控件2.3.1 窗體1. 窗體的主要屬性窗體的屬性決定了窗體的外觀和操作屬性名功 能 說 明屬性名功 能 說 明Name窗體名稱Picture窗體中的背景圖片Caption窗體標(biāo)題WindowState窗體運(yùn)行時(shí)顯示狀態(tài)MinButton是否顯示最小化按鈕Font字體格式MaxButton是否顯示最大化按鈕CurrentX當(dāng)前位置的橫坐標(biāo)BorderStyle窗體邊框風(fēng)格CurrentY當(dāng)前位置的縱坐標(biāo)（1）Caption 屬

9、性 設(shè)置窗體的標(biāo)題欄上顯示的內(nèi)容標(biāo)題內(nèi)容應(yīng)概括說明本窗體作用（2）MaxButton 屬性和 MinButton 屬性 MaxButton屬性為True時(shí)，窗體右上角有最大化按鈕為False時(shí)，窗體右上角無最大化按鈕 MinButton 屬性為True時(shí)，窗體右上角有最小化按鈕為False時(shí)，窗體右上角無最小化按鈕（3）BorderStyle 屬性 決定窗體邊框式樣及窗體是否能調(diào)整大小注意：該屬性是只讀屬性，即只能在設(shè)計(jì)階段設(shè)置，不能在運(yùn)行階段設(shè)置。（4）BackColor屬性和ForeColor 屬性 BackColor屬性：設(shè)置窗體的背景顏色ForColor 屬性：設(shè)置窗體的前景顏色。注意

10、：窗體的前景顏色是執(zhí)行Print方法時(shí)所顯示文本的顏色。（5）Height屬性和Width屬性設(shè)置窗體的初始高度和寬度其單位為Twip1Twip=1/20點(diǎn)=1/1440英寸=1/567厘米（6）Left屬性和Top屬性 設(shè)置窗體左邊框距屏幕左邊界的距離和窗體頂邊距屏幕頂端的距離其單位為Twip（7）Name（名稱）屬性 設(shè)置窗體的名稱，在程序代碼中用這個(gè)名稱引用該窗體。為了便于識(shí)別，用戶通常給 Name 屬性設(shè)置一個(gè)有實(shí)際意義的名稱。（8）Enabled屬性設(shè)置對(duì)象是否能夠?qū)τ脩舢a(chǎn)生的事件做出反應(yīng)為True時(shí)，窗體可對(duì)事件做出反應(yīng)為False時(shí)，窗體呈灰色，用戶不能訪問它通常在程序中設(shè)置，用

11、于臨時(shí)屏蔽對(duì)窗體或其他控件的的控制。（9）Moveable屬性 設(shè)置是否可以移動(dòng)窗體屬性值為True時(shí)，可移動(dòng)窗體屬性值為False時(shí)，不可移動(dòng)窗體（10）Visible屬性設(shè)置窗體是否被顯示屬性值為True時(shí)，窗體顯示屬性值為False時(shí)，窗體被隱藏用戶利用該屬性可在程序代碼中控制窗體的隱現(xiàn)（11）Picture屬性 設(shè)置在窗體中顯示的圖片單擊Picture屬性右邊的按鈕，彈出“加載圖片”對(duì)話框，用戶可選擇一個(gè)圖片文件作為窗體的背景圖片。若在程序中設(shè)置該屬性的值，需要使用LoadPicture函數(shù)。例如： Form1.Picture=LoadPicture(路徑及文件名)（12）Window

12、State屬性設(shè)置窗體啟動(dòng)時(shí)的大小狀態(tài)它有三個(gè)可選值： 0-Normal: 窗體大小由Height和Width屬性決定。 1-Minimized: 窗體最小化成圖標(biāo)。 2-Maximized: 窗體最大化，充滿整個(gè)屏幕。（13）Icon屬性設(shè)置窗體的圖標(biāo)Icon的使用方法同Picture屬性通常把該屬性的值設(shè)置為.ico格式的圖標(biāo)文件（14） Controlbox 屬性設(shè)置窗體的控制菜單的顯示屬性值為True時(shí),窗體左上角有控制菜單和最大化、最小化、關(guān)閉按鈕；屬性值為False時(shí)，則只顯示標(biāo)題?？刂撇藛我詧D標(biāo)方式顯示（15）Font屬性設(shè)置在窗體上顯示文本的字體屬性例如： 在窗體單擊顯示文字“

13、VB程序設(shè)計(jì)”代碼編寫Private Sub Form_Click() With Form1 FontName = 黑體 FontSize = 20 FontBold = True FontItalic = True FontUnderline = True Print VB程序設(shè)計(jì) End WithEnd Sub運(yùn)行界面如圖所示：（16）AutoRedraw屬性該屬性決定當(dāng)窗體上顯示的內(nèi)容被其它窗口覆蓋后，重新回到原狀態(tài)時(shí)內(nèi)容是否可見。屬性為True時(shí)，被其它窗口覆蓋的內(nèi)容會(huì)重新顯示屬性為False時(shí),被其它窗口覆蓋的內(nèi)容如同用橡皮擦除一樣，不再顯示在VB中，雖然不同的對(duì)象有不同的屬性集合，

14、但有一些屬性，如：Name 、Enabled、Visible、Height、Width、Left、Top等其他控件也都具有，且具有相似的作用。2.窗體的事件簡(jiǎn) 單 劃 分事 件 名功 能 說 明啟動(dòng)Initialize初始化事件Load載入事件卸載QueryUnload卸載前觸發(fā)Unload卸載時(shí)觸發(fā)鼠標(biāo)操作Click單擊事件DblClick雙擊事件活動(dòng)狀態(tài)Activate激活事件Deactivate失去激活事件焦點(diǎn)GotFocus獲得焦點(diǎn)事件LostFocus失去焦點(diǎn)事件其他Resize改變窗體大小事件（1）Click事件程序運(yùn)行后，單擊窗體觸發(fā)該事件（2）DbClick事件程序運(yùn)行后，雙擊

15、窗體觸發(fā)該事件（3）Load事件Load事件是窗體被裝入內(nèi)存工作區(qū)時(shí)觸發(fā)的事件運(yùn)行應(yīng)用程序，如果該事件過程存在，在裝入窗體后，系統(tǒng)首先觸發(fā)窗體的該事件。Load事件過程通常用于啟動(dòng)程序時(shí)對(duì)屬性、變量的初始化，裝載數(shù)據(jù)等。（4）Activate事件當(dāng)一個(gè)窗體被激活時(shí)觸發(fā)該事件。其表現(xiàn)成為當(dāng)前活動(dòng)窗體。運(yùn)行窗體、使用show方法、單擊一個(gè)對(duì)象等都可激活窗體觸發(fā)該事件。（5）Resize事件程序運(yùn)行后，調(diào)出窗體和調(diào)整窗體的大小時(shí)觸發(fā)該事件。（6）KeyPress事件程序運(yùn)行后，當(dāng)用戶按下鍵盤上某個(gè)鍵時(shí)觸發(fā)該事件。3. 窗體的常用方法方 法 名功 能 說 明方 法 名功 能 說 明Print輸出打印M

16、ove移動(dòng)窗體Cls清屏PrintForm打印窗體Show顯示窗體Refresh刷新窗體Hide隱藏窗體方法的語法結(jié)構(gòu)： 對(duì)象.方法參數(shù)列表（1）Print方法用于在對(duì)象上輸出表達(dá)式的值 格式： 對(duì)象名.Print spc(n)|tab(n) 表達(dá)式列表; | ,（2）Cls方法用于清除在窗體上顯示的信息或圖形框中的顯示的文本或圖形 格式： 對(duì)象名. Cls 插入空格 定位輸出 標(biāo)準(zhǔn)格式輸出 緊湊格式輸出（3）Show和Hide方法 用于快速顯示或隱藏窗體 格式： 窗體名. Show Style 窗體名. Hide Hide方法無參數(shù)，Show方法參數(shù)可有可無若Style參數(shù)為0，或參數(shù)為vb

17、Modeless以及默認(rèn)時(shí)，表示窗體是無模式的，用戶可以和應(yīng)用程序中的其他窗體交互；若Style參數(shù)為1，或參數(shù)為vbModel時(shí)，表示窗體是有模式的，用戶不能同時(shí)與應(yīng)用程序的其他窗體交互。（4）Move方法用于移動(dòng)并改變窗體或控件的位置和大小 格式： 對(duì)象名.Move Left,Top,Width,HeightLeft、Top、Width和Height 4個(gè)參數(shù)分別可以設(shè)置對(duì)象移動(dòng)后其左上頂點(diǎn)的橫坐標(biāo)和縱坐標(biāo)，以及改變大小后的寬度和高度。除了Left參數(shù)是必選的，其他參數(shù)都是可選的，但要保證最后一個(gè)參數(shù)前面的參數(shù)是完整的。4. 窗體的常用語句（1）Load語句：將窗體或其他控件對(duì)象載入內(nèi)存但不顯示。 語句格式：Load 對(duì)象名（2）Unload語句：使該對(duì)象的所有屬性重新恢復(fù)為設(shè)計(jì)狀態(tài)時(shí)設(shè)定的初始值，并且還將引發(fā)對(duì)象的卸載事件。 語句格式：Unload 對(duì)象名（3）End語句 ：結(jié)束程序的運(yùn)行 語句格式：End對(duì)象名可以是Me，表示卸載當(dāng)前窗體。 例1:窗體上無最大化最小化按鈕，程序運(yùn)行后，在窗體上裝入一幅圖片作為背景；當(dāng)單擊窗體時(shí)，窗體變寬；當(dāng)雙擊窗體時(shí)，則退出。程序運(yùn)行界面如圖示