在子窗體中，選中多條記錄，一點(diǎn)刪除按鈕，就可以實(shí)現(xiàn)刪除選中所選的記錄

dreamice01

有兩個問題求教：

如何在子窗體中，如果選中多條記錄，一點(diǎn)刪除按鈕，就可以實(shí)現(xiàn)刪除選中所選的全部記錄的功能

Private Sub cmd_delete_modify_current_Click()
On Error GoTo Err_cmd_delete_modify_current_Click
If MsgBox("所選數(shù)據(jù)將被刪除，是否確定刪除該數(shù)據(jù)？", vbYesNo + vbExclamation, "系統(tǒng)提示") = vbYes Then
    Me.待匹配數(shù)據(jù)用于修改頁面子窗體.SetFocus
    DoCmd.RunCommand acCmdDeleteRecord
Else
    Exit Sub
End If
Me.待匹配數(shù)據(jù)用于修改頁面子窗體.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
我現(xiàn)在的刪除按鈕代碼只能實(shí)現(xiàn)刪除一條記錄的功能，無法刪除全部所選記錄的功能。

[ 本帖最后由 dreamice01 于 2008-3-4 13:09 編輯 ]

fannky

問題1：
在按鈕屬性——其他——默認(rèn) 選擇是既可

liwen

用標(biāo)簽替代按鈕，使用標(biāo)簽的單擊事件運(yùn)行上述代碼。