Foros del Web » Programación para mayores de 30 ;) » .NET »

imposible mantener decimales textbox

Estas en el tema de imposible mantener decimales textbox en el foro de .NET en Foros del Web. Hola amigos...por aquí, ando, tengo un texbox que pone 200,18.....sale de una suma de un grid...hasta ahí todo correcto, pero tengo otro textbox que al ...
  #1 (permalink)  
Antiguo 23/10/2011, 10:41
 
Fecha de Ingreso: noviembre-2010
Ubicación: madrid
Mensajes: 478
Antigüedad: 14 años
Puntos: 5
Pregunta imposible mantener decimales textbox

Hola amigos...por aquí, ando, tengo un texbox que pone 200,18.....sale de una suma de un grid...hasta ahí todo correcto, pero tengo otro textbox que al ponerle una cifra; por ejemplo 5...pues se lo sumo y me lo deja en 205...y me obvia el coma 18....no se porque no pone los decimales....este es mi código;

Código:
 Dim otroimp As Double
        Dim total As Double
        Dim finalimp As Double
        If TextotrImp.Text = "" Or TextotrImp.Text = "0" Then
            otroimp = CDec(Val(TextotrImp.Text))
        Else
            otroimp = CDbl(Val(TextotrImp.Text))
            total = CDbl((Val(TextTotal.Text)))
            finalimp = total + otroimp
            TextTotal.Text = Format(finalimp, "##,##0.00").Replace(".", ",")
he probado poniendo todo en decimal..y tampoco
  #2 (permalink)  
Antiguo 23/10/2011, 12:15
 
Fecha de Ingreso: noviembre-2010
Ubicación: madrid
Mensajes: 478
Antigüedad: 14 años
Puntos: 5
Respuesta: imposible mantener decimales textbox

ARREGLADO, por si a alguien le interesa o le pasa algún día... no se utliza val...si no que double

otroimp = CDbl(TextotrImp.Text)
total = CDbl(TextTotal.Text)
finalimp = CDbl(total + otroimp)
TextTotal.Text = Format(finalimp, "##,##0.00").Replace(".", ",")

Etiquetas: imposible, textbox
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 00:27.