Problema con Decimales

[Ticosoft]

Saludos Amigo.
Tengo un problema, me explico

Tengo un monto, por ejemplo: x= 321,506324
Cuando le aplico formato, de esta manera: x=format(x,"##,##0.00")
El resultado es: 321,5
Necesito que me devuelva el resultado: 321,50 (con el cero)..

Como lo hago.

Probé con tipo de datos, Currency y Double pero me devuelven sin el cero el decimal.

[lojoam]

Buenas, proba de convertirlo a String.
Podes seguir haciendo operaciones aun siendo ese formato, y de esa forma no te redondeara los decimales a 1 solo digito..
Espero te sirva la sugerencia.
Salu2

[zxs23]

Este codigo MsgBox Format("321,506324", "##,##0.00") me arroja 321,51 osea con decimal, comprueba tu variable x o hazlo directamente.

[lojoam]

Código:

Private Sub Command1_Click()
              Dim num As Double
              num = 312.501
              MsgBox Format(num, "##,##0.000")
              MsgBox Format(num, "##,##0.00")
End Sub

Con esa prueba
el 1er msj muestra 312.501
y el 2do msj 312.50
Que serian los valores de un numero "formateado" para mostrar decimales

La misma prueba pero declarando "num" como String me arroja exactamente los mismos resultados.
Espero con esto hayamos resuelto tu problema

[Fw190]

En cualquier lenguaje de programación, 312.501, redondeado a dos cifras decimales, va a dar 312.50, mientras que 312.506 va a dar 312.51.