[求助]：请问高手：autocad基本建模失败是怎么回事？

sharksun

我在调用生成样条函数的程序：

Call AddSpline(fitPoints, StartTan, EndTan)
（addspline是一个addspline的基函数）
提示：autocad中发生基本建模失败。错误行为：

'创建样条曲线,vecSt:起点的切向，vecEn:终点的切向
Public Function AddSpline(ByRef ptArr() As Double, ByVal vecSt As Variant, ByVal vecEn As Variant) As AcadSpline
   
    '错误处理：判断数组的有效性
    If (UBound(ptArr) + 1) Mod 3 <> 0 Then
        MsgBox "数组参数无法创建样条曲线！"
        Exit Function
    End If
   
    Set AddSpline = AcadApp.ActiveDocument.ModelSpace.AddSpline(ptArr, vecSt, vecEn)
End Function


我查看了一下参数的有效性，确实没有问题。另外，这个函数在前面已经调用了多次，没有发生任何错误，搞不明白是怎么回事。


多谢赐教。感激不尽。

sdxylijian

把该部分的源程序和数据上传，大家操作之后才会得到准确的结论。没有相应的数据文件，很难对程序代码下定义的。