No aparece el valor con decimales en un campo texto

Tengo lo siguiente:

dim prueba2 as double
dim text as string

prueba2 = Me.importe.value (es un campo con formato moneda, pongamos 10.000 €)

text= "hola, el importe es " &prueba2& " €."

El resultado me sale: hola, ¿el importe es 10000?. (¿El euro se me transforma en?)

¿Cómo hago para que me salga: hola, el importe es 10.000 €?

2 respuestas

Respuesta
2

Si tu campo importe lo has declarado cono Moneda, puedes declarar la variable como Currency en vez de Double.

También puedes probar a poner el símbolo a través de su valor ascii, usando la función Chr.

Respuesta
1

Yo probé en un formulario y funciona correctamente con un botón y dos controles. ¿Tendrás algún problema con algún espacio o algo?

Private Sub Comando8_Click()
Dim prueba2 As Double
Dim text As String
prueba2 = Me.importe.Value
Me.text.Value = "hola, el importe es " & prueba2 & "€."
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas