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