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

Siga el debate

3 respuestas

Tengo una respuesta

Preguntas similare

Mostrar todos los temas similares

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

Responder a este mensaje

#2 No_al_Spam

07/07/2004 - 22:49 | Informe spam

Muchas gracias lo voy a probar
Saludos

"Rubén Vigón" wrote in message
news:e%
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

Responder a este mensaje

#3 No_al_Spam

07/07/2004 - 23:25 | Informe spam

Me funciono perfecto, pero me nace otra consulta. Al ingresar un numero
(con decimales) en un text el punto del teclado numérico siempre me lo asume
como "punto" y no como coma (para el caso de que el separador de decimales
sea coma), mi idea es quede como el excel el cual reconoce el punto
(numérico) como decimal.

De antemano muchas Gracias

Saludos

"Rubén Vigón" wrote in message
news:e%
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

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

Busqueda sugerida