Visual Basic - Ayuda con funcion en Visual Basic

Primero que todo, muchas gracias de antemano. Mira mi problema es el siguiente:
tengo una matriz binaria de 10x10 ( o sea llena de 1s y 0s); necesito crear un procedimiento o funcion que me llene otra matriz de la misma dimension pero de la siguiente manera:
si estoy en la posicion 1,1 de la primera matriz, necesito que me ponga en la posicion 1,1 de la segunda matriz la suma de los "unos" que se encuentren en las ocho posiciones vecinas de la posicion 1,1 de la primera matriz. El mismo procedimiento se seguiría con las demas posiciones de la matriz de tal manera que al final, la segunda matriz me indique en cada posicion el total de "numeros uno" que existen al rededor de esa misma posicion pero en la matriz uno.

Tío, es sólo puro cálculo y 2 for anidados... inténtalo:
** una idea muy general **

1º creas la matriz virtual A y la llenas con 1/0;
2º creas la otra matriz virtual B vacía.
3º For i=0 to N_CUADROS
For j=0 to N_CUADROS
<cálculos para colocar 0/1>
<matriz_B(i,j)= 0/1 según proceda>
next
next

4º muestras ambas matrices, por ejemplo usando el método 'print' sobre el formulario principal (en el background).
Si tienes algún problema te aconsejo mirar la ayuda que acompaña al
programa ;-)