Ajusto ejemplo para Visual Basic scripting