VB ─ 第七篇 [初探物件] Command...Click 篇

3-2     Command...Click



這一次要介紹的是Command[按鈕],也可以說是按鍵,Command常用的事件是Click,還記得事件Click是什麼吧!嗯...容小魚兒上一次說的太衝忙了,小魚兒把Click的意思詳細的說一次:


 


Click:事件是發生在按下一個物件,並接著放開滑鼠鍵時。此外也會發生在一個控制項的值改變時。


 


Form 物件來說,該事件會發生在按下空白區域或未啟用之控制項時;對控制項來說,此事件會發生在使用者:



  • 用滑鼠的左鍵或右鍵按一下控制項。對 CheckBoxCommandButtonListbox OptionButton 控制項來說,Click 事件只會在按一下滑鼠左鍵時引發。




  • 藉由使用方向鍵或按下滑鼠鍵,可選取 ComboBox ListBox 控制項中的項目。




  • CommandButtonOptionButton CheckBox 控制項具有駐點時,按住 SPACEBAR 鍵。




  • 當表單中有 Default 屬性為 True CommandButton 控制項時,按下 ENTER 鍵。




  • 當表單中有 Cancel 按鈕 — Cancel 屬性設定為 True CommandButton 控制項時,按下 ESC 鍵。




  • 按下控制項之快速鍵。例如,如果一個 CommandButton 控制項的標題是「確定(O)」,則按下 ALT+O 可引發此事件。


您也可以在程式碼中引發 Click 事件,透過:



  • 將一個 CommandButton 控制項的 Value 屬性設定為 True




  • 將一個 OptionButton 控制項的 Value 屬性設定為 True




  • 改變一個 CheckBox 控制項的 Value 屬性設定。


 


附註 若要區別滑鼠的左、中、右按鈕,應使用 MouseDown 和 MouseUp 事件。後期小魚兒會再另外解說。


如果在 Click 事件中有程式碼,DblClick 事件將不會被引發,因為 Click 事件是先被引發的事件。其結果是按下滑鼠鍵的動作會被 Click 事件攔截,並使 DblClick 事件不會發生。


呵呵......好像詳細過頭了,總而言之Click事件就是:當滑鼠在物件上執行的動作。


現在建立一個物件[Command1],填寫程式碼如下:


==========================


Private Sub Command1_Click()

    
Print "魚兒工作室"

End Sub


==========================


現在的初學者的功力應該看的出來他的意思吧!


==========================


開始執行本段程式於 按鈕1_滑鼠執行事件()

    
列印出 "魚兒工作室"

結束執行於本段程式


==========================


如果說,在執行後不斷的壓下按鈕,一定會發現一直換行列印出 "魚兒工作室",試想有沒有辦法在執行後就只列印一次"魚兒工作室",不要讓他一直換行列印出 "魚兒工作室":


==========================


Private Sub Command1_Click()

    
Cls

    
Print "魚兒工作室"

End Sub


==========================


加上一個Cls就是不一樣Cls的意思就是清除的意思,我們看看其中文動作:


==========================


開始執行本段程式於 按鈕1_滑鼠執行事件()

    
清除畫面

    
列印出 "魚兒工作室"

結束執行於本段程式


==========================


先好好應用Command...Click吧!下次說說Text[文書盒],順便用Command和Text寫寫幾個簡單的程式!

沒有留言: