资源描述：
《Excel全部窗体事件详解_值得收藏》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。
1、一个控件从同一窗体的另一个控件实际接收到焦点之前，Enter事件发生。同一窗体中的一个控件即将把焦点转移到另一个控件之前，Exit事件发生。语法PrivateSubobject_Enter()PrivateSubobject_Exit(ByValCancelAsMSForms.ReturnBoolean)Enter和Exit事件的语法包含以下成分：成分说明object必需。一个有效的对象名。Cancel必需。事件状态。False表示由该控件处理这个事件（这是默认方式）。True表示由应用程序处理这个事件，并且焦点应当留在当前控件上。 说明
2、Enter事件和Exit事件与VisualBasic中的GotFocus和LostFocus事件类似。与GotFocus和LostFocus事件不同的是，当窗体接收或失去焦点时Enter事件和Exit事件不发生。例如，假如选中了可初始化Enter事件的复选框，而后如又选中同一窗体中的另一个控件，那么对于该复选框来说，Exit事件被初始化（因为焦点正在移到同一窗体中的不同对象上），而对于该窗体中的第二个控件来说，Enter事件发生。因为Enter事件发生在焦点移到一特定控件上之前，所以可用Enter事件过程来显示指令。例如，可用一个宏或者事
3、件过程来显示一个小窗体或消息框，标识控件一般所包含的数据类型。注意 将控件Exit事件的Cancel参数赋值为True，可防止控件失去焦点。当将控件插入到窗体、框架或多页控件中的一个页面中时，此事件发生。语法对于框架PrivateSubobject_AddControl()对于多页PrivateSubobject_AddControl(indexAsLong,ctrlAsControl)AddControl事件的语法包含以下成分：成分说明object必需。一个有效的对象。index必需。包含新控件的页面的索引。ctrl必需。要添加的控件。
4、 说明在运行时间添加控件时，将发生AddControl事件。在设计时间添加控件，或在运行时间初次加载并显示一个窗体时，此事件不会发生。本事件的默认操作是将控件添加到指定的窗体、框架或者多页中。Add方法将初始化AddControl事件。在通过用户界面更改了控件中的数据后，此事件发生。语法PrivateSubobject_AfterUpdate()AfterUpdate事件的语法包含以下成分：成分说明object必需。一个有效的对象。 说明AfterUpdate事件的发生与该控件是否被绑定（即通过RowSource属性为该控件指定一个数据源
5、）无关。这个事件不能被取消。若要取消这次更改（恢复控件原来的值），请使用BeforeUpdate事件，并将参数Cancel设置为True。对于当前控件来说，AfterUpdate事件发生在BeforeUpdate事件之后，Exit事件之前。对于Tab键顺序中的下一个控件来说，AfterUpdate事件发生在Enter事件之前。当拖放操作正在进行时该事件发生。语法对于框架PrivateSubobject_BeforeDragOver(ByValCancelAsMSForms.ReturnBoolean,ctrlAsControl,ByVal
6、DataAsDataObject,ByValXAsSingle,ByValYAsSingle,ByValDragStateAsfmDragState,ByValEffectAsMSForms.ReturnEffect,ByValShiftAsfmShiftState)对于多页PrivateSubobject_BeforeDragOver(indexAsLong,ByValCancelAsMSForms.ReturnBoolean,ctrlAsControl,ByValDataAsDataObject,ByValXAsSingle,ByVa
7、lYAsSingle,ByValDragStateAsfmDragState,ByValEffectAsMSForms.ReturnEffect,ByValShiftAsfmShiftState)对于TabStripPrivateSubobject_BeforeDragOver(indexAsLong,ByValCancelAsMSForms.ReturnBoolean,ByValDataAsDataObject,ByValXAsSingle,ByValYAsSingle,ByValDragStateAsfmDragState,ByVal
8、EffectAsMSForms.ReturnEffect,ByValShiftAsfmShiftState)对于其他控件PrivateSubobject_BeforeDragOver(ByVa
