[asto]

VB_Coder كتب :السلام عليكم

- هذا هو أعتقد الكود المناسب للبحث , أنا لا أتعامل مع أداة الـDataControl كثيراً :

كود :

Data1.Recordset.FindFirst "[word]='" & Trim$(Text1.Text) & "'"

If Not Data1.Recordset.NoMatch Then
   Text2.Text = Data1.Recordset.Fields!mean
Else
   MsgBox "لم يتم العثور على نتيجة"
End If

- تحياتي .

مشكور جدا

طيب كيف البحث بتحقق شرطين معا يعني نضيف تكست 3

و اذا ما تم ايجاد ما هو مكتوب في تكست 1 و كان تكست 3 يساوي مثلا 6 ننفذ ما ضمن if