displaying error

[mheiy]

i have this my code

Private Sub MDIForm_Load()
sad = "Select * from tbapplicant where EndDateREserved like '" & lblDate & "%'"
 
tbApplicant.Open sad, cn, adOpenDynamic, adLockOptimistic
With tbApplicant
   ' .Find "EndDateREserved = '" & lblDate & "'"
    If .EOF = False And .BOF = False Then
        Label5 = .Fields(3)
    End If
End With
 
end sub

when i comment the .Find the .fields(3) will display to the label but if i dont comment the .Find no records will display what will i do...

thanks

[Hack]

What are you trying to do that isn't already being done?

[mheiy]

what do you mean

[Hack]

I mean I don't understand the question.

when i comment the .Find the .fields(3) will display to the label but if i dont comment the .Find no records will display what will i do...

Based on this it would seem that you don't need to use .Find and everything works, so I don't get the issue.