I need help with this Variable...

[JFulford84]

Can anyone help explain why I'm getting this?
When I do a MsgBox(a/b) the calculation is correct at .5 or 50%. However when I calculate that number then assigned it to variable like resultOf = a/b, it shows resultOf as being 1.

Anyone able to offer any insight?


a = 10,000
b = 20,000

MsgBox(a/b) = .5

Dim resultOf as Long
resultOf = a/b
MsgBox(resultOf) = 1

 

[JoeMo]

Dim resultOf as Double, not as Long.

 

[Ruddles]

Long is an integer type - it doesn't preserve fractional parts.

 

[xenou]

Just as an aside, it makes a difference which way you put the slash (forward or backward):

[COLOR="Navy"]Sub[/COLOR] F00()
[COLOR="Navy"]Dim[/COLOR] ret [COLOR="Navy"]As[/COLOR] [COLOR="Navy"]Double[/COLOR]

    [COLOR="SeaGreen"]'------------------[/COLOR]
    [COLOR="SeaGreen"]'//Division[/COLOR]
    ret = 22 / 7
    [COLOR="Navy"]Debug[/COLOR].[COLOR="Navy"]Print[/COLOR] ret
    
    [COLOR="SeaGreen"]'------------------[/COLOR]
    [COLOR="SeaGreen"]'//Integer Division[/COLOR]
    ret = 22 \ 7
    [COLOR="Navy"]Debug[/COLOR].[COLOR="Navy"]Print[/COLOR] ret

[COLOR="Navy"]End[/COLOR] [COLOR="Navy"]Sub[/COLOR]

ξ

 

[JFulford84]

Thank you! I appreciate it.