Increments by 10, 20, 30

[someone]

Hi All,

I need a function that only allows Increments by 10, 20, 30.....

How do I achieve this in VB Script?

Any help is appreciated.

TIA,

Santosh

[Egbert Nierop \(MVP for IIS\)]

"someone" <so*****@somewhere.com> wrote in message
news:OV**************@TK2MSFTNGP09.phx.gbl...

Hi All,

I need a function that only allows Increments by 10, 20, 30.....

How do I achieve this in VB Script?

Any help is appreciated.

TIA,
Public Function Inc10(inVal)
Inc10 = inVal + 10
End Function

Public Function Inc20(inVal)
Inc20 = inVal + 20
End Function

Public Function Inc30(inVal)
Inc30 = inVal + 30
End Function

--
compatible web farm Session replacement for Asp and Asp.Net
http://www.nieropwebconsult.nl/asp_session_manager.htm

Santosh

[Evertjan.]

someone wrote on 30 dec 2004 in microsoft.public.inetserver.asp.general:

I need a function that only allows Increments by 10, 20, 30.....

How do I achieve this in VB Script?

function myIncrBy(x,y)
if y=10 or y=20 or y=30 then x = x + y
myIncr = x
end function

--
Evertjan.
The Netherlands.
(Please change the x'es to dots in my emailaddress)

[Curt_C [MVP]]

look at Mod()

--
Curt Christianson
Site: http://www.Darkfalz.com
Blog: http://blog.Darkfalz.com
"someone" <so*****@somewhere.com> wrote in message
news:OV**************@TK2MSFTNGP09.phx.gbl...

Hi All,

I need a function that only allows Increments by 10, 20, 30.....

How do I achieve this in VB Script?

Any help is appreciated.

TIA,

Santosh

[thorpe]

if your going to use it with a 'for' loop you can use step.

example;

for i = 0 to 80 step 10
response.write(i) & "<br />"
next

"someone" <so*****@somewhere.com> wrote in message
news:OV**************@TK2MSFTNGP09.phx.gbl...

Hi All,

I need a function that only allows Increments by 10, 20, 30.....

How do I achieve this in VB Script?

Any help is appreciated.

TIA,

Santosh

[Lance Wynn]

Also,

Function Increment(base, additive)
if additive mod 10 = 0 and additive > 0 then
increment = base+additive
end if
end function

might work...

"someone" <so*****@somewhere.com> wrote in message
news:OV**************@TK2MSFTNGP09.phx.gbl...
Hi All,

I need a function that only allows Increments by 10, 20, 30.....

How do I achieve this in VB Script?

Any help is appreciated.

TIA,

Santosh