访问|来访solidworks二次开发-02-用来访问特征的两个API
来学习两个api：

SelectByID2和GetSelectedObject5。这两个函数，第一个通过给出对象的name选择对象。第二个通过启用程序前已经选择的索引得到对象。

看下面程序：

Option Explicit

Dim swApp As SldWorks.SldWorks

Dim Model As ModelDoc2

Dim feature As feature

Dim boolstatus As Variant

 

Sub main()

 

Set swApp = Application.SldWorks

Set Model = swApp.ActiveDoc

 

' 选择叫"拉伸1"的特征

boolstatus = Model.Extension.SelectByID2("拉伸1", "BODYFEATURE", 0, 0, 0, False, 0, Nothing, swSelectOptionDefault)

 

'主要就是这一句话，在写Option Explicit后函数的最后一个参数swSelectOptionDefault可以使用0来代替

' If the selection was successful, that is, "Extrude1" was

' selected and it is a "BODYFEATURE", then get that feature; otherwise,

' indicate failure

If boolstatus = True Then  '如果有“拉伸1”这个特征下面的代码将其选中

    Dim SelMgr As SelectionMgr

    Set SelMgr = Model.SelectionManager

    Set feature = SelMgr.GetSelectedObject5(1) '此处使用一个索引来得到特征

    Debug.Print feature.Name

Else

    Debug.Print "Error"

End If

 End Sub

最后列出这两个函数的VB语法：

ModelDocExtension::SelectByID2



 



Description



This method selects the specified entity.



 



Syntax (OLE Automation)



retval = ModelDocExtension.SelectByID2 ( Name, Type, X, Y, Z, Append, Mark, Callout. SelectOption )




Input:



(BSTR) Name



Name of object to select or an empty string



Input:



(BSTR) Type



Type of object (uppercase) as defined in swSelectType_e or an empty string



Input:



(double) X



X selection location or 0



Input:



(double) Y



Y selection location or 0



Input:



(double) Z



Z selection location or 0



Input:



(VARIANT_BOOL) Append



If...



And if entity is...



Then...



TRUE



Not already selected



 



The entity is appended to the current selection list



Already selected



The entity is removed from the current selection list



FALSE



Not already selected



The current selection list is cleared, and then the entity is put on the list



Already selected



The current selection list remains the same



 



Input:



(long) Mark



Value that you want to use as a mark; this value is used by other functions that require ordered selection



Input:



(LPCALLOUT) Callout



Pointer to the associated callout



Input:



(long) SelectOption



Selection option as defined in swSelectOption_e (see Remarks)



Output:



(VARIANT_BOOL) retval



TRUE if item was successfully selected, FALSE if not




SelectionMgr::GetSelectedObject5



  



Description



This method gets the selected object.



 



Syntax (OLE Automation)



retval = SelectionMgr.GetSelectedObject5 ( AtIndex )




Input:



(long) AtIndex



Index position within the current list of selected items, where AtIndex ranges from 1 to SelectionMgr::GetSelectedObjectCount



Output:



(LPDISPATCH) retval



Pointer to the Dispatch object as defined in swSelType_e; NULL may be returned if type is not supported or if nothing is selected




也可以通过COM使用vc来访问。