Solid Edge Framework Type Library > SolidEdgeTCE Object : AddOrRemoveItemsToOrFromProjects Method |
This is two dimensional array.
Visual Basic |
---|
Public Sub AddOrRemoveItemsToOrFromProjects( _ ByRef pvarItemInfoToAddOrRemoveToProjects As Variant _ ) |
This is two dimensional array.
Option Explicit Sub Example() Dim objApplication As SolidEdgeFramework.Application Dim objTCE As SolidEdgeFramework.SolidEdgeTCE Dim ItemInfoToAddOrRemoveToProjects(0, 2) As Variant Set objApplication = GetObject(, "SolidEdge.Application") Set objTCE = objApplication.SolidEdgeTCE ItemInfoToAddOrRemoveToProjects(0, 0) = "002359" ItemInfoToAddOrRemoveToProjects(0, 1) = "1987;1996;2000" ItemInfoToAddOrRemoveToProjects(0, 2) = "1983;1985" Call objTCE.AddOrRemoveItemsToOrFromProjects(ItemInfoToAddOrRemoveToProjects) If Not objApplication Is Nothing Then Call objApplication.Quit End If Set objTCE = Nothing Set objApplication = Nothing End Sub