...
Assinatura do site por 3 anos + Kit MontaRibbons + 3 Livros em PDF +
Diversas Revistas (pdf) de brinde, por apenas
R$182,00
(podendo
parcelar em até
10
vezes no cartão de crédito)...
Clique aqui e obtenha mais detalhes do nosso kit completo e de como comprar.
Preencher subformulário com Listbox - Lanchonete
Antes de iniciar a sua leitura, clique aqui e cadastre-se para receber comunicados sobre novos artigos.
Usuário Sebastião:
Olá!
Estou desenvolvendo um sistema para controle de lanchonete e tenho duas idéias, no entanto, por mais que tento, nenhuma funciona. Preciso da sua ajuda.
1ª Tenho um formulário com uma caixa de listagem com os produtos e um subformulário. Quero que ao dar duplo click na caixa de listagem, os produtos passem para o subformulário e ao finalizar o pedido, limpe o subformulário.
2ª Tenho um formulário com vários botões e um subformulário. Quero que ao dar duplo click nos botões, os produtos passem para o subformulário e ao finalizar o pedido, limpe o subformulário.
Suporte:
Sebastião, segue um exemplo que fiz para você. Escolha uma mesa e o formulário de pedido correspondente será aberto.
Com dois cliques no produto selecionado da listbox, os dados serão passados para o subformulário.
O código que transfere os valores da listbox para o subform é este:
Private Sub ListaProdutos_DblClick(Cancel As Integer)
Me!sfrmDetalhePedidos.SetFocus
DoCmd.GoToRecord , , acNewRec
Me!sfrmDetalhePedidos!Produto = Me!ListaProdutos.Column(1)
Me!sfrmDetalhePedidos!ValorUnitario = Me!ListaProdutos.Column(2)
Me!sfrmDetalhePedidos!Quantidade.SetFocus
End Sub
Usuário Sebastião :
Funcionou tudo certinho, Avelino!
Obrigado!
Download
| Não há comentário |
