--------------------- Codigo d3 fu3nt3 en VB5 del program "PRG1" ------------------