alt for ile nasıl kullanılacak derseniz

Private Sub btnBeginEdit_Click()

    DBEngine.BeginTrans

End Sub



Private Sub btnSaveChanges_Click()

    DBEngine.CommitTrans

End Sub



Private Sub btnUndoChanges_Click()

    DBEngine.Rollback

End Sub



Private Sub Form_Current()

    ' loading the child records for the current master record

    Set Me.subActorRatings.Form.Recordset = _

        CurrentDb.OpenRecordset("SELECT * FROM tblActorRatings WHERE ActorId=" & Me!ActorId)



    ' Setting the correct default value for new records

    Me.subActorRatings.Form.Controls("txtActorIdHidden").DefaultValue = Me!ActorId

End Sub



Private Sub Form_Load()

    Set Me.Recordset = CurrentDb.OpenRecordset("SELECT * FROM tblActors")

End Sub