8.1 KeyPress事件
考點1 KeyPress事件
在窗體上畫一個控件(指可以發(fā)生KeyPress事件的控件),并雙擊該控件,進入程序代碼窗口后,從“過程”框中選取KeyPress,即可定義KeyPress事件過程。一般格式為:
Private Sub Textl KeyPress(KeyAscii As Integer)
End Sub
KeyPress事件帶有一個參數(shù),這個參數(shù)有兩種形式,第1種形式是Index As Integer,只用于控件數(shù)組;第2種形式是KeyAscii As Integer,用于單個控件。
8.2 KeyDown和KeyUp事件
考點2 KeyDown和KeyUp事件
KeyDown和KeyUp事件的參數(shù)也有兩種形式,其中
Index As Integer
只用于控件數(shù)組,而
KeyCode As Integer,Shift As Integer
用于單個控件。
KeyDown和KeyUp事件都有兩個參數(shù),即KeyCode和Shift。
(1)KeyCode是按鍵的實際ASCII碼。該碼以“鍵”為準,而不是以“字符”為準
(2)Shift轉(zhuǎn)換鍵。它指的是3個轉(zhuǎn)換鍵的狀態(tài),包括Shift,Ctrl和Alt鍵,這3個鍵分別以二進制形式表示,每個鍵有3位,即Shift鍵為001,Ctrl鍵為010,Alt鍵為100。
10.3 鼠標事件
考點3 鼠標事件
為了實現(xiàn)鼠標操作,Visual Basic提供了3個過程模板:
1按下鼠標鍵事件過程
Private Sub Form MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)
End Sub
2松開跳標鍵事件過程
Private Sub Form MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Single)
End Sub
3移動鼠標光標事件過程
Private Sub Form MouseMove(Button As Integer,Shift As Integer,X As Single,Y As Single)
End Sub
上述事件過程使用于窗體和大多數(shù)控件,包括復選框、命令按鈕、單選按鈕、框架、文本框、目錄框、文件框、圖像框、圖片框、標簽、列表框等。
3個鼠標事件過程具有相同的參數(shù),含義如下:
(1)Button:被按下的鼠標鍵,可以取3個值。
(2)Shift:表示Shift, Ctrl和Alt鍵的狀態(tài)。
(3)X,Y:鼠標光標的當前位置。
8.4 鼠標光標的形狀
考點4 MousePointer屬性
鼠標光標的形狀通過MousePointer屬性來設置,該屬性可以在屬性窗口中設置,也可以在程序代碼中設置。
MousePointer的屬性是一個整數(shù),可以取0~15之間的數(shù)值。當某個對象的MousePointer屬性被設置為某個值時,鼠標光標在該對象內(nèi)就以相應的形狀顯示。
考點5 設置鼠標光標形狀
MousePointer屬性可以通過代碼設置,也可以通過屬性窗口沒置
1代碼中設置MousePointer屬性
在程序代碼中設置MousePointer屬性的一般格式為:
對象.MousePointer=設置值
2在屬性窗口中設置MousePointer屬性
單擊屬性窗口的MousePointer屬性條,然后單擊設置框右端向下的箭頭,將下拉顯示MousePointer的16個屬性值。如果把MousePointer屬性設置為99,則可以通過Mouselcon屬性定義自己的鼠標光標。有以下兩種方法:
(1)在屬性窗口中定義,可首先選擇所需要的對象,再把MousePointer屬性設置為“99 – Custom”,然后設置MouseIcon屬性,把一個圖標文件賦給該屬性(與設置Picture屬性的方法相同)。
(2)如果用程序代碼設置,則可先把MousePointer屬性值設置為99,然后再用LoadPicture函數(shù)把一個圖標文件賦給Mouselcon屬性。
3鼠標光標形狀的使用
在Windows中,鼠標光標的應用有一些約定俗成的規(guī)則。為了與Windows環(huán)境相適應,在應用程序中應遵守這些規(guī)則,主要有:
(1)表示用戶當前可用的功能,如“I”,形鼠標光標(屬性值3)表示插入文本;十字形狀(屬性2)表示畫線或圓,或者表示選擇可視對象以進行復制或存取。
(2)表示程序狀態(tài)的用戶可視線索,如沙漏鼠標(屬性值11)表示程序忙,一段時間后將權(quán)力交給用戶。
(3)當坐標(X,Y)值為0時,改變鼠標光標形狀。
8.5 拖放
考點6 與拖放有關(guān)的屬性、事件和方法
1屬性
有兩個屬性與拖放有關(guān),即DragMode和Drag1con。
2事件
與拖放有關(guān)的事件是DragDrop和DragOver
3方法
與拖放有關(guān)的方法有Move和Drag其中Move方法已比較熟悉,下面介紹Drag方法。Drag方法的格式為:
控件.Drag整數(shù)
不管控件的DragMode屬性如何設置,都可以用Drag方法來人工地啟動或停止一個拖放過程?!罢麛?shù)”的取值為0,1或2,其含義分別為:
0——取消指定控件拖放:
1——當Drag方法出現(xiàn)在控件的事件過程中時,允許拖放指定的控件。
2——結(jié)束控件的拖動,并發(fā)出一個DragDrop事件。
考點1 KeyPress事件
在窗體上畫一個控件(指可以發(fā)生KeyPress事件的控件),并雙擊該控件,進入程序代碼窗口后,從“過程”框中選取KeyPress,即可定義KeyPress事件過程。一般格式為:
Private Sub Textl KeyPress(KeyAscii As Integer)
End Sub
KeyPress事件帶有一個參數(shù),這個參數(shù)有兩種形式,第1種形式是Index As Integer,只用于控件數(shù)組;第2種形式是KeyAscii As Integer,用于單個控件。
8.2 KeyDown和KeyUp事件
考點2 KeyDown和KeyUp事件
KeyDown和KeyUp事件的參數(shù)也有兩種形式,其中
Index As Integer
只用于控件數(shù)組,而
KeyCode As Integer,Shift As Integer
用于單個控件。
KeyDown和KeyUp事件都有兩個參數(shù),即KeyCode和Shift。
(1)KeyCode是按鍵的實際ASCII碼。該碼以“鍵”為準,而不是以“字符”為準
(2)Shift轉(zhuǎn)換鍵。它指的是3個轉(zhuǎn)換鍵的狀態(tài),包括Shift,Ctrl和Alt鍵,這3個鍵分別以二進制形式表示,每個鍵有3位,即Shift鍵為001,Ctrl鍵為010,Alt鍵為100。
10.3 鼠標事件
考點3 鼠標事件
為了實現(xiàn)鼠標操作,Visual Basic提供了3個過程模板:
1按下鼠標鍵事件過程
Private Sub Form MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)
End Sub
2松開跳標鍵事件過程
Private Sub Form MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Single)
End Sub
3移動鼠標光標事件過程
Private Sub Form MouseMove(Button As Integer,Shift As Integer,X As Single,Y As Single)
End Sub
上述事件過程使用于窗體和大多數(shù)控件,包括復選框、命令按鈕、單選按鈕、框架、文本框、目錄框、文件框、圖像框、圖片框、標簽、列表框等。
3個鼠標事件過程具有相同的參數(shù),含義如下:
(1)Button:被按下的鼠標鍵,可以取3個值。
(2)Shift:表示Shift, Ctrl和Alt鍵的狀態(tài)。
(3)X,Y:鼠標光標的當前位置。
8.4 鼠標光標的形狀
考點4 MousePointer屬性
鼠標光標的形狀通過MousePointer屬性來設置,該屬性可以在屬性窗口中設置,也可以在程序代碼中設置。
MousePointer的屬性是一個整數(shù),可以取0~15之間的數(shù)值。當某個對象的MousePointer屬性被設置為某個值時,鼠標光標在該對象內(nèi)就以相應的形狀顯示。
考點5 設置鼠標光標形狀
MousePointer屬性可以通過代碼設置,也可以通過屬性窗口沒置
1代碼中設置MousePointer屬性
在程序代碼中設置MousePointer屬性的一般格式為:
對象.MousePointer=設置值
2在屬性窗口中設置MousePointer屬性
單擊屬性窗口的MousePointer屬性條,然后單擊設置框右端向下的箭頭,將下拉顯示MousePointer的16個屬性值。如果把MousePointer屬性設置為99,則可以通過Mouselcon屬性定義自己的鼠標光標。有以下兩種方法:
(1)在屬性窗口中定義,可首先選擇所需要的對象,再把MousePointer屬性設置為“99 – Custom”,然后設置MouseIcon屬性,把一個圖標文件賦給該屬性(與設置Picture屬性的方法相同)。
(2)如果用程序代碼設置,則可先把MousePointer屬性值設置為99,然后再用LoadPicture函數(shù)把一個圖標文件賦給Mouselcon屬性。
3鼠標光標形狀的使用
在Windows中,鼠標光標的應用有一些約定俗成的規(guī)則。為了與Windows環(huán)境相適應,在應用程序中應遵守這些規(guī)則,主要有:
(1)表示用戶當前可用的功能,如“I”,形鼠標光標(屬性值3)表示插入文本;十字形狀(屬性2)表示畫線或圓,或者表示選擇可視對象以進行復制或存取。
(2)表示程序狀態(tài)的用戶可視線索,如沙漏鼠標(屬性值11)表示程序忙,一段時間后將權(quán)力交給用戶。
(3)當坐標(X,Y)值為0時,改變鼠標光標形狀。
8.5 拖放
考點6 與拖放有關(guān)的屬性、事件和方法
1屬性
有兩個屬性與拖放有關(guān),即DragMode和Drag1con。
2事件
與拖放有關(guān)的事件是DragDrop和DragOver
3方法
與拖放有關(guān)的方法有Move和Drag其中Move方法已比較熟悉,下面介紹Drag方法。Drag方法的格式為:
控件.Drag整數(shù)
不管控件的DragMode屬性如何設置,都可以用Drag方法來人工地啟動或停止一個拖放過程?!罢麛?shù)”的取值為0,1或2,其含義分別為:
0——取消指定控件拖放:
1——當Drag方法出現(xiàn)在控件的事件過程中時,允許拖放指定的控件。
2——結(jié)束控件的拖動,并發(fā)出一個DragDrop事件。

