前面已經(jīng)接觸到類的變量、屬性以及枚舉,但我們怎樣才能更好的利用它們呢?
顯然,子過程就是其中的一種方式,它幾乎出現(xiàn)所有的Visual Basic程序中,所以這里來舉例說明。
在CDog類中添加下列代碼:
Public Sub Bark()
MsgBox "Woof! Woof!"
End Sub
這里的子過程是最常見的,我們可以簡單地使用MyDog.Bark來調(diào)用它。
下面來試一試:
將表單Form1的Command按鈕的代碼改成:
Dim MyDog As CDog
Set MyDog = New CDog
MyDog.Name = "Billy"
MyDog.Bark
Set MyDog = Nothing
需要說明的是,在鍵入"MyDog."會彈出相應(yīng)的列表,各列表項前面都有不同顏色的小圖標(biāo)區(qū)分不同的類型。例如Bark子過程項前面的是黃綠色的,屬性是灰色和藍(lán)色的,這樣能幫助我們識別Bark是MyDog對象的一個方法。
按F5運(yùn)行并測試。
事實上,除了子過程外,我們也可以在代碼中添加函數(shù)。這里我們就不舉例了,你可以自己嘗試一下。因為函數(shù)和一般子過程除了能在一個類中外,其工作也是相同的。但不要忘記,所有子過程和函數(shù)都可以有自己的參數(shù)。
現(xiàn)在,讓我們設(shè)想一下,在類中有一個Sleep方法。當(dāng)我們想要cat睡覺或dog打盹時,每次都得調(diào)用這個方法。
但是,我們怎么知道這些小東西什么時候醒來?這是一個非常有趣的問題,其答案是使用事件(event)。
當(dāng)我們在文本編輯框中鍵入字符時就會產(chǎn)生Change事件,而當(dāng)我們單擊命令按鈕時就會產(chǎn)生Click事件。同樣,想知道這些小東西什么時候醒來,就需使用下一節(jié)所著重討論的Awake事件。
顯然,子過程就是其中的一種方式,它幾乎出現(xiàn)所有的Visual Basic程序中,所以這里來舉例說明。
在CDog類中添加下列代碼:
Public Sub Bark()
MsgBox "Woof! Woof!"
End Sub
這里的子過程是最常見的,我們可以簡單地使用MyDog.Bark來調(diào)用它。
下面來試一試:
將表單Form1的Command按鈕的代碼改成:
Dim MyDog As CDog
Set MyDog = New CDog
MyDog.Name = "Billy"
MyDog.Bark
Set MyDog = Nothing
需要說明的是,在鍵入"MyDog."會彈出相應(yīng)的列表,各列表項前面都有不同顏色的小圖標(biāo)區(qū)分不同的類型。例如Bark子過程項前面的是黃綠色的,屬性是灰色和藍(lán)色的,這樣能幫助我們識別Bark是MyDog對象的一個方法。
按F5運(yùn)行并測試。
事實上,除了子過程外,我們也可以在代碼中添加函數(shù)。這里我們就不舉例了,你可以自己嘗試一下。因為函數(shù)和一般子過程除了能在一個類中外,其工作也是相同的。但不要忘記,所有子過程和函數(shù)都可以有自己的參數(shù)。
現(xiàn)在,讓我們設(shè)想一下,在類中有一個Sleep方法。當(dāng)我們想要cat睡覺或dog打盹時,每次都得調(diào)用這個方法。
但是,我們怎么知道這些小東西什么時候醒來?這是一個非常有趣的問題,其答案是使用事件(event)。
當(dāng)我們在文本編輯框中鍵入字符時就會產(chǎn)生Change事件,而當(dāng)我們單擊命令按鈕時就會產(chǎn)生Click事件。同樣,想知道這些小東西什么時候醒來,就需使用下一節(jié)所著重討論的Awake事件。