fenny 发表于 2005-1-19 11:00:00

请教倒圆角的问题

我想用vb实现如下功能：





                       AcadObj.activedocument.SendCommand "_.fillet" &amp; vbCr &amp; "(handent " &amp; Chr(34) &amp; Arc(0).Handle &amp; Chr(34) &amp; ")" &amp; vbCr &amp; "(handent " &amp; Chr(34) &amp; aLine(0).Handle &amp; Chr(34) &amp; ")" &amp; vbCr<BR>                       AcadObj.activedocument.SendCommand "_.fillet" &amp; vbCr &amp; "(handent " &amp; Chr(34) &amp; Arc(0).Handle &amp; Chr(34) &amp; ")" &amp; vbCr &amp; "(handent " &amp; Chr(34) &amp; aLine(1).Handle &amp; Chr(34) &amp; ")" &amp; vbCr<BR>


但运行结果圆角却只在一个位置出现，请教问题怎么解决？

fenny 发表于 2005-1-19 11:04:00

运行后结果：


页: [1]
查看完整版本: 请教倒圆角的问题