The following example shows a window that’s open, but invisible. In this case, the invisible window (Customer Maintenance Options) is from the same form as the parent window (Customer Maintenance) from which this event procedure is run:
Private Sub Country_AfterUserChanged() If Country <> USA Then MsgBox "Please choose a currency ID." CustomerMaintenanceOptions.Show CustomerMaintenanceOptions.CurrencyID.Focus End If End Sub