Fejl i "Løbende sum"

Jeg får fejl når jeg opretter et felt i form som har en løbende sum i en Qry som postkilde.Qry virker ok.
Jeg har f.eks. tre poster i Qry som er henholdsvis 1-2-3(1+1+1 i det felt der bliver summet på.
Når jeg åbner form viser post 1 korrekt også post 2 og 3 og når jeg vælger ny post  "0" alt korrekt, men går jeg så tilbage til post 2 på postvælger, summes post 2 engang til.
Vælger jeg at oprette endnu et felt i samme form som også har en løbende sum i Qry som postkilde summes det med i det første felt, så noget er tydeligvis forkert, men hvad????

Funktionen er indsat i et modul.

Public Function LøbendeSum(Værdi As Single, Optional Reset As Boolean) As Single
    Static tmpVærdi As Single
    If Reset Then tmpVærdi = 0
    tmpVærdi = Værdi + tmpVærdi
    LøbendeSum = tmpVærdi

Indsat i Qry
LøbendeSum([kl];IIf([id]=DFirst("[id]";"Tabel1");Sand;Falsk))