Um mehrere Ungleichheiten in Visual Basic, oder verwenden Sie "VB ", schreiben eine Reihe von einzelnen Ungleichheiten , die jeweils in Klammern , dann Kette diese Ungleichheiten zusammen mit VB Vergleichsoperatoren. Sie können mehrere Ungleichheiten in verwenden "Wenn " Aussagen " Select Case " -Anweisungen und andere VB -Anweisung, die auf bedingten Ausdrücken arbeitet . Bevor Sie mit diesem Projekt zu studieren VB bedingte Operatoren und Anweisungen . Beachten Sie, dass eine dieser Operatoren "= ", hat einen weiteren Einsatz neben dem einen zum Vergleich Ausdrücke. Es kann auch in Anweisungen, die Werte zuweist Variablen verwendet werden. Anleitung
Write Multiple Ungleichheiten
1
Typ in der VB-Programmierung ein Fenster in Klammern Ausdruck, der die erste von zwei oder mehr Ungleichheiten enthält . Geben Sie z. B. " (Art <> " dog " ) " für eine hypothetische Erklärung Vergleich eine Variable "Art" auf den Wert " Hund ".
2
Typ nach dem geklammerten Ausdruck aus dem vorherigen Schritt , ein Vergleichsoperator , wie " und " oder " oder ". beispielsweise könnten Sie den vorherigen Schritt Ausdruck nun als " (Art <> " dog " erscheinen ) oder "
3
Nutzungsbedingungen step one den Anweisungen , um eine weitere Ungleichheit in Klammern , wie zB " ( eyecolor <> "blau" ) . "
< br > 4
Typ ein Visual Basic-Anweisung , die auf bedingte Ausdrücke auf der linken Seite die komplette Verbindung Ungleichheit Sie gerade arbeitet . Geben Sie zum Beispiel diesen Ausdruck :
(Art <> "dog" ) Or ( eyecolor <> "blau ") Then "
5
Press "F5 ", um Ihr Programm ausführen .
Beispielprogramm
6
Öffnen Sie die Visual Basic-Entwicklungsumgebung , dann klicken Sie auf " Neues Projekt " link zu erzählen VB Sie wollen ein neues Projekt zu machen . Klicken Sie auf den "Windows Form "-Option auf dem Bildschirm, um ein Projekt mit einem Benutzer Anmeldeformular wählen erscheint.
7
Klicken Sie auf das " Textfeld " aus dem "Extras" -Palette , dann ziehen Sie auf dem Formular, um den Benutzer Textfeld platzieren. Stellen Sie ein weiteres Textfeld unter dem ersten.
8
Klicken Sie auf einen "Button" -Steuerelement aus der Palette "Werkzeuge" , dann unter dem zweiten Textfeld ziehen, um eine Schaltfläche zu platzieren. Doppelklicken Sie auf diese Taste, um das Programmfenster zu gelangen.
9
das folgende Programm in das Fenster einfügen .
Public Sub ValidateApplicant () Dim speciesDim eyecolorspecies = TextBox1.Texteyecolor = TextBox2.TextIf (Art <> "dog" ) Or ( eyecolor <> "blau" ) ThenMsgBox ( " Es tut uns leid : . Ihre Art oder Augenfarbe disqualfies Sie von der Aufnahme in unser Programm " ) ElseMsgBox ( " ; ! Willkommen zum Programm ") End Sub IfEnd SubPrivate Button1_Click (ByVal sender As System.Object , ByVal e As System.EventArgs ) Handles Button1.ClickValidateApplicant () End Sub
10
klicken Sie auf" ; Debug " Menüs " Debug "-Befehl , um das Programm auszuführen. Geben Sie eine Tierart im oberen Textfeld und ein Auge Farbe in der zweiten , dann drücken Sie die Taste , um das Programm gelten die vielfältigen Ungleichheiten Sie schrieb . Ihr Programm wird eine Meldung auf den Ergebnissen der Ungleichheit basiert.