Imports System
Public Class Test
Public Shared Sub Main()
Dim d as Decimal = 12250.123
Console.WriteLine(String.Format("{0:0.0000}", d))
End Sub
End Class
SW1wb3J0cyBTeXN0ZW0KClB1YmxpYyBDbGFzcyBUZXN0CglQdWJsaWMgU2hhcmVkIFN1YiBNYWluKCkKCQlEaW0gZCBhcyBEZWNpbWFsID0gMTIyNTAuMTIzCgkJQ29uc29sZS5Xcml0ZUxpbmUoU3RyaW5nLkZvcm1hdCgiezA6MC4wMDAwfSIsIGQpKQoJRW5kIFN1YgpFbmQgQ2xhc3M=