(16-07-17, 01:23 AM)سعود كتب : السبب انك وضعت كود البحث في مربع نص  والمطلوب في مربع نص اخر
دقق  في الكود وتعرف

---

كود :

' جملة البحث
   Private Sub SearchByName(ByVal t As String)
       Dim sql As String = "SELECT * FROM table1 WHERE tName LIKE '%" & t & "%'"
       Dim da As New OleDb.OleDbDataAdapter(sql, con)
       Dim dt As New DataTable
       da.Fill(dt)
       Me.DataGridView1.DataSource = dt

   End Sub
   '=======================================================================================================================
   '  تكست البحث

   Private Sub TextBox6_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox6.TextChanged
       SearchByName(sender.text)
   End Sub

---

ترى صححت الخطا

---

طبعا الطريقة الاولى صحيحة 

كود :

       Using da = New OleDbDataAdapter(sql, con)
           Using dt = New DataTable
               da.Fill(dt)
               Me.DataGridView1.DataSource = dt
           End Using
       End Using

(16-07-17, 06:01 PM)سعود كتب : اسم الجدول في الاستعلام  هذا اول خطا
 ثاني شي ضمن حدث  textchange لمربع نص كتبت كود استعلام لمحتوى مربع نص اخر

---

............

إقتباس : ربنا يبارك فيك يا هندسة Smile