[ابراهيم ايبو]

السلام عليكم اخي الكريم

تفضل هذا الكود البحث به حرفي 

كود :

   Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
       Try
           Dim dt As New DataTable
           Dim da As New OleDbDataAdapter
           dt.Clear()
           da = New OleDbDataAdapter("select * from Personal where FirstName = '" & Txt_AutoSearsh.Text & "' and adress = '" & Txt_AutoSearsh2.Text & "'", con)
           da.Fill(dt)
           DataGridView1.DataSource = dt
       Catch ex As Exception
       End Try
   End Sub