第十章
一、KeyPress事件
在窗體上畫一個(gè)控件(指前面所講的可以發(fā)生KeyPress事件的控件),并雙擊該控件,進(jìn)入程序代碼窗口后,從"過程"框中選取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
用于單個(gè)控件。
三、鼠標(biāo)事件
為了實(shí)現(xiàn)鼠標(biāo)操作,Visual Basic提供了3個(gè)過程模板:
(一)壓下鼠標(biāo)鍵事件過程
Sub Form_MouseDown(Button As Integer,Shift As Integer,x As Single,y As Single)End Sub
(二)松開鼠標(biāo)鍵事件過程
Sub Form_MouseUp(Button As Integer,Shift As Integer,x As Single,y As Single)End Sub
(三)移動(dòng)鼠標(biāo)光標(biāo)事件過程
Sub Form_MouseMove(Button As Integer,Shift As Integer,x As Single,y As Single)End Sub
四、鼠標(biāo)光標(biāo)的形狀
(一)MousePointer屬性
鼠標(biāo)光標(biāo)的形狀通過MousePointer屬性來設(shè)置。該屬性可以在屬性窗口中設(shè)置,也可以在程序代碼中設(shè)置。
MousePointer的屬性是一個(gè)整數(shù),可以取0~15.
(二)設(shè)置鼠標(biāo)光標(biāo)形狀
MousePointer屬性可以通過代碼設(shè)置,也可以通過屬性窗口設(shè)置。
1.在程序代碼中設(shè)置MousePointer屬性
在程序代碼中設(shè)置MousePointer屬性的一般格式為:對(duì)象。MousePointer=設(shè)置值。
2.在屬性窗口中設(shè)置MousePointer屬性
單擊屬性窗口中的MousePointer屬性條,然后單擊設(shè)置框右端向下的箭頭,將下拉顯示MousePointer的15個(gè)屬性值。
3.自定義鼠標(biāo)光標(biāo)
如果把MousePointer屬性設(shè)置為99,則可通過MouseIcon屬性定義自己的鼠標(biāo)光標(biāo)。有以下兩種方法:
(1)如果在屬性窗口中定義,可首先選擇所需要的對(duì)象,再把MousePointer屬性設(shè)置為"99-Custom",然后設(shè)置MouseIcon屬性,把一個(gè)圖標(biāo)文件賦給該屬性(與設(shè)置Picture屬性的方法相同)。
(2)如果用程序代碼設(shè)置,則可先把MousePointer屬性設(shè)置為99,然后再用LoadPicture函數(shù)把一個(gè)圖標(biāo)文件賦給MouseIcon屬性。
4.鼠標(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)表示畫線或圓,或者表示選擇可視對(duì)象以進(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)形狀。
五、拖放
(一)與拖放有關(guān)的屬性、事件和方法
1.屬性
有兩個(gè)屬性與拖放有關(guān),即DragMode和DragIcon。
2.事件
與拖放有關(guān)的事件是DragDrop和DragOver。
(一)自動(dòng)拖放
(二)手動(dòng)拖放
編輯推薦:
權(quán)威預(yù)測(cè):2013年全國(guó)計(jì)算機(jī)等級(jí)考試時(shí)間
北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內(nèi)蒙古 |