Property MoveSizeFeatures As Boolean

Dim instance As IFeatureManager
Dim value As Boolean
 
instance.MoveSizeFeatures = value
 
value = instance.MoveSizeFeatures

bool MoveSizeFeatures {get; set;}

property bool MoveSizeFeatures {
   bool get();
   void set (bool value);
}

Return Value

Option Explicit

Dim swApp As SldWorks.SldWorks

Dim swModel As SldWorks.ModelDoc2

Dim swFeatMgr As SldWorks.FeatureManager

Sub main()

Set swApp = Application.SldWorks

Set swModel = swApp.ActiveDoc

Set swFeatMgr = swModel.FeatureManager

Debug.Print "Is Instant3D enabled? " & swFeatMgr.MoveSizeFeatures

swFeatMgr.MoveSizeFeatures = False

Debug.Print "Is Instant3D enabled? " & swFeatMgr.MoveSizeFeatures

swFeatMgr.MoveSizeFeatures = True

Debug.Print "Is Instant3D enabled? " & swFeatMgr.MoveSizeFeatures

End Sub