Fórum Script Brasil

Versão Completa: Textbox

Fórum Script Brasil > Programação & Desenvolvimento > .NET

nanda_santos

10/06/2009 - 09:58

Eu to com um problema no meu caixa.
è que eu queria que toda vez que o cliente escolhesse a forma de pagamento credito e clicasse no botao ok esse valor fosse adicionado numa txtCredito. Mas como eu faço para ele ir somando toda vez que eu clicar no botao ok
alguém pode me ajudar?

kuroi

10/06/2009 - 14:07

nanda, seria so isso q você quer saber??

CODE

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
txtCredito.Text = txtCredito.Text + valor
End Sub

nanda_santos

10/06/2009 - 15:27

Ele não soma um valor com outro eu fiz um teste ele so junta os números
E eu preciso que ele faca essa conta em double, pois o caixa é numero quebrado.

quintelab

10/06/2009 - 16:48

Converta o Text do seu TextBox para decimal ou double.

Abraços...

nanda_santos

10/06/2009 - 17:26

Eu sei converter, mas a codigo que o kuroi mandou não soma os numeros
Sabe como fazer

quintelab

12/06/2009 - 18:40

Veja se isso funciona:

CODE

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
txtCredito.Text = Convert.ToDecimal(txtCredito.Text) + valor
End Sub

Isso pensando que a variável valor já seja de um tipo numerico.

Abraços...

nanda_santos

14/06/2009 - 13:47

O problema é que ele não soma
Por exemplo toda vez que eu digitar um valor e escolher crédito ele teria que ir somando
E ele não soma é esse o meu problema.

quintelab

14/06/2009 - 16:03

Mas o que ocorre? Da algum erro?

Abraços...

OSJunior

15/06/2009 - 11:14

Declare uma variável do tipo float (ou double) na sua classe e converta-a para string quando necessitar exibi-la.

Veja o exemplo:

CODE

Public Class Classe
     Private valor As Single

     Public Sub New()
         valor = 0
     End Sub

     Public Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs)
         valor = valor + Single.Parse(TextBox1.Text)
         TextBox1.Text = valor.ToString()
     End Sub
End Class

Esta é uma versão simplificada de nosso conteúdo principal. Para ver a versão completa com maiores informações, formatação e imagens, por favor clique aqui.