Se agrega ejemplo de Visual Basic 6