Private Sub Form_Load()
'*********************************************************
'Open the Order List form
'*********************************************************
DoCmd.OpenForm "frmOrderList", acNormal, , , acFormEdit, acWindowNormal
'*********************************************************
'Hide this startup form
'*********************************************************
Me.Form.Visible = False
End Sub
|