none
Ajuda para traduzir esse código ? RRS feed

  • Pergunta

  • Tenho um código que filtra os dados do DataGrid, mas em sí esse código add os dados e colunas ao datagrid
    Dim bs As BindingSource
    
    '===========================
    
    No evento Load do Form:
    
    ' Vou simular uma pesquisa num banco de dados...
    Dim dt As New DataTable("Exemplo")
    dt.Columns.Add("id", GetType(Integer))
    dt.Columns.Add("nome", GetType(String))
    
    dt.Rows.Add(New Object() {1, "Nome Um"})
    dt.Rows.Add(New Object() {2, "Nome Dois"})
    dt.Rows.Add(New Object() {3, "Nome Tres"})
    dt.Rows.Add(New Object() {4, "Nome Quatro"})
    dt.Rows.Add(New Object() {5, "Nome Cinco"})
    
    bs = New BindingSource()
    bs.DataSource = dt
    DataGridView1.DataSource = bs
    
    No evento TextChanged do TextBox:
    
    bs.Filter = "nome like '%" & TextBox1.Text & "%'"

    Eu queria usar meus dados, a conexão com o banco de dados já está feita, so queria que esse código pesquisasse no meu dataGrid, sem add novos valores e colunas como esse código faz...

    sexta-feira, 27 de dezembro de 2013 17:10

Respostas

  • Bom dia Tiago65,

    A sugestão do Fúlvio resolveu o seu problema?

    Caso sim não esqueça de marcar como resposta para fechar a sua Thread.

    Att,


    Giovani Cruzara – Microsoft Contingent Staff

    Esse conteúdo é fornecido sem garantias de qualquer tipo, seja expressa ou implícita.

    Msdn Community Support

    Por favor, lembre-se de “Marcar como Resposta” as respostas que resolveram o seu problema. Essa é uma maneira comum de reconhecer aqueles que o ajudaram e fazer com que seja mais fácil para os outros visitantes encontrarem a resolução mais tarde.

    • Marcado como Resposta Giovani Cr quinta-feira, 9 de janeiro de 2014 11:13
    terça-feira, 7 de janeiro de 2014 16:54
  • Dim DataTable As New DataTable()
    Using Cnn As New SqlClient.SqlConnection("String_Conexao")
    	Using Command As New SqlCommand("SELECT * FROM TABELA1 WHERE NOME1 LIKE @NOME1 ORDER BY NOME1", Cnn)
    		If Cnn.State = ConnectionState.Closed Then Cnn.Open()
    		Command.Parameters.Add("@NOME1", SqlDbType.NVarChar).Value = String.Format("%{0}%", NOME1)
    		DataTable.Load(Command.ExecuteReader())
    		Cnn.Close()
    	End Using
    End Using
    DataGridView1.DataSource = DataTable
    é um exemplo!!!

    Fulvio Cezar Canducci Dias

    domingo, 29 de dezembro de 2013 20:12

Todas as Respostas

  • Traduzir? o que ?

    Fulvio Cezar Canducci Dias

    domingo, 29 de dezembro de 2013 15:33
  • Já adicionou a query de pesquisa no banco de dados?
    domingo, 29 de dezembro de 2013 18:40
  • Dim DataTable As New DataTable()
    Using Cnn As New SqlClient.SqlConnection("String_Conexao")
    	Using Command As New SqlCommand("SELECT * FROM TABELA1 WHERE NOME1 LIKE @NOME1 ORDER BY NOME1", Cnn)
    		If Cnn.State = ConnectionState.Closed Then Cnn.Open()
    		Command.Parameters.Add("@NOME1", SqlDbType.NVarChar).Value = String.Format("%{0}%", NOME1)
    		DataTable.Load(Command.ExecuteReader())
    		Cnn.Close()
    	End Using
    End Using
    DataGridView1.DataSource = DataTable
    é um exemplo!!!

    Fulvio Cezar Canducci Dias

    domingo, 29 de dezembro de 2013 20:12
  • Bom dia Tiago65,

    A sugestão do Fúlvio resolveu o seu problema?

    Caso sim não esqueça de marcar como resposta para fechar a sua Thread.

    Att,


    Giovani Cruzara – Microsoft Contingent Staff

    Esse conteúdo é fornecido sem garantias de qualquer tipo, seja expressa ou implícita.

    Msdn Community Support

    Por favor, lembre-se de “Marcar como Resposta” as respostas que resolveram o seu problema. Essa é uma maneira comum de reconhecer aqueles que o ajudaram e fazer com que seja mais fácil para os outros visitantes encontrarem a resolução mais tarde.

    • Marcado como Resposta Giovani Cr quinta-feira, 9 de janeiro de 2014 11:13
    terça-feira, 7 de janeiro de 2014 16:54