18.01.2013 Views

Programación en Visual Basic 2008

Programación en Visual Basic 2008

Programación en Visual Basic 2008

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.

En el sigui<strong>en</strong>te procedimi<strong>en</strong>to se establecerá un punto de interrupción y se<br />

examinará el código para <strong>en</strong>contrar el error.<br />

Inténtelo<br />

Para establecer un punto de interrupción y recorrer el código<br />

En el Editor de código, busque la línea hours = minutes / 60 y haga clic<br />

<strong>en</strong> el marg<strong>en</strong> izquierdo.<br />

Aparecerá un punto rojo <strong>en</strong> el marg<strong>en</strong> y el código resaltado <strong>en</strong> rojo, lo que<br />

repres<strong>en</strong>ta un punto de interrupción.<br />

Presione F5 para ejecutar el programa nuevam<strong>en</strong>te. En el primer cuadro de<br />

texto, escriba 10 y <strong>en</strong> el segundo cuadro de texto, escriba 5. Haga clic <strong>en</strong><br />

Button1.<br />

El programa se det<strong>en</strong>drá cuando llegue al punto de interrupción. La línea<br />

hours = minutes / 60 aparecerá resaltada <strong>en</strong> amarillo.<br />

Inspeccione los valores de las variables mant<strong>en</strong>i<strong>en</strong>do el mouse sobre ellos; el<br />

valor de hours debe ser 0 y el valor de minutes debe ser 10.<br />

Presione F8 para ejecutar la línea hours = minutes / 60 y pasar a la<br />

sigui<strong>en</strong>te línea.<br />

Inspeccione los valores de las variables de la línea MsgBox("Average<br />

speed " & GetMPH(hours, miles)), el valor de hours debe ser ahora<br />

0.166666672 y el valor de miles debe ser 5.0.<br />

Presione F8 de nuevo para ejecutar la línea actual.<br />

Observe que la ejecución baja a la línea Function GetMPH.<br />

Inspeccione los valores de las variables <strong>en</strong> esta línea; observará que el valor de<br />

miles es ahora 0.166666672 y el de hours es 5.0, lo contrario de lo que<br />

eran <strong>en</strong> la línea anterior. Ha <strong>en</strong>contrado el error.<br />

Mant<strong>en</strong>ga abierto el proyecto: <strong>en</strong> el sigui<strong>en</strong>te procedimi<strong>en</strong>to apr<strong>en</strong>derá a<br />

corregir el error lógico.<br />

Corregir errores lógicos<br />

En el último procedimi<strong>en</strong>to, los valores para las variables miles y hours<br />

cambiaron de lugar. ¿Puede id<strong>en</strong>tificar la causa?<br />

Si examina la línea MsgBox("Average speed " & GetMPH(hours,<br />

miles)), verá que a la función GetMPH se pasan dos argum<strong>en</strong>tos, hours y<br />

miles, <strong>en</strong> ese ord<strong>en</strong>. Si examina la declaración de función Function<br />

Everts Garay | Granada, Nicaragua| Paseo por <strong>Visual</strong> <strong>Basic</strong> <strong>2008</strong> 93

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

Saved successfully!

Ooh no, something went wrong!