Boa noite.
No projeto em anexo, conseguir fazer com que ao digitar o número do documento, se ele já foi digitado, ele aparece na caixa de listagem
Porém caso, determinado item que já foi lançado eu precise alterar somente o número do documento, eu clico em pesquisa, e uma textbox (Txt_Localiza) será desbloqueada e permitirá que eu digite o número do documento ou a descrição do produto, e ele será listado na " Lst_Entradas", clica em cima do produto que o número do documento terá o seu número alterado.
Obs: Não consegui fazer com que na pesquisa ao digitar o nome do produto ou o número do documento a caixa de listagem fosse preenchida
Para consultar em mais de uma coluna utilizei este código abaixo, porém o mesmo não funciona
No projeto em anexo, conseguir fazer com que ao digitar o número do documento, se ele já foi digitado, ele aparece na caixa de listagem
Porém caso, determinado item que já foi lançado eu precise alterar somente o número do documento, eu clico em pesquisa, e uma textbox (Txt_Localiza) será desbloqueada e permitirá que eu digite o número do documento ou a descrição do produto, e ele será listado na " Lst_Entradas", clica em cima do produto que o número do documento terá o seu número alterado.
Obs: Não consegui fazer com que na pesquisa ao digitar o nome do produto ou o número do documento a caixa de listagem fosse preenchida
Para consultar em mais de uma coluna utilizei este código abaixo, porém o mesmo não funciona
- Código:
Public Sub AtualizaLista()
Dim sSQL As String
Me.Txt_Localiza.SetFocus
sSQL = "SELECT * FROM Tab_Entrada_Saida WHERE cod_produto,Desc_Produto Like '*" & Trim(Me.Txt_Localiza.Text) & "*'"
'Sql_tb01 = "Select * From PRODUTOS WHERE CODIGO,DESCRICAO,REFERENCIA like '%" & pesquisa & "%' Order By [DESCRICAO] "
Me.Lst_Mvto.RowSource = sSQL
Me.Lst_Mvto.Requery
End Sub
- Anexos
- Projeto_1.zip
- Você não tem permissão para fazer download dos arquivos anexados.
- (181 Kb) Baixado 9 vez(es)
Última edição por souzadenilson em 29/9/2022, 03:39, editado 2 vez(es)