numerical integration on excel vba

e3m88 · **Joined:** Fri May 28, 2010 4:04 am **Posts:** 2

hi, I'm new to excel vba programming, so i was looking for a complete aplied example using de vb6 package, what I need is to define and integrate a function F(x) on a finite interval [a,b].
for example:

Thank you very much!!!

Sergey.Bochkanov · **Joined:** Fri May 07, 2010 7:06 am **Posts:** 927

You should use autogk.bas unit, which requires 16 other units: ap, tsort, hblas, reflections, creflections, sblas, ablasf, ablas, ortfac, blas, rotations, hsschur, evd, gammafunc, gq, gkq.

Use it as follows:

Code:

    Dim State As AutoGKState
    Dim V As Double
    Dim Rep As AutoGKReport

    
    '
    ' f(x) = 3*x^2 + x/2
    ' Exact answer is 2*pi
    '
    Call AutoGKSmooth(3, 5, State)
    Do While AutoGKIteration(State)
        State.F = 3*State.X*State.X + 0.5*State.X
    Loop
    Call AutoGKResults(State, V, Rep)

    ' Now V contains result

e3m88 · **Joined:** Fri May 28, 2010 4:04 am **Posts:** 2

It worked like a charm!!!

thank you.! Great project.

Kokab · **Joined:** Tue Feb 24, 2015 12:17 pm **Posts:** 1

I'm developing an application in VB6 that should interpolate some specific points entered by the user (click with mouse) on a picture control.

forum.alglib.net

Forum rules

numerical integration on excel vba

Who is online