Cantidad de decimales

 Dim n As Double = 56.7865
  n = n.ToString("N3")
  n = Math.Round(n, 3)


fuente: https://stackoverflow.com/questions/16209509/what-is-tostringn0-format