放置文字对象到"文字"图层怎么老是失败!
'放置文字对象到"文字"图层<BR> gpCode(0) = 0<BR> dataValue(0) = "text"<BR> <BR> groupCode = gpCode<BR> dataCode = dataValue<BR> <BR> ObjSelectionSet.Select Mode, , , groupCode, dataCode<BR> <BR> For Each Entry In ObjSelectionSet<BR> Entry.Layer = "Text"<BR> Entry.Update<BR> Next Entry<BR> ObjSelectionSet.Clear <P>确认是否建立了"Text"层</P><P>groupCode = gpCode<BR> dataCode = dataValue<BR> <BR> ObjSelectionSet.Select Mode, , , groupCode, dataCode<BR>没必要吧,直接</P>
<P>ObjSelectionSet.Select Mode, , , gpCode<BR>, dataValue<BR></P>
页:
[1]