Dim fat As Control

    For Each fat In Me.Form.Controls

    Select Case fat.ControlType

        Case acTextBox 'B?t?n metin kutularini bosalt

            fat.Value = ""

          Case acComboBox 'b?t?n a?ilan kutulari bosalt

              fat.Value = ""

            Case acCheckBox

                fat.Value = "0"

    End Select

Next

bu kodlar kayıt silinince mi çalışacak