I have the following VBA code in a Form_Current Procedure (on a subform nested within another subform on a main form)
When I open the main form, I get the following error:Private Sub Form_Current()
strFilter = "ServiceID = " & Me!cboServiceID
Me!cboBusinessNeedID = DLookup("BusinessNeedID", "Service", strFilter)
End Sub
Here's the crazy part...when I click End in the dialog box, and it goes away and I navigate to the subform, the code did exactly what I needed it to do! Should I just set warnings to false and move on, or is there something to fix here?Run-time error '3075':
Syntax error (missing operator) in query expression 'ServiceID = '.
EDIT: Turning off warnings didn't help...