Kod:
Sub deneme2()
DoCmd.OpenForm "FormAdı", acDesign
DoCmd.RunCommand acCmdSelectAll
DoCmd.RunCommand acCmdDelete
DoCmd.Close acForm, "FormAdı", acSaveYes
End Sub
Sub deneme2()
DoCmd.OpenForm "FormAdı", acDesign
DoCmd.RunCommand acCmdSelectAll
DoCmd.RunCommand acCmdDelete
DoCmd.Close acForm, "FormAdı", acSaveYes
End Sub