「工程1- Forml(Code □回区「工程1-rrn1Ceod) 通画用)G声明 For■ v Load 用 Option Explicit c2对象列表框 Private Sub Form_ LosMouse 〓过程列表框 Labell End sub MouseUp Text1 OLECompleteDrag OLEDragDr OLEDragOver OLEGiveFeedback OLESetData OLEStartDrag Paint 工程中的各种对象 窗体预定义的事件集 图21工程中的各种对象和窗体预定义的事件集 冈心 2021/2/22 6
2021/2/22 6 工程中的各种对象 窗体预定义的事件集 图2.1 工程中的各种对象和窗体预定义的事件集 对象列表框 过程列表框
2.1.2对象的事件 在响应事件时,需要执行相应的 Basic代码。所以对于Ⅴ isual basic的中的 每个事件,都需要编写程序代码。如果其 中一个事件发生,并且在相应的事件过程 中存在代码,则 Visual basic执行该代码 尽管Ⅴ isual basic中的对象自动识别预定义 的事件集,但是它们究竞是否响应具体事 件以及如何响应具体事件则是编写代码的 任务。 冈心 2021/2/22 7
2021/2/22 7 2.1.2 对象的事件 在响应事件时，需要执行相应的 Basic代码。所以对于Visual Basic的中的 每个事件，都需要编写程序代码。如果其 中一个事件发生，并且在相应的事件过程 中存在代码，则Visual Basic执行该代码。 尽管Visual Basic中的对象自动识别预定义 的事件集，但是它们究竟是否响应具体事 件以及如何响应具体事件则是编写代码的 任务
代码部分与每个事件对应。想通过某个事 件执行的动作就应写在该事件的事件过程代码 中。事件过程的一般格式为: Private sub对象名事件名0 此处应编写事件响应过程中应执行的代码 End sub Private sub对象名事件名0为事件过程 头, End sub为事件过程尾。当你选择好事件过 程,这些代码将自动生成。中间由用户填写事 件响应过程中应执行的代码 冈心 2021/2/22 8
2021/2/22 8 代码部分与每个事件对应。想通过某个事 件执行的动作就应写在该事件的事件过程代码 中。事件过程的一般格式为： Private Sub 对象名_事件名() … … 此处应编写事件响应过程中应执行的代码 … End Sub Private Sub 对象名_事件名()为事件过程 头,End Sub 为事件过程尾。当你选择好事件过 程，这些代码将自动生成。中间由用户填写事 件响应过程中应执行的代码
对象所识别的事件多种多样,但多 数类型为大多数控件所共有。例如大多 数对象都识别 Click事件,如单击窗体, 则执行窗体的Cick事件过程代码,单击 命令按钮,则执行命令按钮的Cick事件 过程的代码。 冈心 2021/2/22
2021/2/22 9 对象所识别的事件多种多样，但多 数类型为大多数控件所共有。例如大多 数对象都识别Click事件，如单击窗体， 则执行窗体的Click事件过程代码，单击 命令按钮，则执行命令按钮的Click事件 过程的代码
1.窗体和图片框类事件 (1) Paint事件:当某一对象在屏幕中被移 动,改变尺寸或清除后,程序会自动调用 Paint事件。注意:当对象的 AutoDraw属 性为True(-1)时,程序不会调用 Paint 事件。 (2) Resize事件:当对象的大小改变时触发 Resize事件。 (3)Load事件:仅适用于窗体对象,当窗 体被装载时运行。 (4) Unload事件:仅适用于窗体对象,当 窗体被卸载时运行。 冈心 2021/2/22 10
2021/2/22 10 1. 窗体和图片框类事件 （1）Paint事件：当某一对象在屏幕中被移 动，改变尺寸或清除后，程序会自动调用 Paint事件。注意：当对象的AutoDraw属 性为True（－1）时，程序不会调用Paint 事件。 （2）Resize事件：当对象的大小改变时触发 Resize事件。 （3）Load事件： 仅适用于窗体对象，当窗 体被装载时运行。 （4）Unload事件：仅适用于窗体对象，当 窗体被卸载时运行