Saludos, puedes usar la función
round para redondear el número pero antes debes grabar esta información en algun lado (base de datos, archivo, registro).
Código vb:
Ver original'dblTotal es la variable que tiene el resultado de tus operaciones.
'dblAprox es la variable que almacena el valor aproximado.
'Grabas la información de la variable dblTotal
'------------------------------------------------------------
'<- Escribe tu procedimiento para almacenar la información ->
'Aproximar
'---------
dblAprox = round(dblTotal,1)
Espero que te sea de utilidad