Module Module1 Sub Main() Dim A As Double = 1.23456789 Console.WriteLine("{0, 1:D} {1, 2:D} {2, 3:D}", 1, 2, 3) End Sub End Module
1 2 3