USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  AJUDA Urgenttttteeeee
sk888
não registrado
ENUNCIADA !
Postada em 19/11/2008 22:46 hs   
pessoal gostaria de saber como eu pego determinado dado de uma tabela
ex
cadastro comb
cadastro gasolina a um preço de 2,95 o litro blz
cadastro alcool a um preço de 1,90

quando efetuo a venda do combustivel eu fiz o calculo assim quant * preço blz
até ai tdo ok
só que ele pega o preço do primeiro produto !!! mesmo eu dando o código de venda do alcool!!!

como faço p/ selecionar em que campo da tabela é p / ele pegar!!!
   
DennysFelix
SÃO PAULO
SP - BRASIL
ENUNCIADA !
Postada em 19/11/2008 23:21 hs            
vc poderia ser mais claro...coloque o jeito que montou seu codigo!!!!
   
sk888
não registrado
Postada em 20/11/2008 00:39 hs   
Private Sub txtquantidade_LostFocus()
On erro GoTo Erro_SemDados
vquantidade = (txtquantidade.Text)
vprecounit = dataprodutos.Recordset.Fields("preco/unidade").Value
vtotal = vquantidade * vprecounit
lblvalortotal.Caption = Format(vtotal, "R$ #,##0.00")       'formato exato

Erro_SemDados:
If Err.Number = 13 Then
    MsgBox "Dados inválidos verifique o produto  e a quantidade"
    If (txtquantidade.Text = "") Then
        txtquantidade.SetFocus
        Else
        dbcodproduto.SetFocus
     lblvalortotal.Caption = ""
     End If
End If
End Sub
     
sk888
não registrado
ENUNCIADA !
Postada em 20/11/2008 00:42 hs   
o problema é que ele esta pegando o preço do primeiro produto cadastrado
ai quando vou cadastrar outro produto a quantidade
multiplica pelo preço errado!
   
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página