Help with simple If Statement

[haveli1]

I have a search form, which has a text box. The user can type in text and then click search. The text box can have numbers or letters. It then searches for the text in a table. I was wondering if anyone knew how to write the code for the If statement. The text box can only have 4 characters.

I tried

If (VarType(Me.dnum.Value) = vbString) Then query4 = query4 & "AND [All Data Table].[Docket No] =" & Chr(34) & Me.dnum.Value & Chr(34)

but it did not work

 

[oerris]

Hi haveli1

If the text you are trying to append to the sql expression is the last part you are missing af ";" in the end.

If (VarType(Me.dnum.Value) = vbString) Then query4 = query4 & "AND [All Data Table].[Docket No] =" & Chr(34) & Me.dnum.Value & Chr(34) & ";"

Ørris.