Renames an existing layer state.
Rhino.RenameLayerState (strOldState, strNewState)
|
strOldState |
Required. String. The name of an existing layer state. |
|
strNewState |
Required. String. The new layer name. |
|
Boolean |
True or False indicating success of failure. |
|
Null |
If not successful, or on error. |
Sub TestRenameLayerState
Dim objPlugIn
On Error Resume Next
Set objPlugIn = Rhino.GetPluginObject("Rhino Bonus Tools")
If Err Then
MsgBox Err.Description
Exit Sub
End If
Call objPlugIn.RenameLayerState("Layer State 01", "MyLayerState")
End Sub