在子窗体中，选中多条记录，一点删除按钮，就可以实现删除选中所选的记录

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 于 2008-3-4 13:09 编辑 ]

fannky

问题1：
在按钮属性——其他——默认 选择是既可

liwen

用标签替代按钮，使用标签的单击事件运行上述代码。