Imports System

Imports Microsoft.VisualBasic

Public Module Module1

    Public Sub Main()

        Dim value as String = "374115.5000"

        Dim df As String = ""

        Console.WriteLine(Format(value, df))

        Console.WriteLine(Format(value, df).Replace(".", ""))

    End Sub

End Module