《VB事件和事件处理》PPT课件

《《VB事件和事件处理》PPT课件》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、事件和事件处理第二章回顾可视化程序设计字符界面的缺点和图形用户界面的需求可视化程序设计的基本思想使用VB开发Windows应用程序的优点介绍VisualBasic集成开发环境使用VisualBasic提供的各种编程控件在VisualBasic中编译和执行程序2目标理解Windows应用程序的事件驱动设计使用常用的控件，如标签、文本框和命令按钮编写事件驱动程序的代码在运行时更改控件的属性使用MSGBOX系统对话框进行用户交互3事件驱动编程VisualBasic程序是事件驱动的每个对象都有它自己的事件集在事件驱动应用程序中，代码不会遵循固定的执行路径，而是由操作来决定响应事件时执行的代码称为

2、事件处理程序4事件驱动编程的优点可以为用户提供即时反馈使程序设计更贴近用户的操作需要使程序设计的目的性更强减少程序的复杂性5VisualBasic的应用程序事件可分为用户事件和系统事件PrivateSubCommand1_Click()...‘要执行的语句...EndSubPrivateSubCommand1_DragDrop(SourceAsControl,XAsSingle,YAsSingle)...‘要执行的语句...EndSub不带参数的事件带参数的事件6用户事件由用户执行的某些操作所触发的事件称为用户事件。例如，简单的用户操作：单击窗体上的命令按钮在文本框中输入数据在窗体上任

3、意位置单击鼠标在窗体上拖动鼠标（在VB环境中进行演示）7系统事件由其他事件或Windows操作系统触发的事件称为系统事件，例如：Timer事件就是一个系统事件的例子。系统事件无需任何用户干预8VisualBasic事件的封装VisualBasic事件是针对操作和与之相关联的每个控件而单独进行编码的仅当用户触发特定操作时事件才会发生必须存在当事件发生时可以执行的代码直到事件发生并引起响应时，用户才意识到存在与该事件的发生相关联的代码9窗体事件事件说明Initialize用于初始化应用程序Load执行显示窗体前所需的操作（示例）Unload卸载窗体时，将发生此事件Click除标题栏之外，在窗

4、体上的空白区或窗体上的无效控件上单击鼠标时，将触发此事件DblClick除标标题栏之外，在窗体上的空白区或窗体上的无效控件上双击鼠标时，将触发此事件Resize窗体的窗口尺寸改变后，第一次显示该窗体时将发生此事件10窗体事件–Load示例PrivateSubForm_Load()Text1.text=”大家好”EndSub返回在加载窗体时，名称为“Text1”的文本框会显示“大家好”。11控件事件事件说明Click每次单击控件时发生KeyPress按下并释放任何键盘键时发生MouseDown按下鼠标按钮不松开时，将发生此事件MouseMove在控件上移动鼠标时，将发生此事件12Visua

5、lBasic中的应用程序编码VisualBasic中的应用程序编码时，需要使用以下三个主要特征：属性：控件的特性方法：控件所提供的某种能执行的操作事件：发生在用户和界面控件之间的交互。13在运行时设置属性通过编写应用程序代码来设置控件的属性。例如，当用户在名称为“Text1”的文本框中输入“Q”时，禁用命令按钮。PrivateSubText1_LostFocus()Iftext1.text="Q"Thencommand1.enabled=falseEndIfEndSub（在VB环境中进行演示）14在运行时调用方法通过在事件过程中编写应用程序代码，还可以调用各种控件的方法，以执行某种操作。

6、（示例）15在运行时调用方法–示例例如，要在按钮Command1点击时，将Form1窗体隐藏并加载Form2。PrivateSubCommand1_Click()‘加载Form2LoadForm2‘隐藏Form1Form1.Hide‘显示Form2Form2.ShowEndSub（在VB环境中进行演示）16VisualBasic及窗体的常用方法VB提供的一些方法Load：加载某个组件UnLoad：卸载某个组件窗体的常用方法Hide：隐藏窗体自身，但不被卸载Show：使窗体在屏幕上显示17MsgBox函数MsgBox函数用于在用户与应用程序之间进行交互。MsgBox函数显示一个带有消息的对

7、话框并等待用户单击某个按钮来关闭它。用户点击按钮后，会返回一个值指示用户单击的按钮。18MsgBox函数语法5-1MsgBox([提示信息],[标志和按钮],[对话框的标题信息])标题信息提示信息标志和按钮19MsgBox函数语法5-2消息框中“标志和按钮”参数中关于按钮类型和数目的值：按钮值常数值说明vbOKOnly0只显示“确定”按钮vbOKCancel1显示“确定”和“取消”按钮vbAbortRetryIgnore2显示“放弃