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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  ####COMO VERIFICAR SE O VALOR É NEGATIVO??#####
DCM
GOIÂNIA
GO - BRASIL
Postada em 21/05/2007 11:38 hs            
Olá pessoal!!!
 
Como faço para verificar se o valor é negativo???? EX: -0,01
 
Explico: é q eu estou fazendo um sistema de vendas e nele coloque um LABEL para receber o TOTAL DAS COMPRAS, um Maskedit para digitar o PAGAMENTO e um outro LABEL que mostra o TROCO, mas vai que o usuario digita no Maskedit PAGAMENTO um valor menor que o total, eu já tentei verificar assim: If TOTAL < PAGAMENTO Then, daí eu colocava uma mensagem e forçava digitar novamente o PAGAMENTO, mas em alguns valores não dá certo, por exemplo, quando o TOTAL da menor que 10,00 (ex: 5,25) daí se o PAGAMENTO for 10,00 é como se fosse menor que 5,25, não entendi pq...
SE ALGUEM JÁ FEZ UM SISTEMA ASSIM E TIVER UMA IDEIA....
DESDE JA AGRADEÇO!!!!

"Se fizeres o bem, não é certo que serás aceito? E se não fizeres o bem, o pecado jaz à porta, e sobre ti será o seu desejo; mas sobre ele tu deves dominar - Gênesis 4.7" Emoções
     
ghost_jlp
Pontos: 2843 Pontos: 2843 Pontos: 2843 Pontos: 2843
SÃO PAULO
SP - BRASIL
Postada em 21/05/2007 11:49 hs            
lembre-se de que "total" e "pagamento" tem q ser variáveis tipo Currency (eu costumo usar +), double, etc. Que aceitem decimais.
 
Para converter:
 
IF cCur(Total) < cCur(Pagamento) Then
 'mensagem
Endif
     
LCRamos
Pontos: 2843
GOIANIA
GO - BRASIL
Postada em 21/05/2007 17:53 hs            
Olha, verifique seus tipos de variáveis, eu tenho um programa assim, e funciona muito bem, agora coloco a variavel como Currency.
E me retorna correto
 
vlu//
     
DCM
não registrado
Postada em 25/05/2007 09:50 hs   
OBRIGADO A TODOS, FOI SO COLOCAR COMO  Currency E DE TUDO CERTO, MUITO OBRIGADO.......
 
TOPICO FECHADO.....
     
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