Funcionamiento del Punto como en Excel

13/01/2006 - 18:14 por Fadoyo | Informe spam
Hola a todos, me gustaria hacer en mi aplicacion que cuando se estan
insertando numeros que tanto si se pone un punto como si se pone una coma me
coja el caracter establecido para decimales. ¿Como podria hacer esto?

Gracias
Fadoyo

Preguntas similare

Leer las respuestas

#1 SoftJaén
14/01/2006 - 13:41 | Informe spam
"Fadoyo" preguntó:

me gustaria hacer en mi aplicacion que cuando se estan
insertando numeros que tanto si se pone un punto como
si se pone una coma me coja el caracter establecido
para decimales. ¿Como podria hacer esto?




Hola:

Para obtener el separador decimal que el usuario tiene establecido en la
configuración regional de Windows, te puede servir el mismo código que se
utilizaba en Visual Basic clásico, pero adaptado a .NET. Por ejemplo, si
tienes un control TextBox, a nivel del formulario declararías la siguiente
variable Boolean:

Private IsDecimal As Boolean

Después, en los siguientes eventos del control de texto, ejecutarías lo
siguiente:

Private Sub TextBox1_KeyDown( ... ) Handles TextBox1.KeyDown

IsDecimal = False

If e.KeyCode = Keys.Decimal Or _
e.KeyCode = Keys.Oemcomma Or _
e.KeyCode = Keys.OemPeriod Then

IsDecimal = True
End If

End Sub

Private Sub TextBox1_KeyPress( ... ) Handles TextBox1.KeyPress

If IsDecimal Then
' Obtenemos el separador decimal de la configuración regional
Dim separadorDecimal As String = Mid(Format(1.5, "Standard"), 2, 1)

' Insertamos el separador decimal
TextBox1.SelectedText = separadorDecimal

' Impedimos que se escriba el carácter seleccionado
e.Handled = True
End If

End Sub

Un saludo

Enrique Martínez
[MS MVP - VB]

Nota informativa: La información contenida en este mensaje, así como el
código fuente incluido en el mismo, se proporciona «COMO ESTÁ», sin
garantías de ninguna clase, y no otorga derecho alguno. Usted asume
cualquier riesgo al poner en práctica, utilizar o ejecutar lo recomendado o
sugerido en el presente mensaje.
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida