Decimal format: P
Imports System Imports Microsoft.VisualBasic Module MainClass Sub Main( ) Dim value As Decimal = 99999.62d Dim specifier As String specifier = "P" Console.WriteLine("{0}: {1}", specifier, (value/10000).ToString(specifier)) End Sub End Module