Форумы HiProg.com - MS ACCESS, VBA, VB

ник: Roksolan
Re: http://www.hiprog.com/access/article.asp?id=369 Вид то диаграммы с суммой с накоплением может и есть но мне нужна только точечная диаграмма.
Уже прочитал эту статью. Только вот не работает все равно.
Подскажите что сделал не правильно.
В SQL написал:

SELECT DISTINCT Numeration([Запрос по отрезкам (время и километраж)]![Километраж отрезка, км]) AS Num, SumField([Запрос по отрезкам (время и километраж)]![Километраж отрезка, км]) AS Summa, [Запрос по отрезкам (время и километраж)]![Километраж отрезка, км] AS Выражение1
FROM [Запрос по отрезкам (время и километраж)]
WHERE (((Numeration())=0) AND ((SumField())=0));

Потом создал 2 модуля. 1-й:

Option Compare Database

Public Function Numeration(Optional var) As Long
Static n As Long
If IsMissing(var) Then
n = 0
Else
n = n + 1
End If
Numeration = n
End Function

2-й модуль:

Option Compare Database

Public Function SumField(Optional var) As Double
Static D As Double
If IsMissing(var) Then
D = 0
Else
D = D + Nz(var, 0)
End If
SumField = D
End Function

Подскажите где ошибка? Как сделать чтобы работало?