SetElementVirtualWorkNamedSetsSelectedForDisplay

SetElementVirtualWorkNamedSetsSelectedForDisplay

Syntax

SapObject.SapModel.DatabaseTables.SetElementVirtualWorkNamedSetsSelectedForDisplay

VB6 Procedure

Function SetElementVirtualWorkNamedSetsSelectedForDisplay 
 (ByRef ElementVirtualWorkNamedSetList() As String) As Integer

Parameters

ElementVirtualWorkNamedSetList

The zero-based list of element virtual work named sets 
 selected for table display.

Remarks

This function sets the element virtual work named sets 
 that are included when displaying analysis results. If no element virtual 
 work named sets are to be selected then the list should include a blank 
 string.

The function returns zero if the information is successfully 
 set, otherwise it returns a nonzero value.

VBA Example

This example assumes that a file MyModel.sdb exists 
 and that it contains element virtual work named sets named Set1 and Set2.

Sub SetElementVirtualWorkNamedSetSelectionData()

'dimension variables

Dim SapObject as cOAPI

Dim SapModel As cSapModel

Dim ret As Long

Dim FileName As String

Dim ItemList() As String

'create Sap2000 object

Set SapObject = CreateObject("CSI.SAP2000.API.SapObject")

'start Sap2000 application

SapObject.ApplicationStart

'create SapModel object

Set SapModel = SapObject.SapModel

'initialize model

ret = SapModel.InitializeNewModel

'open an existing file

FileName = "C:\SapAPI\MyModel.sdb"

ret = SapModel.File.OpenFile(FileName)

fill ItemList

Redim ItemList(1)

ItemList(0) = Set1

ItemList(1) = Set2

'set element virtual work named sets selected for display 
 in the analysis result tables

ret = SapModel. DatabaseTables.SetElementVirtualWorkNamedSetsSelectedForDisplay(ItemList)

'close Sap2000

SapObject.ApplicationExit False

Set SapModel = Nothing

Set SapObject = Nothing

End Sub

Release Notes

Initial release in version 23.00.

See Also

GetElementVirtualWorkNamedSetsSelectedForDisplay