need converting to and formating textbox values to decimal data ty

[Newbee Adam]

I have been reading in help how I need to use decimal becuase currency does
not exist like I used in vb6.
I had a difficult time on google and msdn finding how or if I can take the
value of text box as decimal or do I just have to make another decimal
variable
.. So I took a guess hoping CDec would come up blue if I type it in with no
squigglies on the line. But is this actually converting it to decimal.

Next if so, I do not like the out put to the textboxes
Total: 100
Tax: 4.500 I need it formatted as 4.50
Gross: 95.5
Split: 48 This is not accurate, it is rounding, It should be of course
half of 95.5, 47.75

<code>
Private Sub Button1_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles btnCalc.Click
'Button 1 Calculate
Const Tax As Decimal = 0.045
Dim a As Integer
For a = 1 To 5
lblTotal.Text = CDec(Val(lblTotal.Text)) +
CDec(Val(txtCoinsInArray(a).Text))
Next
If chkUncleSam.Checked = True Then
lblTax.Text = CDec(Val(lblTotal.Text)) * Tax
End If
lblGross.Text = CDec(Val(lblTotal.Text)) - CDec(Val(lblTax.Text))
lblSplit.Text = CDec(Val(lblGross.Text)) \ 2
End Sub
End Class
</code>
--
Adam S

[Cor Ligthert]

Newbee,

Net1.x uses Bankers Rounding and there are no alternatives

http://support.microsoft.com/default...b;en-us;196652

I hope this helps,

Cor

[Patrice]

\ is the integer division ? What if you try / instead ?

Patrice

--

"Newbee Adam" <Ne********@discussions.microsoft.com> a écrit dans le message
de news:45**********************************@microsof t.com...

I have been reading in help how I need to use decimal becuase currency does not exist like I used in vb6.
I had a difficult time on google and msdn finding how or if I can take the value of text box as decimal or do I just have to make another decimal
variable
. So I took a guess hoping CDec would come up blue if I type it in with no
squigglies on the line. But is this actually converting it to decimal.

Next if so, I do not like the out put to the textboxes
Total: 100
Tax: 4.500 I need it formatted as 4.50
Gross: 95.5
Split: 48 This is not accurate, it is rounding, It should be of course
half of 95.5, 47.75

<code>
Private Sub Button1_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles btnCalc.Click
'Button 1 Calculate
Const Tax As Decimal = 0.045
Dim a As Integer
For a = 1 To 5
lblTotal.Text = CDec(Val(lblTotal.Text)) +
CDec(Val(txtCoinsInArray(a).Text))
Next
If chkUncleSam.Checked = True Then
lblTax.Text = CDec(Val(lblTotal.Text)) * Tax
End If
lblGross.Text = CDec(Val(lblTotal.Text)) - CDec(Val(lblTax.Text))
lblSplit.Text = CDec(Val(lblGross.Text)) \ 2
End Sub
End Class
</code>
--
Adam S

[Newbee Adam]

Super Patrice, that was the problem. I will remeber this? "Lean right , to
get the money right!" silly little memory tool!
--
Adam S
"Patrice" wrote:

\ is the integer division ? What if you try / instead ?

Patrice

--

"Newbee Adam" <Ne********@discussions.microsoft.com> a écrit dans le message
de news:45**********************************@microsof t.com...

I have been reading in help how I need to use decimal becuase currency

does

not exist like I used in vb6.
I had a difficult time on google and msdn finding how or if I can take

the

value of text box as decimal or do I just have to make another decimal
variable
. So I took a guess hoping CDec would come up blue if I type it in with no
squigglies on the line. But is this actually converting it to decimal.

Next if so, I do not like the out put to the textboxes
Total: 100
Tax: 4.500 I need it formatted as 4.50
Gross: 95.5
Split: 48 This is not accurate, it is rounding, It should be of course
half of 95.5, 47.75

<code>
Private Sub Button1_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles btnCalc.Click
'Button 1 Calculate
Const Tax As Decimal = 0.045
Dim a As Integer
For a = 1 To 5
lblTotal.Text = CDec(Val(lblTotal.Text)) +
CDec(Val(txtCoinsInArray(a).Text))
Next
If chkUncleSam.Checked = True Then
lblTax.Text = CDec(Val(lblTotal.Text)) * Tax
End If
lblGross.Text = CDec(Val(lblTotal.Text)) - CDec(Val(lblTax.Text))
lblSplit.Text = CDec(Val(lblGross.Text)) \ 2
End Sub
End Class
</code>
--
Adam S

[Newbee Adam]

is Cdec correct to convert decimal datatype, I could not find it in help?
--
Adam S
"Newbee Adam" wrote:

Super Patrice, that was the problem. I will remeber this? "Lean right , to
get the money right!" silly little memory tool!
--
Adam S
"Patrice" wrote:

\ is the integer division ? What if you try / instead ?

Patrice

--

"Newbee Adam" <Ne********@discussions.microsoft.com> a écrit dans le message
de news:45**********************************@microsof t.com...

I have been reading in help how I need to use decimal becuase currency

does

not exist like I used in vb6.
I had a difficult time on google and msdn finding how or if I can take

the

value of text box as decimal or do I just have to make another decimal
variable
. So I took a guess hoping CDec would come up blue if I type it in with no
squigglies on the line. But is this actually converting it to decimal.

Next if so, I do not like the out put to the textboxes
Total: 100
Tax: 4.500 I need it formatted as 4.50
Gross: 95.5
Split: 48 This is not accurate, it is rounding, It should be of course
half of 95.5, 47.75

<code>
Private Sub Button1_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles btnCalc.Click
'Button 1 Calculate
Const Tax As Decimal = 0.045
Dim a As Integer
For a = 1 To 5
lblTotal.Text = CDec(Val(lblTotal.Text)) +
CDec(Val(txtCoinsInArray(a).Text))
Next
If chkUncleSam.Checked = True Then
lblTax.Text = CDec(Val(lblTotal.Text)) * Tax
End If
lblGross.Text = CDec(Val(lblTotal.Text)) - CDec(Val(lblTax.Text))
lblSplit.Text = CDec(Val(lblGross.Text)) \ 2
End Sub
End Class
</code>
--
Adam S

[Newbee Adam]

is Cdec correct for decimal. I search in help and could not find? I just
guess.
--
Adam S
"Patrice" wrote:

\ is the integer division ? What if you try / instead ?

Patrice

--

"Newbee Adam" <Ne********@discussions.microsoft.com> a écrit dans le message
de news:45**********************************@microsof t.com...

I have been reading in help how I need to use decimal becuase currency

does

not exist like I used in vb6.
I had a difficult time on google and msdn finding how or if I can take

the

value of text box as decimal or do I just have to make another decimal
variable
. So I took a guess hoping CDec would come up blue if I type it in with no
squigglies on the line. But is this actually converting it to decimal.

Next if so, I do not like the out put to the textboxes
Total: 100
Tax: 4.500 I need it formatted as 4.50
Gross: 95.5
Split: 48 This is not accurate, it is rounding, It should be of course
half of 95.5, 47.75

<code>
Private Sub Button1_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles btnCalc.Click
'Button 1 Calculate
Const Tax As Decimal = 0.045
Dim a As Integer
For a = 1 To 5
lblTotal.Text = CDec(Val(lblTotal.Text)) +
CDec(Val(txtCoinsInArray(a).Text))
Next
If chkUncleSam.Checked = True Then
lblTax.Text = CDec(Val(lblTotal.Text)) * Tax
End If
lblGross.Text = CDec(Val(lblTotal.Text)) - CDec(Val(lblTax.Text))
lblSplit.Text = CDec(Val(lblGross.Text)) \ 2
End Sub
End Class
</code>
--
Adam S

[Patrice]

This is part of the VB.NET language (i.e. you'll find in the VB.NET language
specification not in the framework class library doc) :
http://msdn.microsoft.com/library/de...Conversion.asp

--
Patrice
"Newbee Adam" <Ne********@discussions.microsoft.com> a écrit dans le message
de news:D1**********************************@microsof t.com...

is Cdec correct to convert decimal datatype, I could not find it in help?
--
Adam S
"Newbee Adam" wrote:

Super Patrice, that was the problem. I will remeber this? "Lean right , to get the money right!" silly little memory tool!
--
Adam S
"Patrice" wrote:

\ is the integer division ? What if you try / instead ?

Patrice

--

"Newbee Adam" <Ne********@discussions.microsoft.com> a écrit dans le message de news:45**********************************@microsof t.com...
> I have been reading in help how I need to use decimal becuase currency does
> not exist like I used in vb6.
> I had a difficult time on google and msdn finding how or if I can take the
> value of text box as decimal or do I just have to make another decimal > variable
> . So I took a guess hoping CDec would come up blue if I type it in with no > squigglies on the line. But is this actually converting it to decimal. >
> Next if so, I do not like the out put to the textboxes
> Total: 100
> Tax: 4.500 I need it formatted as 4.50
> Gross: 95.5
> Split: 48 This is not accurate, it is rounding, It should be of course > half of 95.5, 47.75
>
> <code>
> Private Sub Button1_Click(ByVal sender As System.Object, _
> ByVal e As System.EventArgs) Handles btnCalc.Click
> 'Button 1 Calculate
> Const Tax As Decimal = 0.045
> Dim a As Integer
> For a = 1 To 5
> lblTotal.Text = CDec(Val(lblTotal.Text)) +
> CDec(Val(txtCoinsInArray(a).Text))
> Next
> If chkUncleSam.Checked = True Then
> lblTax.Text = CDec(Val(lblTotal.Text)) * Tax
> End If
> lblGross.Text = CDec(Val(lblTotal.Text)) - CDec(Val(lblTax.Text)) > lblSplit.Text = CDec(Val(lblGross.Text)) \ 2
> End Sub
> End Class
> </code>
> --
> Adam S