鼠标键盘和OLE控.ppt
《鼠标键盘和OLE控.ppt》由会员分享,可在线阅读,更多相关《鼠标键盘和OLE控.ppt(19页珍藏版)》请在三一办公上搜索。
1、1,第9章 鼠标、键盘和OLE控件,9.1 鼠标9.2 键盘事件9.3 拖放,2,9.1 鼠标,9.1.1 鼠标事件9.1.2 改变鼠标指针,3,9.1.1 鼠标事件,1.鼠标事件的格式 鼠标事件包括MouseUp、MouseDown和MouseMove,分别是释放鼠标、按下鼠标和移动鼠标时触发的。语法:Private Sub 对象名_鼠标事件(Button As Integer,Shift As Integer,x As Single,y As Single)(1)Button表示是哪个鼠标键被按下或释放。,Button常数值,4,9.1.1 鼠标事件,(2)Shift表示当鼠标键被按下或被
2、释放时,Shift、Ctrl、Alt键的按下或释放状态。,(3)X、Y表示鼠标指针的坐标位置。如果鼠标指针在窗体或图片框中,用该对象内部的坐标系,其他控件则用控件对象所在容器的坐标系。,Shift的常数值,5,9.1.1 鼠标事件,2.MouseDown和MouseUp事件,【例9-1】界面设计:放置一个图片框Picture1用来绘图,三个按钮Command1Command3,其中Command1和Command2分别为“直线”和“方块”。,功能要求:单击Command1或Command2按钮后,在图片框中单击鼠标当鼠标按下时确定一个端点,当鼠标释放时确定另一个端点来画直线或画方块。Comma
3、nd3在图片框中清除图形。,运行界面,6,9.1.1 鼠标事件,3MouseMove事件,MouseMove事件是鼠标在屏幕上移动时触发的,窗体和控件都能识别MouseMove事件,当鼠标指针在对象的边界范围内时该对象就能接收MouseMove事件。,【例9-2】使用MouseMove事件可以连续地画线和方块,当鼠标移动时在不断触发的MouseMove事件中画线和方块。,运 行 界 面,7,9.1.2 改变鼠标指针,1MousePointer属性 对象的MousePointer属性用于设置鼠标指针的形状。在运行时对于控件,当鼠标经过时就会显示MousePointer属性设置的形状;对于窗体,当
4、鼠标经过空白区域或窗体中的MousePointer属性为0(默认值)的控件时,就会显示窗体的MousePointer属性设置的形状。,(快讲),8,9.1.2 改变鼠标指针,2MouseIcon属性 当MousePointer属性设置为99(自定义图标)时,可以使用MouseIcon属性来确定鼠标指针的形状。有两种方法设置MouseIcon属性:(1)在属性窗口中选择MouseIcon属性,单击按钮,出现“加载图标”对话框,选择一个图形文件为鼠标指针形状,可以是.ico或.cur文件。(2)在程序中使用LoadPicture函数来加载图形文件。例如,将经过窗体时鼠标指针设置为用户定义的图标:F
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 鼠标 键盘 OLE
链接地址:https://www.31ppt.com/p-6380094.html