السبب انك وضعت كود البحث في مربع نص والمطلوب في مربع نص اخر
دقق في الكود وتعرف
كود :
' جملة البحث
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
اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير