Private
Sub TxtPesquisarCodigoPais_TextChanged(sender
As
Object, e
As
EventArgs)
Handles TxtPesquisarCodigoPais.TextChanged
'Aqui este codigo faz a consulta no datagrid dos carateres digitados pelo usuario no Textbox Pesquisar pelo codigo
Dim a
As
Integer
For a = 0
To DGVListaPaises.Rows.Count - 1
If DGVListaPaises.Rows(a).Cells(0).Value.ToString.ToUpper.Contains(TxtPesquisarCodigoPais.Text.ToUpper)
Then
DGVListaPaises.Rows(a).Selected =
True
DGVListaPaises.FirstDisplayedScrollingRowIndex = a
Exit For
End
If
Next
End
Sub
Daniel Rosa Iniciante de programação em vb.net, linq sql e Sql server