Bueno chicos me aburro...algunas anotaciones [Bacardi] del ejercicio anterior a corregir:
Los parámetros siempre es conveniente poner que se reciben Byval a menos que sea un arreglo, en tal caso será Byref (mirar definiciones por si no se sabe que es, sino lo explico) por más que no sea necesario, es conveniente
Por otro lado, nombres de variables, lo más claro posible, y si van a ser X y/o Y entonces que lleve una abreviación del tipo de dato que és (Ejemplo bytX, BytY, blnVale (booleana), etc)
Los While también deberán ir entre paréntesis sus condiciones, de todas maneras es recomendable usar Do-Loop antes que While-Wend (portabilidad con otros lenguajes)
Comentarizar en cada acción a realizar
Por ahora eso, díganme si quieren seguir con el concurso y después de este ultimo ejercicio, si prefieren otro más divertido