**Public Function MakePoint( _
ByVal vX As Variant _
, ByVal vY As Variant _
) As Variant**

**Create a "point" value from two real numbers representing the X and Y coordinates of the point. **

The "point" value is used by the LinesCounterClockwise function.

**Example:** Assuming
Dim varPoint1 As Variant
varPoint1 = MakePoint(2, 3)
for example
VarType(varPoint1) = vbVariant + vbArray
LBound(varPoint1) = 0
UBound(varPoint1) = 1
varPoint1(0) = 2
varPoint1(1) = 3
and
LinesCounterClockwise(varPoint1, varPoint1, varPoint1) = 0

**See also:** MakeLine Function
ArgumentsToVariant Function (more flexible)
LinesCounterClockwise Function

**vX:** Number representing the X-coordinate of the "point" being created.

**vY:** Number representing the Y-coordinate of the "point" being created.

**Note:** Function will always return the "point" even if one or both of the arguments is not a number.

**Note:** The function will generate an error if either of the arguments is an object pointer or an error. Copyright 1996-1999 Entisoft

Entisoft Tools is a trademark of Entisoft.