La Web del Programador: Comunidad de Programadores
 
    Pregunta:  5160 - COMO RESPETAR DECIMALES AL MODIFICAR LA VER DEUNA APLICACION
Autor:  VINCENZO COLOMBO
HE TRABAJADO CON UN PROGRAMA PARA FACTURACIÓN
HECHO EN VBASIC V 5.0, PERO CUANDO INSTALO UN PROGRAMA COMO EL
NORTON 2000, O EL VB V.6,O TENGO UN PROBLEMA EN LAS BASES DE DATOS
CON LAS COMAS Y LOS PUNTOS; ESTO QUIERE DECIR QUE SI ANTES YO
ESCRIBÍA 12345.67 LO ACEPTABA CORRECTAMENTE, PERO LUEGO
DE INSTALAR DICHOS PROGRAMAS CUANDO ESCRIBO LA MISMA INFORMACIÓN
12345.67 AL PULSAR ENTER SE CONVIERTE EN 1234567 (OMITE EL PUNTO).
TRATE DE RESOLVERLO POR CONFIGURACION PONIENDO EL DECIMAL Y EL
DE MILES INVERTIDO, PERO ENTONCES TENGO PROBLEMAS CON UN
PROGRAMA HECHO EN VB 3.0.
LO QUE QUIERO DECIR ES QUE MIS PROGRAMAS EN LAS DOS VERSIONES
TRABAJAN PERFECTAMENTE ANTES DE INSTALAR VB 6.0 O EL NORTON 2000.

QUE DEBO HACER AL RESPECTO?

  Respuesta:  Miguel Lucero
No se si entendí bien tu pregunta pero una solución con los separadores decimales es armar una pequeña función que te modifique el separador decimal por ejemplo al momento de estar ingresando los datos en un textbox. Si el separador decimal es la coma y presionas el punto, reemplazas este por la coma o viseversa.
Para saber cual es el separador decimal podés hacer algo así:

...
SeparadorDecimal = Mid(Trim(Format(1.23,"0.00")),2,1)
...

Espero que te sirva.