Ayuda con la configuracion regional

07/07/2004 - 18:17 por No_al_Spam | Informe spam
Hola, tengo un problema y talvez me puedan ayudar, pasa que cuando se
ingresa un valor 1,234 mi aplicación (en VB6) no lo toma como 1 y no como
1234. Yo se que es por la configuración regional. Pero es posible que mi
aplicación sea independiente de la configuración del Windows.

Gracias
 

Leer las respuestas

#1 Rubén Vigón
07/07/2004 - 18:45 | Informe spam
Sólo tienes que utilizar funciones de conversión (como «CCur», «CSng» o «CDbl») que efectúan la conversión según la configuración regional del equipo; por ejemplo:

Dim strNumero As String, curNumero As Currency
strNumero = "1,2345"
curNumero = CCur(strNumero)
MsgBox curNumero '1,2345 en equipos con [,] como separador decimal
strNumero = "1.2345"
curNumero = CCur(strNumero)
MsgBox curNumero '12345 en equipos con [,] como separador decimal

Un saludo!

Rubén Vigón
Microsoft MVP Visual Basic
http://www.mvp-access.com/rubenvigon

Preguntas similares