office交流網--QQ交流群號

Access培訓群:792054000         Excel免費交流群群:686050929          Outlook交流群:221378704    

Word交流群:218156588             PPT交流群:324131555

Access 窗體設置是否刪除提示

2017-10-03 16:45:00
tmtony8
原創
7641

在應用程序中,爲瞭避免一些錯誤操作,往往需要在操作完成前先確認一下。

這裡以刪除數據爲説明。當刪除記録是,會提示是否確認刪除?如果是卽刪除,如果否卽不刪除操作。


詳細源碼:


Private Sub Command17_Click()
    Dim strSql As String
    strSql = "delete * from 訂單明細錶 where 訂單明細編號=" & Me.sfmsub.Form.訂單明細編號 & ""
    If MsgBox("是否要刪除記録", vbYesNo) = vbYes Then
        DoCmd.RunSQL strSql
    End If
    Me.sfmsub.Requery
End Sub
這裡我們用到msgbox函數來的vbyesno蔘數來判斷是否要刪除數據。


    分享