Carta de un programador dejando a su novia

Public Function TerminarProyecto(tu as Currency, yo as String ) as Boolean

Cuando inicie este proyecto...lo visualice como una solucion, al paso de codificar los procedimientos y modulos, vi que ya no eran suficientes las funciones que utilizaba para obtener lo que antes era funcional con algunos procedimientos privados, veo que quieres encapsular las rutinas y heredar las clases como si fuera un objeto, sin tomar en cuenta que se requieren nuevos estructuras y variables globales, aun asi es una decision dificil de volver a adaptar el codigo inicial, veo que tantas horas, dias y meses han sido una mala implementacion, tengo que estar depurando constantemente, y esos ciclos crean un overflow por no haber definido antes las variables y olvidar asignar algun valor, crees que tengo la capacidad de adaptar tus variables a la forma variant, pero no...haces que tenga muchos errores, saturas mi memoria, se que tu interfaz para el usuario es muy atractiva, pero en verdad tus codigos estan mal depurados...como vez todo esto me lleva a pensar una cosa...hacer reingenieria o de plano empezar un nuevo proyecto, pero comprenderas eso:

If Proyecto.Adaptacion.Nivel >= "B" then
Set miNuevaSolucion as New Proyecto
TerminarProyecto=False
End
else
Set ProyectoActual = Nothing
IniciarReutilizacionCodigo
TerminarProyecto=True
End if

Despues de haber escrito este analisis, y ver que tus select case no son lo que necesito, termino por ponerte como codigo libre...haber quien le interesa correrte, depurarte y al final se daran cuenta que eres puro codigo basura.

End Function

SendMenssajeGlobal "Como te diste cuenta tuve que analizar tu codigo, ver los errores despues de la depuracion, e implementar una sola funcion para terminar


Fuente: Latinohack