You might try:

If Not TextBox1 = vbNullString Then

End If