[اسلام الكبابى]

كيف يكون البحث بشرطين
كتبت هذا الكود للبحث عن سجل معين فعمل دون أخطاء

كود :

Private Sub Command1_Click()
NUMM1 = Text1.Text
Adodc1.Recordset.MoveFirst
Adodc1.Recordset.Find "DATA1 = " & NUMM1
End Sub

ولكن عندما عدلت الكود من أجل البحث بشرطين اعترض البرنامج ولم ينفذ

كود :

Private Sub Command1_Click()
NUMM1 = Text1.Text
NUMM2 = Text2.Text
Adodc1.Recordset.MoveFirst
Adodc1.Recordset.Find "DATA1 = " & NUMM1 And "DATA2 = " & NUMM2
End Sub

فأرجوكم تعديل هذا الكود الأخير
ولكم ألف شكر