Pregunta: | 43736 - DETECTAR SI EL DECIMAL DE MI EQUIPO ES PUNTO O COMA DESDE VB |
Autor: | Yamid Rojas |
Lo que sucede es que para mi programa trabajo separando los decimales con punto, y cuando creo el ejecutable, para poder correrlo en otro equipo necesito saber si este esta configurado
en el panel de control -> configuracion regional y de idioma -> Opcines Regionales -> Personalizar -> Simbolo decimal como punto para que pueda corer el programa, si esta con coma debo enviar un mensaje y el programa no debe arrancar hasta que lo cambie a punto, esta verificación se debe hacer al iniciar el ejecutable del programa hecho en Visual Basic 6. De antemano gracias por la ayuda que me puedan brindar, es muy urgente, ya que es para mi proyecto de Grado |
Respuesta: | Alfonso Salazar |
Puedes utilizar esta función:
Public Function Puntodecimal() As String Dim S As String S = Format$(1.5, "0.0") Puntodecimal = Mid$(S, 2, 1) End Function La función devolverá "," o "." según la configuración del sistema puedes usarla, por ejemplo: if Puntodecimal = "," then msgbox "Cambiar punto decimal a ""."" end end if |