Inventor Vb.Net "AddIn" dll

Inventor Vb.Net "AddIn" dll

isocam
Collaborator Collaborator
90 Views
1 Reply
Message 1 of 2

Inventor Vb.Net "AddIn" dll

isocam
Collaborator
Collaborator

Can anybody help?

 

I have the following VBA code, for testing, that checks the number of views on a drawing sheet.

 

Set oSheet = oDoc.ActiveSheet

If oSheet.DrawingViews.Count = 0 Then Msgbox("No Drawing Views Found")

 

Does anybody know what the equivalent Vb.Net "AddIn" dll code is?

 

Many thanks in advance!

 

Darren

0 Likes
91 Views
1 Reply
Reply (1)
Message 2 of 2

Curtis_Waguespack
Consultant
Consultant

Hi @isocam, see this example that should work.

 

Dim oDoc As DrawingDocument = ThisApplication.ActiveDocument
Dim oSheet As Sheet = oDoc.ActiveSheet
If oSheet.DrawingViews.Count = 0 Then MsgBox("No Drawing Views Found")

 

EESignature

0 Likes