Module Example Public Sub Main() Dim posValue As Double = 1234 Dim fmt2 As String = "##;(##)" Console.WriteLine(posValue.ToString(fmt2)) ' Displays 1234 End SubEnd Module