[newbie2vb]

جرب هذا الكود ايضا:

Private Sub TextBox1_Leave(sender As Object, e As EventArgs) Handles TextBox1.Leave
Dim number As Decimal = TextBox1.Text
TextBox1.Text = FormatNumber(number, 0)
End Sub