CurveByTable.Add Method Arguments

[jwSEI]

Does anyone have experience using CurveByTable in conjunction with VB? If so, could you please briefly explain the proper use of the "Add" method for this object?
I have experimented with various choices for the arguments "Closure", "ClosureType", "UnitType", and "dTolerance" without finding a successful combination. Every time I've run the "Add" method I've received an "Invalid Procedure Call or Argument" error.

A sample line of code would be great, too.

Thanks,
-Jon

 

[jgw33]

I'm having this same problem. Any help would be appriciated.

Thanks,
Josh

 

[jgw33]

Here is a sample I got from Kash J. Rangan at Solid Edge Support. I hope it helps.

Option Explicit

Dim objApp As SolidEdgeFramework.Application
Dim objDoc As SolidEdgePart.PartDocument
Dim objCurveByTable As SolidEdgePart.CurveByTable
Dim objRefPln As RefPlane

Private Sub Form_Load()


Set objApp = GetObject(, "SolidEdge.Application&quot
Set objDoc = objApp.ActiveDocument

'CurveType = only igDirectFit and igLeastSquareFit will work
'Closure = igNormal, igClosed
'ClosureType = igNatural, igPeriodic
'UnitType = Null, Character string

Set objCurveByTable =
objDoc.Constructions.CurvesByTables.Add(filepath:="c:\Vb
Examples\CurveByTable\CurveByTable.xls", _
CurveType:=igLeastSquareFit, _
dtolerance:=0.0001, _
ClosureType:=igPeriodic)

objCurveByTable.Visible = True

End
End Sub

 

[jwSEI]

Thanks for digging this up, Josh. I'm going to give it a try and see if I can get my code working now.

Thanks again,
Jon

 

[Mlody]

Does anyone have experience using Threads in conjunction with VB? If so, could you please briefly explain the proper use of the "Add" method for this object?

A sample line of code would be great, too.

Thanks,
Mlody