You're using VB.NET with the ActiveX API.
You will get more help in the VBA newsgroup.
--
http://www.caddzone.com
AcadXTabs: MDI Document Tabs for AutoCAD 2009
Supporting AutoCAD 2000 through 2009
http://www.acadxtabs.com
wrote in message news:5895723@discussion.autodesk.com...
I am trying to collect all the dimensions in my -refedit session...
My code follows...
---snip---
Dim ssetObj As AcadSelectionSet
ssetObj = objAcad.SelectionSets.Add("SS1")
ssetObj.Select(AcSelect.acSelectionSetA ll, , , "0", "DIMROTATED")
Dim S1 As AcadDimRotated
For Each S1 In ssetObj
MsgBox(S1)
Next S1
---snip---
It seems pretty simple...can anyone see what's going wrong or maybe have a better way?
All cards and letters appreciated!
I solved my earlier REFEDIT open and closing issues by using the following code (in case anyone can use it)...
objAcad.ActiveDocument.SendCommand("(setq EN1 (entlast)) ")
objAcad.ActiveDocument.SendCommand("(command ""-refedit"" & ""(cadr EN1)"" & vbCr & ""ok"" & vbCr & ""a"" & vbCr & vbCr) ")
DimStyleAdjust() '<-- THIS IS THE SUB WHERE I NEED TO PUT MY DIMENSION SELECTION SET STUFF
objAcad.ActiveDocument.SendCommand("(command ""refclose"" ""S"") ")
ROCK ON...TALK 'ATCHA LATER...keep those cards and letters coming!
