键盘与鼠标事件过程

键盘与鼠标事件过程

ID:38324761

大小:1.17 MB

页数:32页

时间:2019-06-10

键盘与鼠标事件过程_第1页
键盘与鼠标事件过程_第2页
键盘与鼠标事件过程_第3页
键盘与鼠标事件过程_第4页
键盘与鼠标事件过程_第5页
资源描述:

《键盘与鼠标事件过程》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库

1、第8章鼠标与键盘事件过程8.1鼠标事件1.Click和DblClick事件用户在单击鼠标左键时会触发Click事件;双击鼠标左键时会触发DblClick事件。这两个事件过程的语法格式如下:PrivateSub对象名_Click()[过程体]EndSubPrivateSub对象名_DblClick()[过程体]EndSub2.MouseDown和MouseUp事件MouseDown事件语法格式如下:PrivateSub对象名_MouseDown([IndexAsInteger],_ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)

2、[过程体]EndSubMouseUp事件语法格式如下:PrivateSub对象名_MouseUp([IndexAsInteger],ButtonAsInteger,_ShiftAsInteger,XAsSingle,YAsSingle)[过程体]EndSub图8-1鼠标MouseDownMouseUp事件例8-1设计一个简单的应用程序,如图图8-1所示,在窗体上建立一个命令按钮,当运行时,在命令按钮内部按下鼠标左键,其标题会显示“按下状态”;松开鼠标左键时其会显示“松开状态”。按下鼠标左键时,会发生MouseDown事件,要使得命令按钮的显示发生变化,必须编写命令按钮的Mous

3、eDown事件,代码如下PrivateSubCommand1_MouseDown(ButtonAsInteger,_ShiftAsInteger,XAsSingle,YAsSingle)Command1.Caption="按下状态"EndSub松开鼠标左键时,会发生MouseUp事件,其代码编写如下:PrivateSubCommand1_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)Command1.Caption="松开状态"EndSubMouseMove事件语法格式如下:PrivateSub对象名_Mou

4、seMove(ButtonAsInteger,Shift_AsInteger,XAsSingle,YAsSingle)[过程体]EndSub3.MouseMove事件例8-2设计一个程序,当鼠标在窗口内移动时,其移动轨迹也随之出现(如图8-2所示)。双击时,绘制过程完毕。图8-2鼠标移动轨迹效果初始化步骤放在窗体的加载事件中完成:PrivateSubForm_Load()a=0EndSub这个题目可以使用鼠标的MouseMove和DblClick事件实现。首先,定义并初始化一个整型变量a用来辅助实现要求的功能。定义代码如下:DimaAsInteger然后,编辑窗体的DblClic

5、k事件和MouseMove事件,具体实现如下:PrivateSubForm_DblClick()a=1'双击时不再绘制移动轨迹EndSubPrivateSubForm_MouseMove(ButtonAsInteger,ShiftAsInteger,_XAsSingle,YAsSingle)Ifa=0ThenPSet(X,Y)EndIfEndSub8.2鼠标光标的形状表8-3MousePointer属性的取值及对应的鼠标光标形状1.MousePointer属性常量值形状vbDefault0(默认值)形状由对象决定vbArrow1箭头vbCrosshair2十字形(Crosshai

6、r指针)vbIbeam3I型vbIconPointer4图标(嵌套方框)vbSizePointer5尺寸线(指向下、上、左和右四个方向的箭头)vbSizeNESW6右上—左下尺寸线(指向右上和左下方向的双箭头)vbSizeNS7垂直尺寸线(指向上下两个方向的双箭头)vbSizeNWSE8左上—右下尺寸线(指向右上和左下方向的双箭头)vbSizeWE9水平尺寸线(指向左右两个方法的双箭头)vbUpArrow10向上的箭头vbHourglass11沙漏(表示等待状态)vbNoDrop12没有入口:一个圆形记号,表示控件移动受限vbArrowHourglass13箭头和沙漏vbArro

7、wQuestion14箭头和问号vbSizeAll15四向尺寸线vbCustom99通过MouseIcon属性所指定的自定义图标2.鼠标光标形状的使用虽然鼠标光标的形状可以由MousePointer属性和MouseIcon属性相互配合任意设置,但是,为了与Windows环境相适应,在开发应用程序中应遵循以下几个主要规则:(1)表示用户可用的各种功能。如用“I”形状表示插入文本;用“十”字形状表示画图状态或表示选择状态等。(2)表示程序运行状态的可视线索。如沙漏形状表示程序忙等。(

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。