Can someone tell me why I'm getting a "variable not defined" error on the lines in red font? I've used this code in another application, and didn't get this error.
Dim IsOk As Boolean IsOk = True Select Case True Case Me.cobo_Facilitator.Value = "" MsgBox "Please enter who Facilitated the measurement(s)." [COLOR=#ff0000] If response = vbOK Then[/COLOR] Me.cobo_Facilitator.SetFocus End If Exit Sub IsOk = False End Select If Not IsDate(Me.txt_Updated) Then MsgBox "Please enter a valid Updated date in MM/DD/YY format." [COLOR=#ff0000] If response = vbOK Then[/COLOR] Me.txt_Updated.SetFocus End If Exit Sub End If