longqpqp-001 发表于 2002-10-20 16:19:00

我能画出来!给我发邮件吧!LONGQPQP-0011@163.COM

Terrywinner 发表于 2002-10-22 23:30:00

回复

用MDT啦！

xh_ldh 发表于 2002-10-23 01:04:00

求助VBA

leeyeafu
    你好！
如何使Set sset = ThisDrawing.SelectionSets.Add("SS6")能重复使用
Sub Ch4_AddToASelectionSet()
Dim sset As AcadSelectionSet
Dim OffsetValue As Double
OffsetValue = ThisDrawing.Utility.GetReal("请输入偏移距离：")
Set sset = ThisDrawing.SelectionSets.Add("SS6")
' 提示用户选择对象并将它们添加到选择集中。
' 要完成选择，按回车。
sset.SelectOnScreen
' 在选择集中循环并将每一对象上下(左右）偏移。
Dim Obj As AcadEntity
For Each Obj In sset
Obj.Offset OffsetValue
Obj.Offset -OffsetValue
Next Obj
Set sset = Nothing
End Sub
谢谢回答！！

杜康醉酒 发表于 2002-10-27 18:05:00

我也能画出来。你问我呀！！

你问我吧，e-mail:xhhcad@hotmail.com

wen2_79 发表于 2002-10-29 22:47:00

能够讲一下怎样做的吗

我很菜，所以请说详细点。

陈伯雄 发表于 2002-10-30 08:01:00

这是在Inventor中完成的。

kiss_mouse 发表于 2003-10-23 22:48:00

在AUTOCAD里面怎么画螺旋线

sibei 发表于 2003-10-30 22:06:00

龙龙仔，有设计2维弹簧的程序吗？

love820710 发表于 2003-10-31 16:02:00

这样的弹簧我是望尘莫及！但是仅仅一个弹簧不用都说的那么复杂吧·！这些都要设计编程吗？？
页: 1 2 [3]
查看完整版本: 请问如何画三维弹簧？