网上收集到的VBA使用fillet的实例。
<p>1、在这个帖子处理fillet的一个要点</p><p><a href="http://www.cadtutor.net/forum/showthread.php?t=20725">http://www.cadtutor.net/forum/showthread.php?t=20725</a></p><p>ThisDrawing.SetVariable "FILLETRAD", filrad'-----用setvariable设置内置的fillet的R数字.<br/>Dim commStr As String<br/>commStr = "_FILLET _P " & _<br/>"(handent " & Chr(34) & oPline.Handle & Chr(34) & ")" & vbCr '--------常用的lisp方法处理fillet命令.<br/>ThisDrawing.SendCommand commStr</p><p>2、涉及到双元表</p><p>Fillet命令与鼠标点击的位置有关。从哪一端圆角，就看你鼠标点击的位置了，所以在程序里就有一个特殊的表“双元表”，专门来处理这样的问题。详见<a href="http://www.mjtd.com/Develop/ArticleShow.asp?ArticleID=351">http://www.mjtd.com/Develop/ArticleShow.asp?ArticleID=351</a></p><p>3、<strong>使用SendCommand命令执行fillet倒角功能</strong></p><p><a href="http://www.mjtd.com/BBS/dispbbs.asp?BoardID=4&replyID=42794&id=57020&skin=0">http://www.mjtd.com/BBS/dispbbs.asp?BoardID=4&replyID=42794&id=57020&skin=0</a><br/></p> AutoCAD许多的命令需要传递的是双元表，即对象和选择对象所在的坐标点的表。这样AutoCAD才能判断该处理所选对象的哪个位置。
页:
[1]