Visual Basic - Busqueda de un punto en un picture

Desde un picturebox tengo una imagen con fondo blanco y un punto negro que puede estar en cualquier parte de la imagen(resolución 640x480).
Con dos bucles For, hago que busque este punto para que me diga las
coordenadas pero la verdad es que es muy lento (al menos 10 segundos) aunque ponga en los For step 10.

For x = 1 To Picture1(0).Width Step 5
For y = 1 To Picture1(0).Height Step 5
PuntoNegro = Picture1(0).Point(x, y)
........

Alguien conoce otro método más eficaz para realizar esta busqueda más rápida.

Desde ya, gracias!!

La verdad es que ese método es muy poco efectivo. Cada vez que efectúas una llamada al método Point, VB tiene que aobtener un "handle" al bitmap, a partir del cual obtiene un "handle" a la memoria que contiene la definición de los puntos, a partir del cual se leen los bytes que contienen el color del pixel solicitado y convertirlo al formato adecuado. En fin, un rollo.

Comohaber, si hay un método más efectivo (mucho más efectivo), aunque más complicado. Mediante el API de Windows es posible hacer una copia de los bits del bitmap a un array de VB (por medio de la función GetDIBits, por ejemplo). Examinando este vector y conociendo la estructura interna del bitmap es posible localizar un grupo de bits que correspondan al color solicitado y obtener sus coordenadas a partir de la posición que ocupan en el vector. ¿Te animas?

Gracias por la ayuda, ahora solo queda probarlo

Un saludo