ممكن مساعدتي بموضوع ربط الفيجوال مع الاكسس

ان شاءالله محلولة ..

ركز معي ..

DataSet1.Clear()

 Dim DaAd As New OleDbDataAdapter

  DaAd = New OleDbDataAdapter("Select * from TTT where FFF Like'%" & TextBox1.Text & "%'", myConnection)

 DaAd.Fill(DataSet1, "Tab")

DataGridView.DataSource = DataSet1.Tables("Tab")

في السطر الثالث لديك TTT اسم الجدول و FFF اسم الحقل المراد البحث به .. و TextBox1 هي القيمة التي ستبحث عنها ..

و myConnection هو اسم الاتصال بالقاعده غيره حسب ماعندك ..

وهذا الكود كله اضفه بعد الاتصال بالقاعدة وقبل myConnection.Close

اضف الى بداية المشروع متغير عام

Dim DataSet1 as DataSet

جرب الكود وهو عندي الان يعمل بصورة طبيعية ..

تحياتي العطرة ..

تحياتي العطرة لك اخي وشكرا لك كتيير كتير

انا الحمدلله استفدت على الكود والامور صارت تمام

والله يعطيك العافية ويجزيك الخير