SapObject.SapModel.FrameObj.ChangeName
Function ChangeName(ByVal Name As String, ByVal NewName As String) As Long
Name
The existing name of a defined frame object.
NewName
The new name for the frame object.
The function returns zero if the new name is successfully applied, otherwise it returns a nonzero value.
Sub ChangeFrameObjName()
'dimension variables
Dim SapObject As Sap2000.SapObject
Dim SapModel As cSapModel
Dim ret As Long
'create Sap2000 object
Set SapObject = New SAP2000.SapObject
'start Sap2000 application
SapObject.ApplicationStart
'create SapModel object
Set SapModel = SapObject.SapModel
'initialize model
ret = SapModel.InitializeNewModel
'create model from template
ret = SapModel.File.New2DFrame(PortalFrame,
3, 124, 3, 200)
'change name
ret = SapModel.FrameObj.ChangeName("1",
"MyFrame")
'close Sap2000
SapObject.ApplicationExit False
Set SapModel = Nothing
Set SapObject = Nothing
End Sub
Initial release in version 11.00.