Visual Basic - PROBLEMA CHOTO, PERO...

Life is soft - evento anual de software empresarial
 
Vista:

PROBLEMA CHOTO, PERO...

Publicado por Roberto (22 intervenciones) el 30/04/2003 21:07:54
Tengo el siguiente problema mas que choto pero que me tiene trancado !!!!

Estoy realizando un sistema en el cual tiene una parte de facturación, y tengo problemas con los decimales, no doy pie en bola !!!!

El problema es que para sumar levanto el valor del TextBox con Val y cuando sumo y vuelco el valor en otro control, me pone el valor con coma en vez que con punto y lo necesito que me lo vuelque con coma ya que uso ese valor con VAL también. Y cuando grabo (Update) si tiene punto me los saca, con coma eso no pasa !!!

Probé a usar CCur o CSng o Clng, pero nada me lo hace funcionar !!!!

En que le estoy errando ??? Cuál sería la solución ???
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:PROBLEMA CHOTO, PERO...

Publicado por Marco Santis (265 intervenciones) el 30/04/2003 21:34:14
Mira, yo tuve varios problemas igual que tu, y les daba algún tipo de solución pero caía en otro problema...
Entonces decidi crear una función donde paso el valor como string, la recorro posición y si encuentra una coma la cambia a punto, ej:

Function PuntoYComa(strValor as String) as String
PuntoYComa = ""
For x = 1 to Len(strValor)
if mid$(strValor, x, 1) = "," then
PuntoYComa = PuntoYComa & "."
else
PuntoYComa = PuntoYComa & mid$(strValor, x, 1)
end if
Next x
end Function

y cada vez que necesito mostrar el valor o enviarlo en un query uso esta función, Ej:
TextBox1.Text = PuntoyComa(189,25)
o
TextBox1.Text = PuntoyComa(Tx_Valor.Text)

y me sacó de un gran problema
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar