PrivateSubCommand1＿Click（）
ListBoxAdditemText1Text
EndSub
按鈕
Combo1AddItemText1
Combo1Text＝Text1
擴展資料：
事件及說明：
（1）標題欄顯示“鼠標點擊”，窗體顯示“歡迎來到VB”。
（2）雙擊鼠標事件。當程序運行時，雙擊表單中的壹個位置將觸發兩個事件。第壹次按下鼠標時，觸發單擊事件，第二次生成DblClick事件。
（3）初始化事件和加載事件。當程序運行時，當表單被加載到工作空間中時，它的加載事件會在表單啟動後觸發。因此，該事件通常用於在應用程序啟動時初始化控制屬性和變量。
（4）卸載事件。此事件在窗體卸載時觸發。
（5）調整大小事件。當窗體大小發生變化時，將觸發調整大小事件。
（6）激活和停用事件。激活，當壹個對象成為活動窗口時發生。當窗體在程序運行過程中變為不活動時，對象成為壹個不活動事件時，就發生了停用。
（7）MouseDown事件。當按下鼠標的任何鍵時發生
（8）MouseMove事件。當按下任何鼠標鍵並移動鼠標時發生。
（9）MouseUp事件。當釋放任何鼠標鍵時發生。