[RESOLVED] Checking text box for @ symbol

[Piller]

If InStr(Text1.Text, "@") > 0 Then
    'code
End If

InStr returns a number if its there if not its 0. This checks to see if it returns a value greater then zero.