31-05-13, 06:59 PM
السلام عليكم
- هذا هو أعتقد الكود المناسب للبحث , أنا لا أتعامل مع أداة الـDataControl كثيراً :
- تحياتي .
- هذا هو أعتقد الكود المناسب للبحث , أنا لا أتعامل مع أداة الـDataControl كثيراً :
كود :
Data1.Recordset.FindFirst "[word]='" & Trim$(Text1.Text) & "'"
If Not Data1.Recordset.NoMatch Then
Text2.Text = Data1.Recordset.Fields!mean
Else
MsgBox "لم يتم العثور على نتيجة"
End If- تحياتي .
