Duh...How do you define a vector in VBScript?

Replies to This Discussion

Permalink Reply by Caglar on April 27, 2011 at 4:00am

You can create a vector with two points, let's say p1 and p2:

 

Dim vec As New Vector3d(p1.X - p2.X, p1.Y - p2.Y, p1.Z - p2.Z)

 

And other than Vector3d.VectorAngle method in rhinocommon, attached VB component computes angle between vectors, returning + and - values as well.

Attachments:

• vecAngles.ghx, 31 KB

Permalink Reply by David Rutten on April 27, 2011 at 6:38am

Or use the subtraction operator directly:

 

Dim vec As Vector3d = p2 - p1

 

--

David Rutten

david@mcneel.com

Turku, Finland

Permalink Reply by eric brown on April 27, 2011 at 10:40am

Got it.

thx