Add money values?

[Anjari]

Still new to this so please excuse me...

I am adding text boxes but it will only add the whole dollar and return a whole dollar amount. I need to correct this so if someone puts 100.50 in the first text box and 100.75 in the second text box the value will return as: 100.75

here is my code: and suggestions?

'Calculate Monthly Income

'Initiate Variables
Dim intTMI As Integer
Dim intGMI As Integer
Dim intOMI As Integer


'Get Text Box Totals
intGMI = CInt(txtGMI.Text)
intOMI = CInt(txtOMI.Text)

'Show Values
intTMI = intGMI + intOMI
lblTMI.Text = "$"+CStr(intTMI)
lblMI.visible = true
lblTMI.visible = true

thanks!

Anjari

[dj4uk]

You need to use decimal types not integers - integers don't hold decimal places.

Give a shout if you need more info.

DJ

[Anjari]

looks great but some values are showing like this for example: $24000.0000

2 questions... how can I show the comma and shorten the decimal places to two spaces.....For Example: $24,000.00

'Calculate Down Payment

'Initiate Variables
Dim decTDP As Decimal 'Total Dowm Payment
Dim decHV As Decimal 'Home Value
Dim decSTDP As Decimal 'Selection
Dim decODP As Decimal  'Other Down Payment


'Check Selection

if rbYears3.Checked = True then
decSTDP = ".03"

else if rbYears5.Checked = True then
decSTDP = ".05"


else if rbYears10.Checked = True then
decSTDP = ".10"

else if rbYears20.Checked = True then
decSTDP = ".20"

end if

'Check Other Down Payment Value
if txtODP.Text = "" then
txtODP.Text ="0"
End If


'Get Values
decHV = CStr(lblTHV.Text) 'Total Home Value
decODP = CStr(txtODP.Text) 'Other Down Payment

'Show Values
decTDP = decHV * decSTDP - decODP
lblTDP.Text = CStr(decTDP)


lblDP.visible = true
lblTDP.visible = true

[dj4uk]

Well it's not an issue when holding the value in a variable as accuracy is good however I believe you are wanting the decimal to be formated when displayed on page (converted to a string).

A good way is to use the String.Format method which allows you to specify the output format:

decimal inputValue = 24000.0000;

Response.Write(String.Format("${0:0,0.00}", inputValue);

Take a look at http://www.stevex.org/CS/blogs/dotte...icles/158.aspx for more details of String Formatting - I know it says in C# and your using VB.NET but the String.Format method is still available to you.

HTH

DJ