02-07-2021
05:39 AM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
02-07-2021
05:39 AM
try this rule:
Dim doc As PartDocument = ThisDoc.Document For Each sketch As PlanarSketch In doc.ComponentDefinition.Sketches If (Sketch.ConstraintStatus = ConstraintStatusEnum.kUnderConstrainedConstraintStatus) Then MsgBox("Following sketch is under constrained: " & Sketch.Name) End If Next
Jelte de Jong
Did you find this post helpful? Feel free to Like this post.
Did your question get successfully answered? Then click on the ACCEPT SOLUTION button.
Blog: hjalte.nl - github.com