gyhk02 发表于 2013-6-11 12:33:32

rvb代码 ，双轨扫掠圆环无效，请大虾看看

如下图，实现双轨扫掠的功能，但是左上角与右下角的两个断面怎么都无效，请大虾看看是怎么回事？




        Dim crv1, crv2, arrLine()
        ReDim arrLine(1)
               
        crv1 = rhino.GetObject("select crv1")
        crv2 = rhino.GetObject("select crv2")
       
        arrLine(0) = rhino.GetObject("select line0")
        arrLine(1) = rhino.GetObject("select line1")
       
        Call Rhino.AddSweep2(array(crv1, crv2), arrLine)

gyhk02 发表于 2013-6-13 09:10:36

兄弟，如果看错了没有关系，建议别跟贴。

我以前一般看到有人跟过贴就不会看的了。会以为问题解决了。

没有半点怪你的意思。。。

mOLerX/可爱 发表于 2013-6-13 10:57:42

不懂~楼主加油~
页: [1]
查看完整版本: rvb代码 ，双轨扫掠圆环无效，请大虾看看