PREENCHER TXTBOX AO DIGITAR A PESQUISA [Ô]VB 2008[
Bom dia gente Agradeço muito a ajuda que tive ontem principalmente vc Felipe o código que me passou é excelente.
Pessoal tenho quatro campos nome_produto.txt, quantidade.txt, valor_unt.txt e estoque_minimo.txt.
Abaixo tenho um textbox de pesquisa no qual digito o nome do produto e vai filtrando no datagrid até ai legal. Agora como faço para também ir preenchendo os textbox acima conforme eu for digitando.
Muito obrigado e que Deus os abençoe.
Pessoal tenho quatro campos nome_produto.txt, quantidade.txt, valor_unt.txt e estoque_minimo.txt.
Abaixo tenho um textbox de pesquisa no qual digito o nome do produto e vai filtrando no datagrid até ai legal. Agora como faço para também ir preenchendo os textbox acima conforme eu for digitando.
Muito obrigado e que Deus os abençoe.
Isto foi o que recebeu;
Dim strSql as String
strSql = ([Ô]SELECT * FROM cliente WHERE nome Like [ô]%[Ô] & textbox1.text & [Ô]%[ô][Ô])
Dim DA As SqlDataAdapter = New SqlDataAdapter(strSql, cnnSql)
Dim DT As DataTable = New DataTable
DA.Fill(DT)
Datagridview1.DataSource = DT.DefaultView
então
Dim strSql as String
strSql = ([Ô]SELECT * FROM cliente WHERE nome Like [ô]%[Ô] & textbox1.text & [Ô]%[ô][Ô])
Dim DA As SqlDataAdapter = New SqlDataAdapter(strSql, cnnSql)
Dim DT As DataTable = New DataTable
DA.Fill(DT)
Datagridview1.DataSource = DT.DefaultView
[txt-color=#e80000] txtCod.Text = DataGridView1.CurrentRow.Cells(0).Value
txtnome.Text = DataGridView1.CurrentRow.Cells(1).Value[/txt-color]
Dim strSql as String
strSql = ([Ô]SELECT * FROM cliente WHERE nome Like [ô]%[Ô] & textbox1.text & [Ô]%[ô][Ô])
Dim DA As SqlDataAdapter = New SqlDataAdapter(strSql, cnnSql)
Dim DT As DataTable = New DataTable
DA.Fill(DT)
Datagridview1.DataSource = DT.DefaultView
então
Dim strSql as String
strSql = ([Ô]SELECT * FROM cliente WHERE nome Like [ô]%[Ô] & textbox1.text & [Ô]%[ô][Ô])
Dim DA As SqlDataAdapter = New SqlDataAdapter(strSql, cnnSql)
Dim DT As DataTable = New DataTable
DA.Fill(DT)
Datagridview1.DataSource = DT.DefaultView
[txt-color=#e80000] txtCod.Text = DataGridView1.CurrentRow.Cells(0).Value
txtnome.Text = DataGridView1.CurrentRow.Cells(1).Value[/txt-color]
Muuito obrigado pela ajuda Omar.
Agradeço a Deus e aos amigos que me ajudam nessa nova etapa de aprendizagem.
Que Deus os abençoe.
Agradeço a Deus e aos amigos que me ajudam nessa nova etapa de aprendizagem.
Que Deus os abençoe.
Tópico encerrado , respostas não são mais permitidas