سوال عن تضمين select داخل فجوال بيزك

اخي ما هي طريقة الربط التي تعلمتها

ياريت توضح انت بتستخدم ايه بالظبط في ربط قاعدة البيانات بالبرنامج

ممكن تشتغل بالكود ده بتاع الDAO

Dim Mydb As Database
Dim Myrs As Recordset
MYSQL= "select * from Table_name where Field_name = Search_word"
Set Mydb = DBEngine.OpenDatabase(App.Path & "\DATA.mdb")
Set Myrs = Mydb.OpenRecordset(MYSQL)

Myrs ده فيه نتيجة البحث وممكن تعرضه باي طريقة تعجبك

لو انت بتستخدم اداة DATA العادية الموجودة في صندوق ادوات VB6 الأفتراضي

هايبقى الكود بتاع البحث كده

MYSQL= "select * from Table_name where Field_name = Search_word"
Data1.RecordSource = MYSQL
Data1.Refresh

وممكن تبحث باستخدام نفس الأداة اللي هي DATA

لكن بطريقة تانية وهي جمل FIND

Data1.Recordset.FindFirst 
Data1.Recordset.FindLast
Data1.Recordset.FindNext
Data1.Recordset.FindPrevious

ودي تبقى كده

Data1.Recordset.FindFirst ("Field_name = Search_word")

وبقول تاني عشان نعرف نفيدك أكتر ياريت توضح انت بتستخدم ايه بالظبط في ربط قاعدة البيانات بالبرنامج

الحمد لله تعلمت كلا الاداتين data , dao و لكن اريد شرح لكي افهم اكثر فاكثر مع مثال وليكن المثال التالي :

قاعدة بيانات تحتوي على جدول الطلاب student به ثلاث حقول الاسم والرقم والدرجه no,name,degre فكيف استعلم عن مثلا " استخرج معلومات الطالب بالبحث بالاسم " طبعا الاسم يدخل عن طريق inpubox وكيف اخرجها على الفورم بشكل المناسب ؟

ياليت المساعده ياشباب.

وشكرا للذين ردو علي وبارك الله في مجهوداتهم.