第十章
一、KeyPress事件
在窗体上画一个控件(指前面所讲的可以发生KeyPress事件的控件),并双击该控件,进入程序代码窗口后,从"过程"框中选取KeyPress,即可定义KeyPress事件过程。一般格式为:
Private Sub Text1 _ KeyPress(KeyAscii As Integer)
End Sub
二、KeyDown和KeyUp事件
KeyDown和KeyUp事件的参数也有两种形式,其中:
Index As Integer
只用于控件数组,而
KeyCode As Integer,Shift As Integer
用于单个控件。
三、鼠标事件
为了实现鼠标操作,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的属性是一个整数,可以取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函数把一个图标文件赋给MouseIcon属性。
4.鼠标光标形状的使用
在Windows中,鼠标光标的应用有一些约定俗成的规则。为了与Windows环境相适应,在应用程序中应遵守这些规则,主要有:
(1)表示用户当前可用的功能,如"I"形鼠标光标(属性值3)表示插入文本;十字形状(属性值2)表示画线或圆,或者表示选择可视对象以进行复制或存取。
(2)表示程序状态的用户可视线索,如沙漏鼠标(属性值11)表示程序忙,一段时间后将控制权交给用户。
(3)当坐标(X,Y)值为0时,改变鼠标光标形状。
五、拖放
(一)与拖放有关的属性、事件和方法
1.属性
有两个属性与拖放有关,即DragMode和DragIcon。
2.事件
与拖放有关的事件是DragDrop和DragOver。
(一)自动拖放
(二)手动拖放
编辑推荐:
北京 | 天津 | 上海 | 江苏 | 山东 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
广东 | 河北 | 湖南 | 广西 | 河南 |
海南 | 湖北 | 四川 | 重庆 | 云南 |
贵州 | 西藏 | 新疆 | 陕西 | 山西 |
宁夏 | 甘肃 | 青海 | 辽宁 | 吉林 |
黑龙江 | 内蒙古 |