Configuraci贸n Textbox
G@BRIEL
27 de Junio del 2006
Estoy construyendo un sistema de inventarios en Visual Basic para aplicaciones (Excel), tengo el siguiiente c贸digo:
Private Sub TextBox4_Change()
b_gen = False
If TextBox4 = "" Then
Label16 = ""
TextBox7 = ""
Else
Label16 = Round(1.15 * Val(TextBox4), 2)
TextBox7 = Round(1.1 * Val(TextBox4), 2)
End If
Las operaciones que envian el resultado al Textbox7 funcionan correctamente, el problema es que cuando presenta el resultado, el separador de decimales es la coma "," y en mi caso necesito que sea el punto ".", lo raro es que la otra operaci贸n que envia el resultado al Label16 funciona correctamente, y la configuraci贸n regional de mi equipo es correcta por que aparece como simbolo para los decimales el punto "." entonces quiciera saber si alguno de ustedes les a pasado lo mismo que me puedan ayudar...
Private Sub TextBox4_Change()
b_gen = False
If TextBox4 = "" Then
Label16 = ""
TextBox7 = ""
Else
Label16 = Round(1.15 * Val(TextBox4), 2)
TextBox7 = Round(1.1 * Val(TextBox4), 2)
End If
Las operaciones que envian el resultado al Textbox7 funcionan correctamente, el problema es que cuando presenta el resultado, el separador de decimales es la coma "," y en mi caso necesito que sea el punto ".", lo raro es que la otra operaci贸n que envia el resultado al Label16 funciona correctamente, y la configuraci贸n regional de mi equipo es correcta por que aparece como simbolo para los decimales el punto "." entonces quiciera saber si alguno de ustedes les a pasado lo mismo que me puedan ayudar...
mvallejos
27 de Junio del 2006
Por ejemplo
Label16 = Replace(Round(1.15 * Val(TextBox4), 2) ,",",".")
Saludos
Label16 = Replace(Round(1.15 * Val(TextBox4), 2) ,",",".")
Saludos
G@BRIEL
27 de Junio del 2006
Gracias, solucionaste mi problema