|
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
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
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 .
|
