msfx 发表于 2006-6-8 11:29:00

请高手赐教:怎样进行多步操作???

请高手指教,我在cad2002里,通过vba怎么实现在画ployline的同时,在它的每个顶点再自动插入一个图块,自己想了两天,没有想出来,所以只有请教高手了,小弟不胜感激。

xinghesnak 发表于 2006-6-8 11:47:00

同时不太可能,只能分成两步;要么先画线再插入图块,要不就反过来。。。。

zxj_76 发表于 2006-6-8 17:03:00

可以啊,但不能用PLINE命令画,需要自己做一个程序的了。

xinghesnak 发表于 2006-6-9 08:02:00

3楼楼主,你说可以同时画,那么请赐教,我们学习一下喽!

zxj_76 发表于 2006-6-12 08:22:00

<P>大概思路如下:</P>
<P>I=0</P>
<P>Do</P>
<P>&nbsp;&nbsp; GetPoint……</P>
<P>&nbsp;&nbsp; If Err Then Exit Do</P>
<P>&nbsp;&nbsp; I=I+1</P>
<P>&nbsp; InsertBlock……</P>
<P>&nbsp;&nbsp;Select Case I</P>
<P>&nbsp;&nbsp;&nbsp; case 1</P>
<P>&nbsp;&nbsp;&nbsp; case 2, AddLightWeightPolyline</P>
<P>&nbsp;&nbsp;&nbsp; case Else:&nbsp; .AddVertex I-1, Vtex</P>
<P>loop</P>
页: [1]
查看完整版本: 请高手赐教:怎样进行多步操作???