Getting #Type! Error in textbox - Access VBA

[bama4954]

It works for the 1 and 2 but not the WJ



Private Sub Report_Load()
'TAG 1
If (CategoryStr) = "1" Or (CategoryStr) = "2" Or (CategoryStr) = "WJ" Then
Me.BoxMaxGap1.Visible = False
Else
Me.BoxMaxGap1.Visible = True
End If
End Sub

 

[bama4954]

Sorry this is the correct code I meant to post:

'TAG 1
If (Me.Category1) = "1" Or (Me.

Category1​

) = "2" Or (Me.

Category1​

) = "WJ" Then
Me.BoxMaxGap1.Visible = False
Else
Me.BoxMaxGap1.Visible = True
End If

 

[welshgasman]

*Always* copy and paste the actual code, not rewrite it.
What field is Category1 bound to and what is that field type?