ywlyqb 发表于 2006-10-7 15:54:00

请问在VBA中,集合中的对象是否存在,怎么进行判断:如图层"01"是否存在?

<P>请问在VBA中,集合中的对象是否存在,怎么进行判断:如图层"01"是否存在?<BR>以下这个VBA语句这么写呢?<BR>If ThisDrawing.Layers.Item("01") Then<BR>因为在VBA中:ThisDrawing.Layers.Item("01"),无论图层"01"是否存在,均返回一个对象,</P>
<P>而在Lisp中:对于if (tblsearch "Layer" "01") (progn<BR>图层"01"存在,则(tblsearch "Layer" "01")返回一个表,可等同于T;<BR>图层"01"不存在,则返回nil.</P>

wyj7485 发表于 2006-10-9 11:08:00

<P>on error resume next</P>
<P>err=0</P>
<P>ThisDrawing.Layers.Item("01").name="01"</P>
<P>if err then msgbox "不存在该层!"</P>

y56y78 发表于 2006-10-14 19:18:00

If Not IsNull(ThisDrawing.Layers.Item("01")) Then
页: [1]
查看完整版本: 请问在VBA中,集合中的对象是否存在,怎么进行判断:如图层"01"是否存在?