Display commas in textbox VB.net

Question

I have a textbox that gets a value from a calculation. I'm trying to get it to display commas when the value is over 999.99 I've tried Convert.ToDecimal and Convert.ToString but it doesn't seem to work. Here is the code that populates the field. Any help would be greatly appreciated.

IskMade1.Text = Convert.ToDecimal(IPU1.Text) * Convert.ToDecimal(Units1.Text)

The IskMade1 field displays the decimal correctly, but it isn't adding any commas to the number.

possible duplicate of [Format a number to display a comma when larger than a thousand](http://stackoverflow.com/questions/19999560/format-a-number-to-display-a-comma-when-larger-than-a-thousand) — OneFineDay, Apr 23 '15 at 03:27

score 4 · Accepted Answer · 2015-04-23T03:38:20.717

Provided you have some MyDecimalVariable variable in which you store the decimal values you could format the TextBox text as follows:

Dim MyDecimalVariable As Decimal = 1234.56
IskMade1.Text = MyDecimalVariable.ToString("#,##0.00")

or you could have:

Dim MyDecimalVariable As Decimal = 1234.56
IskMade1.Text = MyDecimalVariable.ToString("N", CultureInfo.InvariantCulture)

in which case you would need to import the System.Globalization namespace.

score 0 · Answer 2 · answered Apr 23 '15 at 03:33

If IPU1 and Units1 are TextBoxes, you should check that the Text property can be converted to a number before doing the conversion. Decimal.TryParse can do that for you. Then use ToString("N") to convert to a string with comma separators, or ToString("N2") if you want to show two decimal places.

Dim ipuNum, units as Decimal
If Decimal.TryParse(IPU1.Text, ipuNum) AndAlso Decimal.TryParse(Units1.Text) Then
    IskMade1.Text = (ipuNum * units).ToString("N")
Else
    'Error processing goes here
End If

What you do for error processing is up to you. You could use MessageBox.Show to display an error message and (if this is a Button Click handler) Exit Sub

Display commas in textbox VB.net

2 Answers2