Подсчет пикселей на отрезке

Грузим изображение, делаем чб, считаем количество пересечений отрезка длиной 5 мм с элементами изображения. Или просто черные пиксели

Расположение и ориентация отрезка - автоматически,в районе центра

Желательно VB6, т.к. работы ведутся в нем