Visual Basic bietet genügend Tools, um einfache Operationen wie Zählen Wörter, Buchstaben oder auch bestimmte Zeichen wie Vokale und Konsonanten , ohne viel Arbeit zu verrichten. Things You
Visual Basic
brauchen anzeigen Weitere Anweisungen
1

Erstellen Sie eine neue Visual Basic-Projekt , indem Visual Basic und wählen Sie " Neues Projekt ... " aus dem Aktuelle Dialogfeld Projekt , das sich öffnet . Alternativ können Sie auf das Menü Datei und wählen Sie " Neues Projekt. " Dies wird eine grundlegende Windows -Anwendung sein , so klicken Sie einfach auf Weiter oder OK für alle anderen Dialoge, die Pop-up für eine Standard-Konfiguration , bis Sie mit einem leeren Formular in konfrontiert die GUI-Designer .
2

hinzufügen , indem Sie das RichTextBox RichTextBox -Komponente aus dem Komponenten -Liste in das Formular . Ziehen Sie die Kanten so , dass es dauert bis die meisten der Form, sondern lassen Raum an der Unterseite.
3

Fügen Sie ein Label bewegen indem sie sie aus den Komponenten Liste und legen Sie sie unter dem RichTextBox . Gehen Sie auf die Eigenschaften -Box, die auf der rechten unteren Ecke des Fensters standardmäßig ist . Finden Sie die text-Eigenschaft und ändern Sie es auf " Vokal Graf :" " . Etikett " aus Achten Sie darauf, das Label weit genug gesetzt von der rechten Seite , so dass Sie den Vokal zählen können den Text später hinzufügen, ohne den Text Ablaufen der Grenze das Fenster .
4

Fügen Sie eine Schaltfläche aus der Liste der Komponenten und legen Sie sie neben dem Vokal Zählung Label. Wieder einmal sicher sein, Sie geben Ihr Etikett Platz für drei oder vier Zeichen , um es für Ihre Vokal Zählung hinzugefügt werden. Ändern Sie die Text -Eigenschaft der Schaltfläche , so dass sie liest "Count Vokale " anstelle von "Button ".
5

Doppelklicken Sie auf die Taste. Dies öffnet den Quellcode für Ihre Fenster und automatisch eine Event-Funktion aufgerufen , wenn die Schaltfläche vom Benutzer angeklickt wird. Der Name der Funktion wird sehr ähnlich sein " Button1 . " All -Code wird in dieser Funktion gehen .
6

Geben Sie den folgenden Code ein.

Dim Buchstaben ( RichTextBox1.Text . Länge ) Wie Charletters = RichTextBox1.Text.ToUpper.ToCharArray ()

Dim count = 0

für jeden Buchstaben lettersSelect Fall Schreibweise "A" , "E" , "I" ; , "O" , "U " count + = 1End SelectNext

Label1.Text = " Vokal Count: " + CStr (count)

gehen Zeile für Zeile , diese Funktion erstellt ein Array von Zeichen Namen " Buchstaben. " Es kopiert dann den Text aus dem RichTextBox , ändert die Kopie so , dass sie alle in Großbuchstaben . Dadurch wird die Anzahl der Vokale müssen Sie für nur Großbuchstaben ihre Versionen aussehen zu reduzieren.

Nächstes eine ganze Zahl erstellt wird, um die Zählung der Vokale , wie sie gezählt werden zu halten.

Dann wird die Code beginnt um durch die Liste der Buchstaben, eins nach dem anderen gehen , und prüft jeden Buchstaben zu sehen, ob es ein Vokal ist . Wenn ja, dann wird die Variable Zähler wird um eins erhöht.

Schließlich Anzahl der Vokal -Label eingestellt ist, drucken Sie das Ergebnis ein.
7

Drücken Sie auf den grünen Pfeil zum Testen Anwendung .