不知有没有朋友可以帮我解决一下这个问题,我还是一个新手,但是这个问题急需解决,还请会的朋友帮帮忙。
Call main()
Sub main()
strName=CStr("C:\Users\567\Desktop\qiuqiu.3dm ")
Call Rhino.Command("_-Insert _File=_Yes " & strName & " _Block "& " 100,10000,0"&" 10000"&" 90", 0)
End Sub
这段是RhinoScript调用犀牛命令置入文件的代码,但是现在我想在文件插入时能够自己选择插入点,所以我想这样写
arrpoint=Rhino.GetPoint()
Call Rhino.Command("_-Insert _File=_Yes " & strName & " _Block "& " arrpoint"&" 10000"&" 90", 0)
我知道这种写法不对,arrpoint是个数组格式,但是我不知道该怎样写。。。
麻烦会得朋友帮帮忙~
|
|
Call main()
Sub main()
Dim strName
strName = CStr("C:\Users\567\Desktop\qiuqiu.3dm")
Call Rhino.Command("_-Insert _File=_Yes " & Rhino.Pt2Str(strName) & " _Block " & " 100,10000,0" & " 10000" & " 90", 0)
End Sub
举报