Select Case

L'instruction Select Case est une autre façon de tester ce qui est à l'intérieur d'une variable. Vous pouvez l'utiliser lorsque vous savez qu'il ya seulement un nombre limité de choses qui pourraient être dans la variable. Par exemple, supposons que nous ajoutons un autre choix pour ce gâteau à la crème. Nous avons seulement dit que les conséquences de manger le gâteau à la crème est que le régime sera soit "ruinée" ou "Non Ruiné". Mais que faire si nous ajoutons une autre option - "Diet Non testé". En d'autres termes, nous avons mangé le gâteau, mais a refusé de monter sur les échelles de nous peser!
Avec trois choix, nous pouvons toujours utiliser un si ... Else. Mais nous allons changer à une instruction Select Case. Rappelez-vous: tout ce que nous faisons teste ce qui est à l'intérieur d'une variable, dans ce cas, un appelé creamcake variable. Une fois que nous décidons ce qui est à l'intérieur de la variable, nous pouvons prendre des mesures. Voyons donc comment le Select Case fonctionne.
Créer un formulaire avec un bouton et une zone de texte à ce sujet (si vous avez votre forme ouverte de la section précédente , vous pouvez utiliser celui-ci). Double-cliquez sur le nouveau bouton. Vous devriez voir quelque chose comme ceci apparaît.

Private Sub Button1_Click (expéditeur de ByVal comme System.Object, _
ByVal e As System.EventArgs) _
Poignées Button1.Click

End Sub

Entre le bouton Sub et End Sub Code ajoutez le folowing

Creamcake Dim As String
DietState Dim As String

creamcake = TextBox1.Text

Sélectionnez creamcake de cas

Case "mangé"
DietState = "Diet Ruiné"
Case "pas mangé"
DietState = "Diet pas fichue"
Case Else
DietState = "n'a pas vérifié"

End Select

MsgBox DietState

Lancez votre code pour le tester. Cliquez sur l'intérieur de votre zone de texte et entrer le mot «mangé». Puis cliquez sur le bouton pour voir ce qui se passe. Maintenant, entrez les mots «pas mangé" et cliquez sur le bouton. Ensuite, essayez le mot "manger", avec un "e" minuscule.
Alors, comment fonctionne le Select Case?
Dans le code ci-dessus, nous avons mis en place deux variables appelées creamcake et DietState. Ensuite, nous transférons ce qui est dans Textbox1 à la creamcake variable. Le Select Case commence sur la ligne suivante:

Sélectionnez creamcake de cas

Nous disons à Visual Basic que nous voulons lancer une instruction Select Case en utilisant simplement les mots "Select Case". Cela est suffisant pour mettre en place la déclaration. Le creamcake variable suit les mots Select Case. Nous disons: «Mettre en place une instruction Select Case pour tester ce qui est à l'intérieur de l'appelé creamcake variable". La ligne suivante est la suivante:

Case "mangé"

Nous demandons Visual Basic pour vérifier si le creamcake variable contient le mot «mangé». (Est-il vrai que ...?)
Si c'est le cas que creamcake contient le mot «mangé», puis VB descend sur la ou les lignes de code ci-dessous et lire. Si le creamcake variable ne contient pas le mot «mangé», le programme va sauter la ou les lignes de code ci-dessous et passer à la prochaine affaire.
Le programme continuera à vérifier tous les mots après l'affaire pour voir si l'un d'entre eux contient ce qui est dans le creamcake variable. S'il en trouve un, il va lire le code ci-dessous le mot de l'affaire, si elle ne trouve pas de matches, il ne fera rien du tout. Dans notre code, nous vérifions ces trois cas:

Case "mangé"
Case "pas mangé"
Case Else

Notez aussi que ce sera seulement chercher une correspondance exacte - «Mangé», mais pas «mangé». La ligne suivante à examiner est la suivante:

Case Else

Vous pouvez utiliser le mot Else après l'affaire. Si le programme n'a pas trouvé de matches, il sera alors exécuter le code en dessous de la Case Else ligne.
La dernière ligne de examing est la suivante:

End Select

Tout ce que nous faisons ici, c'est-à-dire Visual Basic pour mettre fin à l'instruction Select Case.
Ainsi, le Select Case vérifie une variable pour un certain nombre de choix différents. Si une correspondance est trouvée, il sera alors exécuter du code ci-dessous l'option de cas qu'il a trouvé. Dans notre code, nous avons juste dit que le programme pour stocker du texte dans la variable DietState. Après l'instruction Select Case est terminée nous avons affiché la variable dans une boîte de message.
Vous pouvez utiliser instruction Select Case avec des nombres, aussi bien, et le mot est très pratique ici. Si vous devions une variable pour voir si le nombre qui était dans la variable est tombé dans une tranche d'âge certain, vous pouvez utiliser quelque chose comme ceci:

Sélectionnez agerange de cas

Case 16 à 21
MsgBox "Still Young"
Case 50 à 64
MsgBox "Start Lying"

End Select

Ici, un appelé agerange variable est testée. Il est en cours de vérification pour voir si elle tombe entre certaines valeurs. Si c'est le cas, une boîte de message s'affiche.

Exercice G

Ajouter un nouveau bouton à votre formulaire. Ecrire un programme qui teste si une personne est a) Un adolescent, b) dans la vingtaine, c) dans la trentaine, ou d) aucune de ces réponses.

Solution

Agerange As Integer

agerange = Val (textBox1.Text)

Sélectionnez agerange de cas

Case 13 à 19

MsgBox "dans votre adolescence"

Case 20 à 29

MsgBox "dans la vingtaine"

Case 30 à 39

MsgBox "En années trente"

Case Else

MsgBox "Non à l'adolescence et plus de 39"

End Select 

Une façon populaire pour utiliser des instructions Select Case est une liste déroulante. Vous pouvez ensuite tester quel élément sélectionné par l'utilisateur à partir d'une liste d'éléments disponibles. Vous allez écrire un petit programme pour faire exactement cela. Mais avant que vous pouvez le faire, vous aurez besoin de savoir comment ajouter une liste déroulante dans un formulaire, et comment obtenir les valeurs dans sa liste. Nous le ferons dans la section suivante.

 

Posted in: Visual Basic .NET