ผมใช้ code นี้
Dim intdel As Integer, RST As DAO.Recordset, DBS As DAO.Database
Set DBS = CurrentDb
Set RST = DBS.OpenRecordset("expense_transaction")
intdel = MsgBox("Are you sure?", vbCritical + vbYesNo, "Delete Record")
If intdel = vbYes Then
RST.Delete
End If
ลบ record ครับ มันลบได้ครับแต่ว่า มันไม่ได้ลบ record ที่ show อยู่ใน form ครับ แต่ว่า มันจะไปลบ record แรก สุดของตารางนี้
เช่น ว่า recordที่ 1 , 2 และ 3 ผมจะลบ record ที่ 3 มันจะลบ record แรกสุดของตารางก่อนครับ

ไม่ทราบว่า code นี้ ขาดอะไรไปหรือเปล่าครับ