[codepoet]

Description:

Calculates the Percentvalue of a given value depending on a maximum value.

Code

Public Function Percent(ByVal CurrVal As Long, ByVal MaxVal As Long) As Integer
    Return Int(CurrVal / MaxVal * 100 + 0.5)
End Function

originally posted on dotnet-snippets.com

[img]http://i685.photobucket.com/albums/vv215/blackpearl4/THANKS.gif[/img]

If You Like this tutorial, please check out my other tutorials by clicking ==> H3R3

[6e756c6c]

Er....why is it + 0.5 ?

[pr0t0typ3]

Er....why is it + 0.5 ?

I have no idea but I think it is wrong because the returned value will be 0.5 too big

[Fake.]

Use a double not integer to be precise..

Code

CDbl(CurrVal / MaxVal * 100)

And have your inputs doubles too.

[6e756c6c]

This code should be...

Code

Public Function Percent(ByVal current As Double, ByVal maximum As Double) As Integer
        Return current / maximum * 100
    End Function

[codepoet]

all fixed to your preference

[Learn4Life]

There should not be the +0.5 ... anyway in math no.

[codepoet]

@ Learn4Life....im sorry i can't understand your question.