none
Access VBA,如何实现一个事件触发时,必须另一个事件已触发完成。 RRS feed

  • 常规讨论

  • 有两个click事件附在两个按钮上,其一语言如下:

    Private Sub PODpreview_Click()

    On Error GoTo Err_PODpreview_Click

    Dim stDocName As String

    stDocName = "POD"

    DoCmd.OpenReport stDocName, acPreview

    Exit_PODpreview_Click:

    Exit Sub

    Err_PODpreview_Click:

    MsgBox Err.Description

    Resume Exit_PODpreview_Click

    End Sub

    另一语言略 Private Sub modify_Click() 略.... 现在想实现按PODPreview按钮前必须已按过modify按钮,否则,对话框提示未按末地方y按钮。 如何修改PODPreview的Click事件语言?请高手指教!谢谢!

    2012年10月17日 3:39