Function ComponentReload2( _
   ByVal Component As System.Object, _
   ByVal ReadOnly As System.Boolean, _
   ByVal Options As System.Integer _
) As System.Integer

Dim instance As IAssemblyDoc
Dim Component As System.Object
Dim ReadOnly As System.Boolean
Dim Options As System.Integer
Dim value As System.Integer
 
value = instance.ComponentReload2(Component, ReadOnly, Options)

System.int ComponentReload2( 
   System.object Component,
   System.bool ReadOnly,
   System.int Options
)

System.int ComponentReload2( 
&   System.Object^ Component,
&   System.bool ReadOnly,
&   System.int Options
) 

Parameters

Component

IComponent2

ReadOnly

True to set Component read-only after reload, false to allow write access

Options

Reload option as defined by swComponentReloadOption_e

Return Value

'VBA

'Preconditions:

'1. Open public_documents\SOLIDWORKS\SOLIDWORKS 2021\samples\tutorial\api\arm2.sldasm.

'2. Open the Immediate window.

'Postconditions:

' Inspect the Immediate window.

'=============================================

Dim swApp As SldWorks.SldWorks
Dim SWMODEL As SldWorks.ModelDoc2
Dim SWASSY As SldWorks.AssemblyDoc
Dim swcomponent As SldWorks.Component2
Dim Error As swComponentReloadError_e
Option Explicit
Sub main()
    Set swApp = Application.SldWorks
    Set SWMODEL = swApp.ActiveDoc
    Set SWASSY = SWMODEL
    Set swcomponent = SWASSY.GetComponentByName("secondgrip-1")
    Debug.Print swcomponent.GetPathName
    Error = SWASSY.ComponentReload2(swcomponent, True, swComponentReloadOption_e.swDontReloadOldComponents)
    Debug.Print "Error code: " & Error
End Sub