what is wrong ?? no findfirst only find !!!!

[Edilson]

Dim WithEvents adoBedRS As Recordset
Private Sub Form_Load()
Dim SQL As String
Set adoBedRS = New Recordset
adoBedRS.Open "select BEDname,BEDSIZE from BED", Conn1, dbOpenDynaset, adLockOptimistic

adoBedRS.findfirst "bed=1" ' this won't work why ??

End Sub