Hola se puede hacer con FormatNumber
El primer parametro de FormatNumber es la expresion despues de la coma, el numero de decimales que quieres mostrar, los demas parametros son opcionales.
te pongo 2 ejemplos:
El primer ejemplo es para que veas el efecto de que quita los decimales dejandolo solo en 2, para ello pon un textbox(textbox1) y un commandbuton(command1)
Private Sub Form_Load()
Text1.Text = "255,3233000"
End Sub
Private Sub Command1_Click()
Text1.Text = FormatNumber(Text1.Text, 2)
End Sub
si quisieras que el contenido de un textbox, no admitiera mas que 2 decimales seria asi:
Private Sub Text1_Change()
Text1.Text = FormatNumber(Text1.Text, 2)
End Sub
salu2