Comment créer une application Voyelle de comptage en Visual Basic

Instructions

1. Créez un nouveau projet Visual Basic en ouvrant Visual Basic et en choisissant "Créer un projet ..." à partir de la boîte de dialogue d'un projet récent qui apparaît. Alternativement, vous pouvez aller dans le menu Fichier et choisissez "Nouveau Projet." Ce sera une application de base de Windows, si simplement cliquez sur Suivant ou sur OK pour toutes les autres boîtes de dialogue qui apparaissent pour une configuration par défaut jusqu'à ce que vous êtes confronté à un formulaire vierge dans le concepteur d'interface graphique.

2. Ajouter un RichTextBox en faisant glisser le composant RichTextBox de la liste des composants dans votre formulaire. Faites glisser les bords de sorte qu'il prend la plupart de la forme, mais laisser un espace au fond.

3. Ajouter une étiquette en le faisant glisser à partir de la liste des composants et le placer sous le RichTextBox. Accédez à la boîte de dialogue Propriétés, ce qui est en bas à droite de votre fenêtre par défaut. Trouver la propriété de texte et le modifier à "Nombre de voyelle: " à partir de "Étiquette." Veillez à régler l'étiquette assez loin de la côté droit de sorte que vous pouvez ajouter la voyelle compte le texte plus tard sans le texte en cours d'exécution hors de la frontière de la fenêtre.

4. Ajouter un bouton de la liste des composants et le placer à côté de l'étiquette de comptage de voyelle. Une fois de plus, être sûr que vous donnez à votre place sur l'étiquette pour trois ou quatre personnages à y être ajoutés pour votre compte de voyelle. Modifiez la propriété du texte du bouton afin qu'il se lise "Comptez Voyelles" au lieu de "Button."

5. 
   
   
   

   Double cliquez sur le bouton. Cela permettra d'ouvrir le code source de votre fenêtre et créer automatiquement une fonction d'événement d'être appelé à chaque fois que le bouton est cliqué par l'utilisateur. Le nom de la fonction sera très similaire à "Button1_Click." Tout le code ira intérieur de cette fonction.

6. Entrez le code suivant.

   Dim lettres (RichTextBox1.Text.Length) comme char
   lettres = RichTextBox1.Text.ToUpper.ToCharArray ()
   Count = 0 Dim
   Pour chaque lettre lettres
   Sélectionnez lettre de cas
   Cas "-A"-, "-E"-, "-je"-, "-O"-, "-U"-
   count + 1 =
   End Select
   Suivant
   Label1.Text = "-Voyelle Count: "- + CStr (comptage)

   
   
   
   

   Going ligne par ligne, cette fonction crée un tableau de noms des personnages "lettres." Il copie ensuite le texte de la RichTextBox, change la copie de sorte qu'il est tout en majuscule. Cela permettra de réduire le nombre de voyelles que vous devez rechercher pour que leurs versions majuscules.

   Ensuite, un entier est créé pour maintenir le décompte des voyelles, ils sont pris.

   Ensuite, le code commence à passer par la liste de lettres, un par un, et vérifie chaque lettre pour voir si elle est une voyelle. Si oui, alors la variable de comptage est augmentée d'une unité.

   Enfin, l'étiquette de comptage de la voyelle est configurée pour imprimer le résultat.

7. Appuyez sur la flèche verte pour tester votre application.