第12章+响应鼠标和键盘事件

第12章+响应鼠标和键盘事件

ID:46293964

大小:486.00 KB

页数:19页

时间:2019-11-22

第12章+响应鼠标和键盘事件_第1页
第12章+响应鼠标和键盘事件_第2页
第12章+响应鼠标和键盘事件_第3页
第12章+响应鼠标和键盘事件_第4页
第12章+响应鼠标和键盘事件_第5页
资源描述:

《第12章+响应鼠标和键盘事件》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库

1、1.理解鼠标、键盘事件的触发机制。2.掌握鼠标的MouseDown,MouseMove,MouseUp事件中各参数的含义及编程控制。3.掌握键盘的KeyDown,KeyPress,KeyUp事件中各参数的含义及编程控制4.了解事件驱动的拖放和OLE的拖放。本章要求:第十二章响应鼠标和键盘事件本章重点:本章难点:理解鼠标、键盘事件的触发机制运用事件驱动的拖放和OLE的拖放12.1鼠标事件大多数控件能够识别鼠标的MouseMove、MouseDown和MouseUp事件,通过响应这些鼠标事件,能在应用程序对鼠标位置及状态的变化作出响应操作。M

2、ouseMove每当鼠标指针移动到屏幕新位置时发生MouseDown按下任意鼠标键按钮时发生MouseUp释放任意鼠标键按钮时发生12.1.1鼠标事件过程MouseMove、MouseDown、MouseUp三个事件的过程的语法格式如下:SubObject_MouseMove(ButtonAsInteger,ShiftAsInteger,_XAsSingle,YAsSingle)SubObject_MouseDown(ButtonAsInteger,ShiftAsInteger,_XAsSingle,YAsSingle)SubObject

3、_MouseUp(ButtonAsInteger,ShiftAsInteger,_XAsSingle,YAsSingle)其中:1.Object是可选的一个对象表达式,可以是窗体对象和大多数可视控件。2.Button参数是表示按下或松开鼠标哪个按钮,12.1鼠标事件参数Button值参数(Button)值说明vbLeftButton1左按钮被按下vbRightButton2右按钮被按下vbMiddleButton4中间按钮被按下12.1鼠标事件参数Shift值参数(Shift)值描述vbShiftMask1SHIFT键被按下vbCtrlM

4、ask2CTRL键被按下vbAltMask4ALT键被按下3.通过Shift参数表示在Button参数指定的按钮被按下或者被松开的情况下键盘的Shift、Ctrl和Alt键的状态,12.1鼠标事件Ctrl、Shift、Alt三键组合使用情况如表12.112.1鼠标事件4.参数X、YX,Y鼠标指针的位置,通过X和Y参数返回一个指定鼠标指针当前位置的数,X和Y的值是使用该对象的坐标系统表示鼠标指针当前位置。注意:鼠标事件被用来识别和响应各种鼠标状态,并把这些状态看作独立的事件,在按下鼠标按钮并释放时,Click事件只能把此过程识别为一个单一的

5、单击操作。鼠标事件能够区分各鼠标按钮及键盘的SHIFT、CTRL、ALT键的状态。例12.1使用MouseUp与MouseDown和MouseMove事件,编写一个在窗体上用鼠标绘图的简单程序。12.1鼠标事件12.1.2拖放(简略介绍,一般不作要求)在运行时拖动控件,通常情况下并不能自动改变控件位置,这就必须使用VisualBasic的拖放功能,通过编程,才能实现在运行时拖动控件并改变其位置。把按下鼠标按钮并移动控件的操作称为拖动,把释放按钮的操作称为放下。12.1鼠标事件例12.2在窗体上放置1个Image控件,1个Picture控件

6、,1个Label控件,设计一个如图12-4所示的应用程序,实现对象的拖放功能。12.1鼠标事件12.1.3OLE拖放VisualBasic支持OLE拖放,使用这种强大且实用的工具,可以在其他支持OLE拖放的应用程序(如Windows资源管理器、Word和Excel等等)之间、控件之间拖放数据。(简略介绍,一般不作要求)12.1鼠标事件12.2键盘事件在VisualBasic中,提供KeyPress、KeyDown、KeyUp三种键盘事件,窗体和接受键盘输入的控件都识别这三种事件。KeyPress按下对应某ASCII字符的键。KeyDown

7、按下键盘的任意键。KeyUp释放键盘的任意键只有获得焦点的对象才能够接受键盘事件。12.2.1KeyPress事件在按下与ASCII字符对应的键时将触发KeyPress事件。KeyPress事件过程的语法格式是:SubObject_KeyPress(KeyAsciiAsInteger)其中:例如,如果希望将文本框中的所有字符都强制转换为大写字符,则可在输入时使用此事件转换大小写:PrivateSubText1_KeyPress(KeyAsciiAsInteger)KeyAscii=Asc(Ucase(Chr(KeyAscii)))EndS

8、ubObject是指窗体或控件对象名,KeyAscii参数返回对应于ASCII字符代码的整型数值。12.2键盘事件例12.4通过编程序,在一个文本框(Text1)中限定只能输入数字、小数点,只

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

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

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