[Resolvido]Selecionar para vender

O amigão muito bom mesmo, vou só colocar um botão para ocultar novamente a list após a consulta dos dados.
Obrigado mesmo pela paciência e dedicação.
Tudo de bom abençoado.

Kaynan hoje revendo o caso de o campo busca for vazio a lista ficaria limpa veja o código.

Código:

Private Sub txtBuscar_Change()

Dim k As Integer

k = Len(Me.txtBuscar.Text) ' variável k recebe a quantidade de caracteres digitado incluindo espaços
If k <= 0 Then ' faz a comparação se k for menor ou igual a zero então
Me.Lista239.RowSource = "" 'limpa a lista
Else 'senão
'continua fazendo a filtragem
Me.Lista239.RowSource = "SELECT CódigoProduto, CódigoBarras, Descrição, PreçoUnitário, QuantidadeEstoque FROM Tab_Produto WHERE Descrição Like '*" & Me.txtBuscar.Text & "*'"
End If

End Sub

Ola formiga,começando a trabalhar com o PDV senti uma outra necessidade ,ficaria melhor mais um detalhe,ao fazer uma venda por exemplo:
2 Teclado, 2 mouse,e derrepente o cliente quer mais um teclado, ai ao inves de aparecer novamente 1 Teclado queria que somasse mais um np teclado vendido entende inves de 2 aparecesse 3 teclado.
Vi que fez isso no teu programa CEV,poderia ver isso pra mim.
Abç.

Opa blz meu amigo? Assim que tiver um tempo vejo sim.
Bom final de semana.

Quando puder amigo véio,não te acanhe eheheheh

Ola formiga,começando a trabalhar com o PDV senti uma outra necessidade ,ficaria melhor mais um detalhe,ao fazer uma venda por exemplo:
2 Teclado, 2 mouse,e derrepente o cliente quer mais um teclado, ai ao inves de aparecer novamente 1 Teclado queria que somasse mais um np teclado vendido entende inves de 2 aparecesse 3 teclado.
Vi que fez isso no teu programa CEV,poderia ver isso pra mim.
Abç.

Pessoal vou fazer um outro post sobre minha dúvida esse post ja ta meio cheio.