Contact: aviboots(AT)netvision.net.il
39,890 questions
51,819 answers
573 users
Imports System Public Class Test Public Shared Sub Main() Dim f As Single = 83521.9767F Dim s As String = Format(f, "0.00") Console.Write(s) End Sub End Class ' run: ' ' 83521.98 '