variant varijabla i null vrijednost

Pozdrav svima.
U formi koristim tekst za unos imena korisnika i kada stisnem enter kada je textbox prazan zelim da mi izbaci poruku da je potrebno upisati ime. Pokusao sam to napraviti pomocu macroa koji se pokrene pomocu petlje if. Tekst u textboxu sam postavio kao variant i u petlji sam postavio da ako je varijabla jednaka Null onda pokreni macro. Nista se ne dogadja. Ako stavim da je varijabla jednaka nakom imenu i kada upisem to ime pokrene macro. U cemu je problem.
Hvala puna

Ako je text box prazan, vrednost nije null, nego prazan string ("").
I gledaj da ne koristis macros ako mozes.

Potpis

All beer is good. Some beer is better.

Da li znaci da varijablu koju vezem na textbox trebam postaviti kao string ili variant. Probao sam i jedno i drugo i ne radi. Saljem i kod:

Private Sub tekst_AfterUpdate()

Dim varime As Variant

varime = [Forms]![Form1]![tekst]

If varime = "" Then
DoCmd.RunMacro "Macro1"
Else
DoCmd.OpenQuery "query1"
DoCmd.Close acQuery, "query1", acSaveYes
Me.Refresh
End If

End Sub

Ako upisem bilo sta drugo osim "" radi.

Hvala