Count Method

cPropMaterial Count Method

CSi API ETABS 2015

Gets the total number of defined material properties in the model. If desired, counts can be returned for all material properties of a specified type in the model.

Namespace: ETABS2015
Assembly: ETABS2015 (in ETABS2015.dll) Version: 15.0.0.0 (15.0.0.0)

Syntax

C++

Copy to Clipboard Print

int Count(
	eMatType MatType = 
)

int Count(
	eMatType MatType = 
)

Function Count ( _
	Optional MatType As eMatType =  _
) As Integer

Function Count ( _
	Optional MatType As eMatType =  _
) As Integer

int Count(
	eMatType MatType = 
)

int Count(
	eMatType MatType = 
)

Parameters

MatType (Optional): Type: ETABS2015 eMatType
This optional value is one of the items in the eMatType enumeration.

Return Value

Returns the total number of defined material properties in the model. If desired, counts can be returned for all material properties of a specified type in the model.

Remarks

Examples

C++

Copy to Clipboard Print

Public Sub Example()
       Dim SapModel As cSapModel
       Dim EtabsObject As cOAPI
       Dim ret As Integer = -1 
       Dim Count as Integer 

   'create ETABS object
       EtabsObject = CreateObject("CSI.ETABS.API.ETABSObject")

   'start ETABS application
       ret = EtabsObject.ApplicationStart()

   'create SapModel object
       SapModel = EtabsObject.SapModel

   'initialize model
       ret = SapModel.InitializeNewModel()

   'create steel deck template model
       ret = SapModel.File.NewSteelDeck(4,12,12,4,4,24,24)

   'return number of defined material properties of all types
       Count = SapModel.PropMaterial.Count

   'close ETABS
       EtabsObject.ApplicationExit(False)

   'clean up variables
       SapModel = Nothing
       EtabsObject = Nothing 
   End Sub

Public Sub Example()
       Dim SapModel As cSapModel
       Dim EtabsObject As cOAPI
       Dim ret As Integer = -1 
       Dim Count as Integer 

   'create ETABS object
       EtabsObject = CreateObject("CSI.ETABS.API.ETABSObject")

   'start ETABS application
       ret = EtabsObject.ApplicationStart()

   'create SapModel object
       SapModel = EtabsObject.SapModel

   'initialize model
       ret = SapModel.InitializeNewModel()

   'create steel deck template model
       ret = SapModel.File.NewSteelDeck(4,12,12,4,4,24,24)

   'return number of defined material properties of all types
       Count = SapModel.PropMaterial.Count

   'close ETABS
       EtabsObject.ApplicationExit(False)

   'clean up variables
       SapModel = Nothing
       EtabsObject = Nothing 
   End Sub