1 Answers
A:
Get Position and Orientation of a Work Plane
Use the WorkPlane.GetPosition method to extract the origin and orientation vectors:
Dim oPartDoc As PartDocument = ThisApplication.ActiveDocument
Dim oCompDef As PartComponentDefinition = oPartDoc.ComponentDefinition
Dim oWorkPlane As WorkPlane = oCompDef.WorkPlanes.Item(1) ' or any specific work plane
Dim origin As Point
Dim xAxis As UnitVector
Dim yAxis As UnitVector
oWorkPlane.GetPosition(origin, xAxis, yAxis)
MsgBox("Origin: " & origin.X & ", " & origin.Y & ", " & origin.Z)
MsgBox("X Axis: " & xAxis.X & ", " & xAxis.Y & ", " & xAxis.Z)
MsgBox("Y Axis: " & yAxis.X & ", " & yAxis.Y & ", " & yAxis.Z)
Find the Best CAD Software
Explore all products with features, pricing, reviews and more
View All SoftwareHelp the community
Be the First to Answer these questions
Disclaimer
Techjockey’s software industry experts offer advice for educational and informational purposes only. A category or product query or issue posted, created, or compiled by Techjockey is not meant to replace your independent judgment.
20,000+ Software Listed
Best
Price Guaranteed
Free Expert
Consultation
2M+
Happy Customers