Adding numbers in text box

[Doug Loewen]

I have a form with 3 text boxes. I want to add the values
in each to get a total and show the total in a label. I'm
using this code:
Total = txtHouseCost.Value + txtLotCost.Value +
txtOptionCost.Value
lblTotalNum = Total
If I enter a 1, a 2 and a 3 in each box I get 123 not 6.
It looks like I am concattinating, not summing.
What have I missed?
Thanks for the help!

[JulieD]

Hi Doug

By default textboxes entries are treated as "text" - so you need to coerce
the results to a number

using one of the following functions
> Total = CINT(txtHouseCost.Value) + CINT(txtLotCost.Value) +
> CINT(txtOptionCost.Value)
or
> Total = CDBL(txtHouseCost.Value) + CDBL(txtLotCost.Value) +
> CDBL(txtOptionCost.Value)
or
> Total = val(txtHouseCost.Value) + val(txtLotCost.Value) +
> val(txtOptionCost.Value)
or even
> Total = --(txtHouseCost.Value) + --(txtLotCost.Value)
> + --(txtOptionCost.Value)

Cheers
JulieD


"Doug Loewen" <[email protected]> wrote in message
news:[email protected]...
>I have a form with 3 text boxes. I want to add the values
> in each to get a total and show the total in a label. I'm
> using this code:
> Total = txtHouseCost.Value + txtLotCost.Value +
> txtOptionCost.Value
> lblTotalNum = Total
> If I enter a 1, a 2 and a 3 in each box I get 123 not 6.
> It looks like I am concattinating, not summing.
> What have I missed?
> Thanks for the help!

[Bob Phillips]

Interestingly, it doesn't seem to be necessary to coerce all of the textbox
values, just one seems to do. So

CInt(txtHouseCost.Text) + txtLotCost.Text + txtOptionCost.Text

works. I don't think I would personally recommend it, I wouldn't like to
rely on this 'fetaure' always working, but it is interesting.

You can also use +0 or *1 as operators. Probably best to avoid Cint or CLng
for flexibility.

--

HTH

RP
(remove nothere from the email address if mailing direct)


"JulieD" <[email protected]> wrote in message
news:[email protected]...
> Hi Doug
>
> By default textboxes entries are treated as "text" - so you need to coerce
> the results to a number
>
> using one of the following functions
> > Total = CINT(txtHouseCost.Value) + CINT(txtLotCost.Value) +
> > CINT(txtOptionCost.Value)
> or
> > Total = CDBL(txtHouseCost.Value) + CDBL(txtLotCost.Value) +
> > CDBL(txtOptionCost.Value)
> or
> > Total = val(txtHouseCost.Value) + val(txtLotCost.Value) +
> > val(txtOptionCost.Value)
> or even
> > Total = --(txtHouseCost.Value) + --(txtLotCost.Value)
> > + --(txtOptionCost.Value)
>
> Cheers
> JulieD
>
>
> "Doug Loewen" <[email protected]> wrote in message
> news:[email protected]...
> >I have a form with 3 text boxes. I want to add the values
> > in each to get a total and show the total in a label. I'm
> > using this code:
> > Total = txtHouseCost.Value + txtLotCost.Value +
> > txtOptionCost.Value
> > lblTotalNum = Total
> > If I enter a 1, a 2 and a 3 in each box I get 123 not 6.
> > It looks like I am concattinating, not summing.
> > What have I missed?
> > Thanks for the help!
>
>