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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  somar text boxes.
CeNzAo
BARUERI
SP - BRASIL
ENUNCIADA !
Postada em 11/01/2008 02:07 hs            
Ola.
Bom dia!
 
Se possivel alguem me ajudar preciso somar 2 text box e o valor apresentar em uma outra text box, exemplo:
 
 valor da text1.text + valor da text2.text = resultado na text3.text.
 
desde ja agradeço
 
 
cenzao
   
WALMIR
SERRANA
SP - BRASIL
ENUNCIADA !
Postada em 11/01/2008 02:09 hs            
Ola, bom dia.
 
Veja se isso te ajuda:
 
Text3.text = (text1.text + text2.text)
 
qualquer coisa, posta ai.
   
Tiranossauro
não registrado
ENUNCIADA !
Postada em 11/01/2008 08:31 hs   
Sempre é interessante lembrar de consistir antes da soma se o campo é numérico.
 
If isnumeric(text1.text) = false then
   msgbox "conteúdo inválido"
  text1.setfocus
  exit sub
end if
 
da mesma forma para o segundo textbox
 
Text3.text = (cdbl(text1.text) + cdbl(text2.text))
 
 
   
Edson479
SÃO PAULO
SP - BRASIL
ENUNCIADA !
Postada em 11/01/2008 09:22 hs            

bom dia..
Tiranossauro, qual a diferença do

Text3.text = (cdbl(text1.text) + cdbl(text2.text)) 

e do

text3.text=(val(text1.tex)+val(text2.text))

é que tive o mesmo problema e eu peque um dica com (VAL....

        txt_tro.Text = Val(txt_pag.Text) - Val(TXTNP.Text)

dar certo também

   
Treze
não registrado
Postada em 11/01/2008 09:35 hs   
Olá desculpe me atravessar mas eis a diferença
 
CDbl retorna um valor Double é ocaso da primeira expressão
 
em uma expressão currency
 
255.123456
 
você terá o seguinte resultado
 
255.1235
 
agora a função VAL retorna valores numéricos dentro de uma String
 
exemplo:
 
Val("1 5 788 9")
 
o resultado vai ser o seguinte
 
157889
agoar analise teste ambos os códigos e veja o que está saindo errado
 
valeu até
 
 
     
Ama
Pontos: 2843
UBERLÂNDIA
MG - BRASIL
ENUNCIADA !
Postada em 12/01/2008 09:39 hs         
tem um componente scriptcontrol que avalia expressões numericas mesmo através de strings msscript.ocx
   
Página(s): 1/2      PRÓXIMA »


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