Cómo crear un programa de Visual Basic Utilizar el Si demás y para Loop

En el mundo de la programación Visual Basic , el " If ... Else" declaración es un deber-tener en casi cualquier programa de ordenador. La declaración " If ... Then ... Else " es una de la más básica de todas las sentencias de control de flujo . Se prueba una condición - y si es cierto - que ejecutar las instrucciones que siguen " Entonces ". Si la declaración es falsa , entonces se ejecutan las instrucciones que siguen a la cláusula " Else" . El " For ... Next" en Visual Basic se repetirá un grupo de instrucciones para un número especificado de veces. Cosas que necesitará
Microsoft Visual Basic Express
Ver Más instrucciones
1

lanzamiento Microsoft Visual Basic Express. Haga clic en " Nuevo proyecto ... " en el panel izquierdo de la pantalla del ordenador , y haga clic en Plantillas instaladas debajo de " Visual Basic" . Haga clic en " Aplicación de Windows Forms " y haga clic en " Aceptar" para crear un nuevo proyecto.
2

doble clic en " botón" en el panel Cuadro de herramientas para agregar un nuevo control de botón . Haga doble clic en " Button1 " para abrir la ventana de Visual Basic y cree un evento de clic del botón. Escriba lo siguiente en el evento click para crear cuatro nuevas variables :

DayNum As DayOfWeek = DateTime.Now.DayOfWeek

horas Dim As Integer = DateTime.Now.Hour
< p > dateString dévil como secuencia

dayCntr Dim As Integer
3

Escriba lo siguiente para comprobar si hoy es miércoles con el "si ... entonces" :

Si DayNum = DayOfWeek.Wednesday Entonces

Si horas = 14 horas O = 18 Entonces

MessageBox.Show ( " Hoy es miércoles de 2 a 6 de la tarde " )

End If

Si hoy es miércoles, el código también se pondrá a prueba si la hora está entre 2 y 6 AM.
4

Escriba el siguiente código para saber el día de la la semana con un " For ... Next" y un " If ... Then ... Else " declaración:

demás

Para dayCntr = 1 Para 6 personas < p> Si DayNum = 1 Entonces

dateString = " Lunes "

ElseIf DayNum = 2 Entonces

dateString = " Martes "

ElseIf DayNum = 2 Entonces

dateString = " jueves "

ElseIf DayNum = 2 Entonces

dateString = " viernes "

ElseIf DayNum = 2 Entonces
< p > dateString = " Sábado "

demás

dateString = " Domingo "

End If

Si dateString < > "" Entonces

dayCntr = 8

End If

Siguiente

no hay necesidad de probar para el miércoles , ya que está probado en el primer " If ... Else" declaración.
5

Escriba el siguiente código para mostrar el nombre del día de hoy y la hora actual a través de un cuadro de mensaje :

dateString = "Hoy no es el miércoles , en la actualidad es" & dateString

dateString = dateString & ". hora es" & DateTime.Now.TimeOfDay.ToString

MessageBox.Show ( dateString )

End If
6

Press "F5 " para ejecutar el programa. Haga clic en " Button1 " para ejecutar el código.