Message 1 of 3
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
Hi,
I am trying to place a WorkPoint on an OrientedMinimumRangeBox.CornerPoint, but it throws up an error.
Dim oPart As PartDocument = ThisApplication.ActiveDocument
Dim C As PartComponentDefinition = oPart.ComponentDefinition
Dim Solid As SurfaceBody = C.SurfaceBodies(1)
Dim OBOX As OrientedBox = Solid.OrientedMinimumRangeBox
Dim V1, V2, V3 As Vector
Dim oPoint As Point
OBOX.GetOrientedBoxData(oPoint, V1, V2, V3)
MessageBox.Show("oPoint.X : " & oPoint.X, "oPoint is a " & TypeName(oPoint))
C.WorkPoints.AddByPoint(oPoint, False)
I am using Autodesk Inventor 2022 Build 153. I am not sure if I am doing anything wrong, or it is a bug with my version.
Solved! Go to Solution.