delete引起的错误

兰州人

  For ii = 0 To ThisDrawing.ModelSpace.Count - 1
    ThisDrawing.ModelSpace(ii).Delete
  Next ii

如果要单独运行这条,想将ModleSpace中所有的实体册除,肯定会出现如下提示."无效的过程调用或参数"

原因何在.

兰州人

删除指定对象或一组保存了的图层设置。

参阅 | 示例

语法

object.Delete

Object

所有图形对象, Block, Dictionary, DimStyle, Group, Hyperlink, Layer, LayerStateManager, Layout, Linetype, PlotConfiguration, PopupMenuItem, PViewport, RegisteredApplication, SelectionSet, TextStyle, Toolbar, ToolbarItem, UCS, View, Viewport, XRecord
使用该方法的对象。

说明

当用户删除集合中的对象时，集合中所有剩余项目会依据目前的计数重新指定新的索引。因此当处理整个集合时，应避免执行删除对象的循环。例如，下面的VBA代码竟会导致执行错误：
For i = 0 To ThisDrawing.Groups.Count - 1
    ThisDrawing.Groups.Item(i).Delete
Next I

相反，用下列VBA程序代码可删除集合中的所有对象：

for each obj in ThisDrawing.Groups
    obj.Delete
next obj

用户也可以使用下列VBA程序代码来删除集合中单一的成员：

ThisDrawing.Groups.item("group1").Delete

假如用户试图删除集合对象，将导致错误产生。

ToolbarItem: 用户只能在工具栏为可见时才可以加入或删除工具栏项目。

AcadLayerStateManager: 该对象带有一个Name的参数，它是一个表示将要删除的图层状态的字符串。

http://www.mjtd.com/object/acad2004/idh_delete.htm