User Profile
Ashokmca
MCT
Joined 6 years ago
User Widgets
Recent Discussions
Re: VBA Program
Try the following idea: 'Main form Private Sub cmdProductform_Click() On Error GoTo Err_cmdProductform_Click Dim stDocName As String Dim stLinkCriteria As String stDocName = "frmProduct" DoCmd.OpenForm stDocName, , , stLinkCriteria Exit_cmdProductform_Click: Exit Sub Err_cmdProductform_Click: MsgBox Err.Description Resume Exit_cmdProductform_Click End Sub 'Product form Private Sub cmdCloseMe_Click() On Error GoTo Err_cmdCloseMe_Click If Me.Dirty Then Me.Dirty = False DoCmd.Close Exit_cmdCloseMe_Click: Exit Sub Err_cmdCloseMe_Click: MsgBox Err.Description Resume Exit_cmdCloseMe_Click End Sub748Views0likes2Comments
Recent Blog Articles
No content to show