Public Function ModSym( _
ByVal vX As Variant _
, ByVal vY As Variant _
) As VariantY = 6:
* * | * *
* * |* *
-----*-----*-----*-----
* *| * *
* * | * *
* * | * * Y = -6:
* * | * *
* * | * *
* * |* *
-----*-----*-----*-----
* *| * *
* * | * * ModSym(1, 4) = 1
ModSym(2, 4) = -2
ModSym(3, 4) = -1
ModSym(4, 4) = 0
ModSym(5, 4) = 1
ModSym(1, -4) = 1
ModSym(2, -4) = 2
ModSym(3, -4) = -1
ModSym(4, -4) = 0
ModSym(5, -4) = 1See also: ModSymVerify Subroutine
ModAlt Function
ModStd Function
ModOffsetByOne Function
Floor Function
Mod Operator (Visual Basic)
Int Function (Visual Basic)vX: See the Definition. Function returns Null if vX is Null or cannot be fixed up to a number. vY: See the Definition. Function returns Null if vY is Null or cannot be fixed up to a number.
Definitions:
X - Y * Floor(X / Y + .5)
X - Y * Int(X / Y + .5)Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.