在子窗体中，选中多条记录，如何实现批量删除功能

dreamice01

在子窗体中，选中多条记录，一点删除按钮，就可以实现删除选中所选的记录有两个问题求教：

如何在子窗体中，如果选中多条记录，一点删除按钮，就可以实现删除选中所选的全部记录的功能

Private Sub cmd_delete_modify_current_Click()
On Error GoTo Err_cmd_delete_modify_current_Click
If MsgBox("所选数据将被删除，是否确定删除该数据？", vbYesNo + vbExclamation, "系统提示") = vbYes Then
    Me.待匹配数据用于修改页面子窗体.SetFocus
    DoCmd.RunCommand acCmdDeleteRecord
Else
    Exit Sub
End If
Me.待匹配数据用于修改页面子窗体.Requery
Exit_cmd_delete_modify_current_Click:
    Exit Sub
Err_cmd_delete_modify_current_Click:
    MsgBox Err.Description
    Resume Exit_cmd_delete_modify_current_Click
   
End Sub
我现在的删除按钮代码只能实现删除一条记录的功能，无法删除全部所选记录的功能。

dreamice01

有人能帮忙解答一下吗？

liangzhenye

子窗体中选择记录,应该只可以选择连续的记录,  最简单就是选中记录,按删除键,   或者换个方式, 先保存所选记录的KEY,然后按删除键,删除相关KEY的记录,    方法应该有好多,达到效果就OK了

t小宝

用标签来做主窗体上的删除按钮就可以了，这样焦点还在子窗体