CAD开发者社区 › 首页 ›AutoCAD开发文档› AutoCAD 2023 开发者帮助 › 查看内容

AutoCAD 2023 开发者帮助

关于重命名对象（VBA/ActiveX）

2024-5-18 18:54| 发布者: admin| 查看: 110| 评论: 0|原作者: admin|来自: AutoCAD

随着图形变得越来越复杂，可以重命名对象以保持名称的含义，或避免与已插入到主图形中的其他图形中的名称发生冲突。

您可以重命名任何命名对象，但 AutoCAD 默认命名的对象除外，例如图层 0 或 CONTINUOUS 线型。

名称长度最多为 255 个字符。除了字母和数字之外，名称还可以包含空格（尽管 AutoCAD 会删除名称前后直接显示的空格）以及 Microsoft Windows 或 AutoCAD 未用于其他目的的任何特殊字符。不能使用的特殊字符包括小于和大于符号（< >）、正斜杠和反斜杠（/ \）、引号（“）、冒号（:)）、分号（;)）、问号（？）、逗号（，）、星号（*）、竖线（|）、等号（=）和单引号（'）。也不能使用使用 Unicode 字体创建的特殊字符。

若要重命名对象，请使用该对象的属性。Name

重命名图层

此示例创建一个名为“NewLayer”的图层，然后将该图层重命名为“MyLayer”。

Sub Ch4_RenamingLayer()
  ' Create a layer
  Dim layerObj As AcadLayer
  Set layerObj = ThisDrawing.Layers.Add("NewLayer")

  ' Change the name of the layer
  layerObj.Name = "MyLayer"
End Sub