La Web del Programador: Comunidad de Programadores
 
    Pregunta:  58367 - COMO PONER PUNTO EN VEZ DE COMA
Autor:  Elíxam Carrero
Buenas, llevo unos dias mirando en las P/R y no consigo resolver un problema, para empezar es mi 1 vez que toko VB2005, estoy haciendo una calculadora pero en tema de decimales cuando uso var me funciona usando el punto, el problema es que el resultado se muestra en una label y en esta sale 12,09 en vez de 12.09, leyendo descubri que es por culpa de la region, he probado lo que vi pero no consigo na.. esta es la funcion :
Label25.Text = Val(Label26.Text) * Val(TextBox13.Text)
el problema eske la solucion despues se suma en otra función, provee con CDec pero al borrar el numero el programa petaba.
mi duda es que tengo ke poner para que salga 0.00 en vez de 0,00 sin tocar la region y donde se ha de colocar :Label que sale el resultado o en el TextBox donde se hace la funcion.

os doy las gracias por adelantado por tomaros la molestia de leer esto.

  Respuesta:  Elíxam Carrero
weno me costo lo mio pero lo encontre seria asin:

Imports System.Globalization

Private Sub TextBox1_TextChanged_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
Dim oldDecimalSeparator As String = Application.CurrentCulture.NumberFormat.NumberDecimalSeparator

If Not oldDecimalSeparator = "." Then
Dim forceDotCulture As CultureInfo
forceDotCulture = Application.CurrentCulture.Clone()
forceDotCulture.NumberFormat.NumberDecimalSeparator = "."
forceDotCulture.NumberFormat.NumberGroupSeparator = ","
Application.CurrentCulture = forceDotCulture
End If
Label17.Text = Val(Label18.Text) * Val(TextBox1.Text)
End Sub