Where and how do I write in this code that is a command button to open up a form to set the Echo off. I know how to do it in a marco but not how to write it in VB code.
Below is the VB code for my "open form" button...
Private Sub LookUpOpenFormButton_Click()
On Error GoTo Err_LookUpOpenFormButton_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "frm_Account"
stLinkCriteria = "[ID]=" & Me![LookUpAccount]
DoCmd.OpenForm stDocName, , , stLinkCriteria
DoCmd.Close acForm, "Switchboard Lookup"
Exit_LookUpOpenFormButton_Click:
Exit Sub
Err_LookUpOpenFormButton_Click:
MsgBox Err.Description
Resume Exit_LookUpOpenFormButton_Click
End Sub
Below is the VB code for my "open form" button...
Private Sub LookUpOpenFormButton_Click()
On Error GoTo Err_LookUpOpenFormButton_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "frm_Account"
stLinkCriteria = "[ID]=" & Me![LookUpAccount]
DoCmd.OpenForm stDocName, , , stLinkCriteria
DoCmd.Close acForm, "Switchboard Lookup"
Exit_LookUpOpenFormButton_Click:
Exit Sub
Err_LookUpOpenFormButton_Click:
MsgBox Err.Description
Resume Exit_LookUpOpenFormButton_Click
End Sub