Module Module1 Sub Main() Dim A As Double = 1.23456789 Console.WriteLine("{0, 0:#.#}", A) Console.WriteLine("{0, 0:#.###}", A) Console.WriteLine("{0, 0:#.#####}", A) End SubEnd Module 1.21.2351.23457