In this example, the AfterClose event closes a lookup window after the Customer Maintenance window closes:
Private Sub CustomerMaintenance_AfterClose() If CustomersAndProspects.IsLoaded = True Then CustomersAndProspects.Close End If End Sub