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