Renames an existing layer.
Rhino.RenameLayer (strOldName, strNewName)
|
strOldName |
Required. String. The name of an existing layer. |
|
strNewName |
Required. String. The new layer name. |
|
String |
The new layer name if successful. |
|
Null |
If not successful, or on error. |
Dim strOldName, strNewName
strOldName = Rhino.GetString("Old layer name")
If Not IsNull(strOldName) Then
strNewName = Rhino.GetString("New layer name")
If Not IsNull(strNewName) Then
Rhino.RenameLayer strOldName, strNewName
End If
End If