finding value of #'s to right of decimal point

[johnnyv]

just curious more than anything with this one

When using VB I can take the number 3.75 and find out the value of the number to the right of the decimal point In this case 75
can this be done with in vbscript? If so How?

What I need to do is determine if a number stored in a variable can be divided evenly by 4 and if not how much do I need to add to the orginal number to make it divide by 4 evenly

Thanks

 

[Zymurgyst]

johnnyv,
I'll take a hack at it...

Option Explicit

Dim a, b

a = 3.75
b = a - int(a)
b = b * 10 ^ (Len(CStr(b)) - 2) ' subtract 2 from length to account for "0."

Zy

 

[PHV]

Try something like this:

x="3.75": d=""
i=Instr(x,".")
If i>0 Then d=Mid(x,i+1)

But for your purpose, why don't use the Mod operator ?


Hope This Help
PH.

 

[tsuji]

Hello,

My version would be based on fix() more than anything else.

Try with
t=+3.756789
and
t=-3.756789
to see the difference.

s=t-fix(t)
s=fix(s*100) 'n digit : 10^n
wscript.echo s

regards - tsuji

 

[johnnyv]

thanks guys I will play with it today

 

[mrmovie]

and one for the cheap seats...
use the split() command, and take the second element in the array

regards
mrmovie