Download OpenSTAAD User Manual

4.2 Geometry Functions
Geometry.GetNoOfSelectedSolids
Returns the number of selected solids.
VB Syntax
Geometry.GetNoOfSelectedSolids ()
Return Value
A Long variable containing the number of solids selected.
VB Example
Dim objOpenSTAAD As Object
Dim SelSolidsNo As Long
'Get the application object -'Get no. of selected solids
SelSolidsNo = objOpenSTAAD.Geometry.GetNoOfSelectedSolids
Geometry.GetPlateCount
This function returns the number of plates in the currently open STAAD file.
VB Syntax
Geometry.GetPlateCount ()
Return Value
(Numeric value) The total number of plates in the model as a long variable.
VB Example
Dim objOpenSTAAD As Object
Dim lPlateCount as Long
'Get the application object
Set objOpenSTAAD = GetObject( , "StaadPro.OpenSTAAD")
'Get Plates Count
lPlateCount = objOpenSTAAD.Geometry.GetPlateCount ()
Geometry.GetPlateIncidence
Returns the connecting joints of the specified plate.
VB Syntax
Geometry.GetPlateIncidence PlateNo, NodeA, NodeB, NodeC, NodeD
Where:
54 — OpenSTAAD V8i (SELECTseries 4)