Private Sub object_LostFocus()
Object The name of a Form or a control on a Form.
Remarks
To run a macro or event procedure when these events occur, set the OnLostFocus property to the name of the macro or to [Event Procedure].
This event occurs when the focus moves in response to a user action, such as pressing the TAB key or clicking the object, or when you use the SetFocus method in Visual Basic or the SelectObject, GoToRecord, GoToControl, or GoToPage action in a macro.
A control can receive the focus only if its Visible and Enabled properties are set to Yes. A form can receive the focus only if it has no controls or if all visible controls are disabled. If a form contains any visible, enabled controls, the GotFocus event for the form doesn't occur.
Note To customize the order in which the focus moves from control to control on a form when you press the TAB key, set the tab order or specify access keys for the controls.
The LostFocus event differs from the Exit event in that the LostFocus event occurs every time a control loses the focus. The Exit event occurs only before a control loses the focus to another control on the same form. The LostFocus event occurs after the Exit event.
If you move the focus to a control on a form, and that control doesn't have the focus on that form, the Exit and LostFocus events for the control that does have the focus on the form occur before the Enter and GotFocus events for the control you moved to.
If you use the mouse to move the focus from a control on a main form to a control on a subform of that form, the following events occur:
Exit (for the control on the main form)
ß
LostFocus (for the control on the main form)
ß
Enter (for the subform control)
ß
Exit (for the control on the subform that had the focus)
ß
LostFocus (for the control on the subform that had the focus)
ß
Enter (for the control on the subform that the focus moved to)
ß
GotFocus (for the control on the subform that the focus moved to)
If the control you move to on the subform previously had the focus, neither its Enter event nor its GotFocus event occurs, but the Enter event for the subform control does occur. If you move the focus from a control on a subform to a control on the main form, the Exit and LostFocus events for the control on the subform don't occur, just the Exit event for the subform control and the Enter and GotFocus events for the control on the main form.
Note You often use the mouse or a key such as TAB to move the focus to another control. This causes mouse or keyboard events to occur in addition to the events discussed in this topic.
When you switch between two open forms, the Deactivate event occurs for the first form, and the Activate event occurs for the second form. If the forms contain no visible, enabled controls, the LostFocus event occurs for the first form before the Deactivate event, and the GotFocus event occurs for the second form after the Activate event.
Macro
You can use a LostFocus macro to validate entered data as the user moves the focus from a control. You can also reverse or change conditions that you set up in the object's GotFocus macro.
Other uses for LostFocus and GotFocus macros are enabling, disabling, displaying, and hiding other objects.
You can't use the CancelEvent action in a GotFocus or LostFocus macro.
Example
The following example displays a message in a label when the focus moves to an option button.
To try the example, add the following event procedures to a form named Contacts that contains an option button named OptionYes and a label named LabelYes.
Private Sub OptionYes_GotFocus()
Me!LabelYes.Caption = "Option button 'Yes' has the focus."
End Sub
Private Sub OptionYes_LostFocus()
Me!LabelYes.Caption = "" ' Clear caption.
End Sub