Private Sub cmdSingleForm_Click()
DoCmd.OpenForm "Form2", acDesign, , , , acHidden
Forms!Form2.DefaultView = 0
DoCmd.Close acForm, "Form2", acSaveYes
DoCmd.OpenForm "Form2"
End Sub
Private Sub cmdContinuousForm_Click()
DoCmd.OpenForm "Form2", acDesign, , , , acHidden
Forms!Form2.DefaultView = 1...