Date Functions VisualBasic Script

Sub numFormat()
    dblNumber = 12345.678
    Debug.Print dblNumber
    Debug.Print Format(dblNumber "000000.00")
End Sub