第十章
一、KeyPress事件
在窗體上畫一個控件(指前面所講的可以發(fā)生KeyPress事件的控件),并雙擊該控件,進入程序代碼窗口后,從“過程”框中選取KeyPress,即可定義KeyPress事件過程。一般格式為:
Private Sub Text1 _ KeyPress(KeyAscii As Integer)
End Sub
二、KeyDown和KeyUp事件
KeyDown和KeyUp事件的參數(shù)也有兩種形式,其中
Index As Integer
只用于控件數(shù)組,而
KeyCode As Integer,Shift As Integer
用于單個控件。
三、鼠標事件
為了實現(xiàn)鼠標操作,Visual Basic提供了3個過程模板:
(一)壓下鼠標鍵事件過程
Sub Form_MouseDown(Button As Integer,Shift As Integer,x As Single,y As Single)End Sub
(二)松開鼠標鍵事件過程
Sub Form_MouseUp(Button As Integer,Shift As Integer,x As Single,y As Single)End Sub
(三)移動鼠標光標事件過程
Sub Form_MouseMove(Button As Integer,Shift As Integer,x As Single,y As Single)End Sub
四、鼠標光標的形狀
(一)MousePointer屬性
鼠標光標的形狀通過MousePointer屬性來設置。該屬性可以在屬性窗口中設置,也可以在程序代碼中設置。
MousePointer的屬性是一個整數(shù),可以取0~15。
(二)設置鼠標光標形狀
MousePointer屬性可以通過代碼設置,也可以通過屬性窗口設置。
1.在程序代碼中設置MousePointer屬性
在程序代碼中設置MousePointer屬性的一般格式為:對象.MousePointer=設置值
2.在屬性窗口中設置MousePointer屬性
單擊屬性窗口中的MousePointer屬性條,然后單擊設置框右端向下的箭頭,將下拉顯示MousePointer的15個屬性值。
3.自定義鼠標光標
如果把MousePointer屬性設置為99,則可通過MouseIcon屬性定義自己的鼠標光標。有以下兩種方法:
(1)如果在屬性窗口中定義,可首先選擇所需要的對象,再把MousePointer屬性設置為“99-Custom”,然后設置MouseIcon屬性,把一個圖標文件賦給該屬性(與設置Picture屬性的方法相同)。
(2)如果用程序代碼設置,則可先把MousePointer屬性設置為99,然后再用LoadPicture函數(shù)把一個圖標文件賦給MouseIcon屬性。
4.鼠標光標形狀的使用
在Windows中,鼠標光標的應用有一些約定俗成的規(guī)則。為了與Windows環(huán)境相適應,在應用程序中應遵守這些規(guī)則,主要有:
(1)表示用戶當前可用的功能,如“I”形鼠標光標(屬性值3)表示插入文本;十字形狀(屬性值2)表示畫線或圓,或者表示選擇可視對象以進行復制或存取。
(2)表示程序狀態(tài)的用戶可視線索,如沙漏鼠標(屬性值11)表示程序忙,一段時間后將控制權交給用戶。
(3)當坐標(X,Y)值為0時,改變鼠標光標形狀。
五、拖放
(一)與拖放有關的屬性、事件和方法
1.屬性
有兩個屬性與拖放有關,即DragMode和DragIcon
2.事件
與拖放有關的事件是DragDrop和DragOver。
(二)自動拖放
(三)手動拖放
相關推薦:北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內蒙古 |