Ms access 如何使用单击事件上的删除按钮从数据表中删除记录(由鼠标选择)?
我的表单名为[Show Shipping History],子表单名为[Shipping History subform],其中包含名为“我的装运历史”的记录源指向表。我在主窗体上有一个“Delete Rec”按钮,我想通过单击该按钮,使其从表“我的发货历史记录”中删除所选记录。Ms access 如何使用单击事件上的删除按钮从数据表中删除记录(由鼠标选择)?,ms-access,vba,ms-access-2013,Ms Access,Vba,Ms Access 2013,我的表单名为[Show Shipping History],子表单名为[Shipping History subform],其中包含名为“我的装运历史”的记录源指向表。我在主窗体上有一个“Delete Rec”按钮,我想通过单击该按钮,使其从表“我的发货历史记录”中删除所选记录。 有人能告诉我如何实现这一点吗?您可以在按钮的OnClick事件中插入以下代码: Dim fm As Form Dim rs As DAO.Recordset Set fm = Me!NameOfYourSubform
有人能告诉我如何实现这一点吗?您可以在按钮的OnClick事件中插入以下代码:
Dim fm As Form
Dim rs As DAO.Recordset
Set fm = Me!NameOfYourSubformCONTROL.Form
Set rs = fm.RecordsetClone
If rs.RecordCount > 0 Then
' Move to the current record of the subform.
rs.Bookmark = frm.Bookmark
' Delete the record.
rs.Delete
rs.Close
End If
拿着书读一读。