Visual Basic - Como Leer los pixels de un Bitmap?

Este programa lo tenia hace mucho tiempo en GWbasic ahora quiero implementarlo en Visual Basic. quisiera saber si alguno de Uds. tiene el codigo de este procedimiento.

Gracias