RE: Measure of distances in VBA

[quote user="Jon Summers"]

RodWing

I wrote a VBA tip a few years ago on one way to handle it

Good tip!

MicroStation VBA has functions that do something similar for the UDTs.  For example...

• Point2dEqualTolerance (p1, p2, tolerance)
• Point3dEqualTolerance (p1, p2, tolerance)
• Vector3dEqualTolerance (v1, v2, tolerance)
• BsplineCurve.ComputeMinimumDistance (ClosestPoint, ClosestParameter, FromPoint, Rotation [, Tolerance])
• Range3dEqualTolerance (Range0, Range1, Tolerance)
• IntersectRay3d (IntersectionPoint, Parameters, Ray [, Tolerance])

[/quote]

Thank you.

Unfortunately the AutoCAD and Civil 3D API's lack a lot of those types of functions which means I have to develop my own.

To help make modules more portable between AutoCAD and MicroStation I will use my own utility functions in MicroStation applications even if there is something comparable available in the MicroStation API.

I wrote a tip on that too! :)

http://envisioncad.com/tips/create-portable-functions/