[a.ahmed]

PHP كود :

Private Sub TextBox1_TextChanged(ByVal sender As Object, ByVal e As EventArgs) Handles TextBox1.TextChanged
    If TextBox1.Text.Trim = "" Then
        Me.DataGridView1.DataSource = table
    Else
        Dim rows = table.Rows.Cast(Of DataRow).Where(Function(x) x.Item("Address").ToLower.Equals(sender.Text.Trim.ToLower))
        If rows.Count = 0 Then
            Me.DataGridView1.DataSource = Nothing
        Else
            Me.DataGridView1.DataSource = rows.CopyToDataTable
        End If
    End If
End Sub