[AccessD] no Focus

This would have forked in VB6, but in Access I am getting "no focus error"
what should i do ?

Private Sub sndBrian_Click()
Dim From As String
Dim Through As String
Dim dtEdate
dtEdate = Format(Now() - 3, "mm-dd")

If txtFrom.Text = Null Or txtThrough.Text = Null Then
    txtFrom.Visible = True
    txtThrough.Visible = True
    MsgBox "Please enter FROM and THROUGH dates in mm-dd format", , "dates"
Exit Sub
End If


-----------------------------------------
Get Breaking News from CNN, ABC, NBC, CBS Now.
http://www.xuppa.com/news/?link=webmail