Visual Basic - Visual basic y decimales

Life is soft - evento anual de software empresarial
 
Vista:
sin imagen de perfil

Visual basic y decimales

Publicado por Ruben (3 intervenciones) el 19/12/2021 02:19:58
16398727756981753212947831234503

Buenas noches chicos, tengo un problema con visual basic 6 y decimales, es un formulario de cotización y necesito que me tome 2 decimales al realizar los cálculos, y esto lo he logrado, el problema es que al dar clic en el botón de guardar registro se eliminan los decimales y pasa a ser un número entero es decir :
Si el cálculo daba 125.67 al dar clic en el botón guardar se convierte en 12567, sin punto decimal, y necesito que se guarde como decimal así como realiza el cálculo, adjunto foto del código
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de gilman
Val: 594
Bronce
Ha mantenido su posición en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

Visual basic y decimales

Publicado por gilman (359 intervenciones) el 19/12/2021 08:57:07
Pon el código del botón guardar, sería útil para poder dar la solución al problema.
Pero si como me imagino el valor a guardar es Text9.Text el problema va a ser que estás usando la función Val para asignar el valor al campo del Recordset, usa CDbl o simplemente no uses nada, el problema es que Val ignora la configuración regional pero Format no, con lo que Format(125.67) da como resultado la cadena "123,67", que es el valor esperado para un PC con configuración regional española como me parece que es tu caso, por contra, Val ignora la configuración regional y elimina la coma usada como separador decimal y así Val("123,57") da como resultado 12367, pero CDbl respeta la configuración regional y devolverá correctamente 123.57.
Si no es el caso pon el código del botón guardar para ver si puedo ayudarte
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar
sin imagen de perfil

Visual basic y decimales

Publicado por Ruben (3 intervenciones) el 19/12/2021 14:01:08
16399151191434873393007387574758

Aquí está el código del botón guardar
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil

Visual basic y decimales

Publicado por Ruben (3 intervenciones) el 19/12/2021 14:12:12
Listoo, tenias razón respecto al cdbl, lo que hice fue colocar en el calculo de total

Total=cdbl(base_imponible) + cdbl(iva)

Y en mi botón guardar colocar los text que quería double con cdbl de igual forma y listo, muchas gracias!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar