第2章面向?qū)ο缶幊袒A(chǔ)王紹清第2章面向?qū)ο缶幊袒A(chǔ)本章內(nèi)容：對象和控件控件的屬性和方法控件的事件程序設(shè)計步驟本章重點：VB控件的屬性、方法和事件本章難點：類、對象、屬性、事件、方法的概念一、對象、類的概念1.對象對象是具有特殊屬性和行為方式（方法）的實體，如窗體、各種控件等。類是一個抽象的概念，是用來創(chuàng)建對象的模板，它包括所創(chuàng)建對象的狀態(tài)描述和方法定義，而對象只是類的一個實例。2.常用的對象類型窗體控件數(shù)據(jù)庫外部程序提供的對象自定義對象：由自定義類產(chǎn)生的對象3.描述對象的三個基本要素屬性、事件和方法是描述對象的三個基本要素2.1對象和控件4.給對象命名對象名稱在屬性窗口中的“名稱”欄指定。窗體或控件對象在設(shè)計時VB會自動提供一個缺省的名稱。對象名稱在同一作用域內(nèi)必須保證唯一性。對象命名最好表示數(shù)據(jù)的含義，并加一個前綴來表示對象的類型。如：frmMain、cmdOpen、textAddress等。5.對象的屬性對象有不同的特征，特征就是屬性。每種屬性有屬性名稱和特定對象的屬性值。比如姚明的身高為226cm指定或修改對象的屬性值：對象名.屬性名稱＝新設(shè)置的屬性值

form1.Caption=“歡迎”獲取對象的屬性值：對象名.屬性名稱

form1.Caption2.1對象和控件2.1對象和控件6.對象的事件事件是可被對象識別的動作。由VB預(yù)先定義好賦予對象，不可更改。如Load、Click、Activate等。對象的方法方法就是可以對對象執(zhí)行的操作。它是系統(tǒng)提供的一種特殊函數(shù)或過程，用于完成某種特定功能。比如窗體可以移動，就是一個move方法，如何移動，就是該方法的參數(shù)。事實上，方法就好比一個函數(shù)或過程。如Move、Setfocus等。方法的使用[對象名].方法名[參數(shù)列表]示例：

form1.move0,0 ’移動窗體到屏幕左上角2.1對象和控件二、VB中的控件內(nèi)部標(biāo)準(zhǔn)控件

VB工具箱中列出的控件。如文本框、命令按鈕等。ActiveX控件即外部控件。不自動顯示在工具箱中，一般以擴(kuò)展名為.ocx的文件獨立存在，使用時進(jìn)行加載。如通用對話框、多媒體控件等。2.2控件的屬性和方法一、控件的屬性名稱——Name屬性控件的名稱由屬性窗口中的“（名稱）”確定。每個對象都有一個唯一的名稱，即所有控件都有此屬性對象的名稱只能在屬性窗口中設(shè)定，不能在程序中修改。在程序中，需要使用對象的名稱來引用對象。2.2控件的屬性和方法Height,Width,Left,Top屬性Left：返回或設(shè)置控件左邊與其容器左邊之間的距離Top：返回或設(shè)置控件頂部與其容器頂邊之間的距離Width：返回或設(shè)置控件的寬度Height：返回或設(shè)置控件的高度注意：這里所指的都是相對于容器的坐標(biāo)，而不是屏幕的絕對坐標(biāo)坐標(biāo)單位為twip(緹)1twip=1/567cm2.2控件的屬性和方法ForeColor、BackColor、Font屬性ForeColor

：返回或設(shè)置在控件內(nèi)顯示的圖片和文本的前景顏色BackColor

：返回或設(shè)置控件的背景顏色Font：返回或設(shè)置控件的文字字體使用顏色常量vbBlack

vbBlue

vbGreen

VbRed

vbWhite

VbYellow

vbcyan(青色)，

vbMagenta(紫紅色)

使用RGB（R,G,B）函數(shù)格式：RGB(R,G,B)R（紅）、G（綠）、B（藍(lán)）取值在0－255，如黃色為（255，255，0）程序中設(shè)置顏色，有兩種方法2.2控件的屬性和方法多個與字體有關(guān)的控件屬性FontName（字體名）

Form1.FontName=“黑體”FontSize（字體大?。?/p>

Form1.FontSize=24FontBold（是否加粗）

Form1.FontBold=TrueFontItalic（是否斜體）、FontUnderline（是否加下劃線）、FontStrikethru（是否加刪除線）Font屬性是一個對象類型，字體的各種定義也可由該對象的不同屬性來控制，如：Form1.Font.Name=“黑體”Form1.Font.Size=12Form1.Font.Bold=True2.2控件的屬性和方法與控件的值有關(guān)的屬性

Caption

返回或設(shè)置窗體和控件的標(biāo)題

Frame、

Label、

OptionButton

、CheckBox

、

CommandButton等控件有此屬性。Text

Textbox,List,ComboBox等控件使用該屬性設(shè)置控件的動態(tài)文本。通常有Text屬性時，也會有SelText、

SelStart,SelLength屬性。

Value

CommandButton

、CheckBox、OptionButton控件使用該屬性記錄控件的狀態(tài)。2.2控件的屬性和方法Enabled返回或設(shè)置控件是否可用。取值為True（可用）或False（不可用，呈灰色）示例：Command1.Enabled=FalseVisible

返回或設(shè)置控件是否可見，取值為True（可見）或False（不可見）示例：Command1.Visible=FalseTabIndex

設(shè)置Tab鍵的順序，該屬性決定控件在一個窗體中的輸入順序，取值為整型。TabStop

設(shè)該值決定是否可以通過TAB鍵將焦點從上一個焦點移動當(dāng)前控件。取值為True（可以移動焦點）或False。2.2控件的屬性和方法二、控件的方法方法的使用形式:[對象.]方法[參數(shù)]Move方法：移動控件，或改變控件大小格式：對象名.MoveLeft[,Top,Width,Height]后三個參數(shù)是可省略的使用該方法比直接對屬性賦值效率要高舉例：Command1.move0,0,2000,1000SetFocus方法：使控件獲得焦點。格式：對象名.setfocus如果控件無效或不可見，使用該方法會出錯。一般通過窗體的Activate事件設(shè)置焦點。舉例：Text1.setfocus2.2控件的屬性和方法三、窗體常用的方法

除Move方法外，窗體還有以下常用方法：Print方法：輸出表達(dá)式的值。表達(dá)式之間可以用逗號（緊湊形式輸出）或分號（標(biāo)準(zhǔn)形式輸出）隔開。舉例：Me.print3*2，5^2Cls方法：清除窗體上顯示的內(nèi)容舉例：Me.clsShow方法：顯示窗體舉例：Me.ShowHide方法：隱藏窗體舉例：Me.Hide2.3控件的事件事件：預(yù)先定義好的、能夠被對象識別的動作。事件過程：為響應(yīng)特定事件而執(zhí)行的指令，是窗體的代碼部分。事件過程的一般格式如下：PrivateSub對象名稱_事件名稱（）事件響應(yīng)程序代碼EndsubVB控件通用事件

Click:單擊事件

DblClick：雙擊事件

KeyPress(參數(shù))：當(dāng)按下鍵盤上的一個ASCII字符鍵時，觸發(fā)該事件。注意：在控制鍵中，KeyPress事件只能識別：Enter、Tab、Space、Backspace等幾個鍵。

。

PrivateSubText1_KeyPress(KeyAsciiAsInteger)

printKeyAsciiEndSub

KeyDown（參數(shù)）和KeyUP（參數(shù)）鍵盤中任意鍵只要按下，就產(chǎn)生KeyDown事件，松開時產(chǎn)生KeyUp事件，有鍵值和控制鍵狀態(tài)兩個參數(shù)。

Change事件當(dāng)控件的的值發(fā)生改變時會引發(fā)該事件，包括文本框、組合列表框、滾動條、驅(qū)動器和目錄列表等。VB控件通用事件6.MouseMove（參數(shù)）當(dāng)鼠標(biāo)在控件上移動時，引發(fā)該事件7.MouseDown

（參數(shù)）和MouseUP

（參數(shù)）鼠標(biāo)任何鍵按下和松開會產(chǎn)生MouseDown和MouseUp事件8.GotFocus和LostFocus當(dāng)控件接受到輸入焦點時，引發(fā)GotFocus事件當(dāng)控件失去輸入焦點時，引發(fā)LostFocus事件舉例：設(shè)置文本框Text1的GotFoucus事件，當(dāng)Text1獲得焦點時，自動清空

PrivateSubText1_GotFocus()

Text1.Text="" EndSub2.4程序設(shè)計步驟分析問題，確定程序要完成什么任務(wù)，按下面的步驟創(chuàng)建應(yīng)用程序：（1）新建工程（創(chuàng)建一個應(yīng)用程序首先要打開一個新的工程）（2）在該工程中添加窗體，設(shè)計界面（3）編寫代碼（4）程序運行與調(diào)試（重復(fù)2