Contact: aviboots(AT)netvision.net.il
31,037 questions
40,879 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 '