Reputation: 2014
I have a bit of an issue with the following piece of code.
Dim k As Integer
k = (TextBox1.Text - 750) \ 250
MsgBox("There should be " & k & " items")
Lets say that textbox1 has a value of 3050 the outcome would be 9.20 however my Mesagebox returns 9 which is not what I want. In fact, I want to see it without the rounding off
How do I do that?
Upvotes: 0
Views: 105
Reputation: 4579
\
is integer division in VB, so you need to use /
instead.
See here (MSDN Documentation) for more information on VB operators.
Also, as is mentioned in the comments, you're storing k
as an integer - use double
(or whatever) instead.
So, how about:
Dim k As Double
Dim tbText as Double
If Double.TryParse(TextBox1.Text, tbText) Then
k = (tbText - 750) / 250
MsgBox("There should be " & k & " items")
End If
If you're certain that TextBox1.Text
will be a number, you don't have to use TryParse
it like I did - but I don't think you should ever trust a user to get it right...
Upvotes: 3