OpenSTAAD V8i
This function adds a plate element between existing nodes.
Where:
Long variables, provide element connectivity.
(Boolean) True (1) if the function is successful, false (0) otherwise.
Dim objOpenSTAAD As Object
Dim NodeA As Long
Dim NodeB As Long
Dim NodeC As Long
Dim NodeD As Long
'Get the application object --
'Add a plate connected between nodes 2, 4, 5 and 6
NodeA = 2
NodeB = 4
NodeC = 5
NodeD = 6
objOpenSTAAD.Geometry.AddPlate NodeA, NodeB, NodeC, NodeD