Private Sub Form_Open(Cancel As Integer)
' Minimize the database window, initialize and maximise the form.
DoCmd.Maximize
' Move to the switchboard page that is marked as the default.
Me.Filter = "[ItemNumber] = 0 AND [Argument] = 'Default' "
Me.FilterOn = True
End Sub