prototipo con VB de pepe