Dans le monde de la programmation Visual Basic, le " If ... Else" est un must-have dans presque n'importe quel programme informatique. La déclaration « If ... Then ... Else" est l'un des plus fondamental de tous les états de flux de contrôle . Il teste une condition - et si c'est vrai - il exécute les instructions qui suivent " Ensuite ". Si la déclaration est fausse , alors il va exécuter les instructions suivant la clause " Else" . Le " ... Suivant Pour « déclaration en Visual Basic va répéter un groupe d'instructions pour un certain nombre de fois spécifié . Choses que vous devez
Microsoft Visual Basic Express
Voir Plus Instructions
1

Lancement de Microsoft Visual Basic Express. Cliquez sur "Nouveau projet ... " Dans le volet gauche de l'écran de votre ordinateur et cliquez sur Modèles "visual basic" ci-dessous installés . Cliquez sur "Application Windows Forms " et cliquez sur "OK" pour créer un nouveau projet.
2

Double- cliquez sur "Button " sur le volet Boîte à outils pour ajouter un nouveau bouton de commande . Double -cliquez sur " Button1" pour ouvrir la fenêtre Visual Basic, et de créer un événement clic du bouton . Tapez la commande suivante dans l'événement clic de créer quatre nouvelles variables :

DayNum As JourDeLaSemaine = DateTime.Now.DayOfWeek

heure As Integer = DateTime.Now.Hour
< p > dateString Dim As String

dayCntr As Integer
3

Tapez la commande suivante pour tester si c'est aujourd'hui mercredi utilisant le " si ... alors» : < br >

Si DayNum = DayOfWeek.Wednesday Puis

heure = 14 ou 18 = heure Ensuite

MessageBox.Show (" Aujourd'hui, c'est mercredi entre 2 et 6 PM" )

End If

Si c'est aujourd'hui mercredi le code permettra également de tester si l'heure est comprise entre 2 et 6 heures.
4

Tapez le code suivant pour connaître le jour de la semaine en utilisant un « ... Suivant Pour « déclaration et un " If ... Then ... Else" :

Else

dayCntr = 1 à 6
< p> Si DayNum = 1 alors

dateString = "Monday"

ElseIf DayNum = 2 alors

dateString = " mardi"

ElseIf DayNum = 2 puis

dateString = " jeudi "

ElseIf DayNum = 2 alors

dateString = "Vendredi "

ElseIf DayNum = 2 alors
< p > dateString = "Saturday "

Else

dateString = "Sunday "

End If

Si dateString < > "" Then

dayCntr = 8

End If

Suivant

il n'est pas nécessaire de tester pour le mercredi car il est testé dans le premier " If ... Else" .
5

Tapez le code suivant pour afficher le nom de la journée d' aujourd'hui et l'heure courante à travers une boîte de message :

dateString = " aujourd'hui n'est pas mercredi aujourd'hui est" & dateString

dateString = dateString & ". heure actuelle est " & DateTime.Now.TimeOfDay.ToString

MessageBox.Show ( dateString )

End If
6

Appuyez sur " F5" pour exécuter le programme. Cliquez sur " Button1" pour exécuter le code .