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

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

En el m<strong>en</strong>ú Archivo, elija Nuevo proyecto.<br />

En el cuadro de diálogo Nuevo proyecto, <strong>en</strong> el panel Plantillas, haga clic <strong>en</strong><br />

Aplicación para Windows.<br />

En el cuadro Nombre, escriba IfTh<strong>en</strong> y haga clic <strong>en</strong> Aceptar.<br />

Se abre un nuevo proyecto de formularios Windows Forms.<br />

Haga doble clic <strong>en</strong> el formulario para abrir el Editor de código.<br />

En el controlador de ev<strong>en</strong>tos Form1_Load, escriba el sigui<strong>en</strong>te código.<br />

<strong>Visual</strong> <strong>Basic</strong> Express Copiar código<br />

If My.Computer.Clock.LocalTime.DayOfWeek = DayOfWeek.Saturday Or _<br />

My.Computer.Clock.LocalTime.DayOfWeek = DayOfWeek.Sunday Th<strong>en</strong><br />

MsgBox("Happy Week<strong>en</strong>d!")<br />

End If<br />

Presione F5 para ejecutar el programa.<br />

Si hoy es sábado o domingo, aparecerá un cuadro de m<strong>en</strong>saje indicándole<br />

Happy Week<strong>en</strong>d!. De lo contrario, no aparecerá ningún cuadro de m<strong>en</strong>saje.<br />

En el m<strong>en</strong>ú Depurar, seleccione Det<strong>en</strong>er depuración para finalizar el<br />

programa. Mant<strong>en</strong>ga abierto este proyecto. Se utilizará <strong>en</strong> el sigui<strong>en</strong>te<br />

procedimi<strong>en</strong>to, "Para utilizar la cláusula Else".<br />

Es posible que haya observado <strong>en</strong> el ejemplo anterior que la instrucción<br />

If...Th<strong>en</strong> utilizó el operador Or para evaluar varias condiciones ("Si es sábado<br />

Or si es domingo"). Puede utilizar los operadores Or y And para evaluar tantas<br />

condiciones como desee <strong>en</strong> una instrucción If...Th<strong>en</strong> única.<br />

La cláusula Else<br />

Ha visto cómo utilizar la instrucción If...Th<strong>en</strong> para ejecutar el código si una<br />

condición es true, pero ¿qué pasa si desea ejecutar un código si una condición<br />

es true, pero otro si es false? En este caso, puede utilizar la cláusula Else. La<br />

cláusula Else le permite especificar un bloque de códigos que se ejecutará si la<br />

condición es false. El sigui<strong>en</strong>te ejemplo muestra cómo funciona la cláusula<br />

Else.<br />

<strong>Visual</strong> <strong>Basic</strong> Express Copiar código<br />

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

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

Saved successfully!

Ooh no, something went wrong!