13.07.2015 Views

CAPÍTULO 1 - Universidad de Sevilla

CAPÍTULO 1 - Universidad de Sevilla

CAPÍTULO 1 - Universidad de Sevilla

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

Departamento <strong>de</strong> Física Aplicada III. <strong>Universidad</strong> <strong>de</strong> <strong>Sevilla</strong>Fig 4.44: Módulo Enfria_TubosSe pue<strong>de</strong> seguir la duración <strong>de</strong>l proceso <strong>de</strong> enfriamiento <strong>de</strong> tubos mediante laevolución <strong>de</strong> una barra <strong>de</strong> proceso, implementada mediante objetos <strong>de</strong> librería “ActiveXControl”:Fig4.45: Objeto “ProgressBar”El objeto ProgressBar va <strong>de</strong>splazando la barra <strong>de</strong> proceso a partir <strong>de</strong>l valor quese le aplica como entrada mediante la fórmula ProgressBar.Value. Este valor <strong>de</strong>be estarentre 0 y 100 y se recoge mediante el bucle For Range. Para que el tiempo total <strong>de</strong>lproceso coincida con el tiempo que tarda la barra en alcanzar el valor final se aña<strong>de</strong> un<strong>de</strong>lay <strong>de</strong>spués <strong>de</strong> cada iteración. El tiempo marcado en el <strong>de</strong>lay se calcula en el objetofórmula a partir <strong>de</strong>l valor t_enfria.149

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!