Load, Unload Events — Event Procedures Example
The following example displays the current date in the form's caption when the form is loaded.
To try the example, add the following event procedure to a form:
Private Sub Form_Load()
Me.Caption = Date
End Sub
The next example prompts the user to verify that the form should close.
To try the example, add the following event procedure to a form. In Form view, close the form to display the dialog box, and then click Yes or No.
Private Sub Form_Unload(Cancel As Integer)
If MsgBox("Close form?", vbYesNo) = vbYes Then
Exit Sub
Else
Cancel = True
End If
End Sub