Supniendo que necesitas realizar el siguiente calculo: 20/7 (valor contenido en un textbox con nombre calculo.txt); y dejarlo con dos decimales o cero, entonces:
calculo.text = Round(20/7,2)
En el cual (20/7) es el valor a redondear; y 2 a la cantidad de decimales...(claro si no deseas decimales omites esta sección de la instrucción).
En tu caso sustituirías el nombre del control TXT por el de la variable (val3)
Estoy algo oxidado en VB (ha recuerdos...) pero espero que esto te sea útil)
Saludos
El ser humano es un ser evolutivo, cada día debe ser mejor!

|