om meerdere ongelijkheden te gebruiken in Visual Basic , of " VB ", schrijft een reeks van enkele ongelijkheden , elk binnen haakjes , dan chain deze ongelijkheden samen met VB 's vergelijkingsoperators . U kunt meerdere ongelijkheden gebruiken " Als " statements , " Select Case " verklaringen , en alle andere VB verklaring dat werkt op voorwaardelijke uitdrukkingen . Voordat u verder gaat met dit project bestuderen voorwaardelijke exploitanten en verklaringen van VB 's . Merk op dat een van deze operatoren , " = ", heeft een ander gebruik naast de ene voor vergelijking uitdrukkingen . Het kan ook gebruikt worden in instructies die waarden toegewezen aan variabelen . Instructies
Schrijf in het VB programmeervenster een haakjes uitdrukking die de eerste van de twee of meer ongelijkheid bevat meerdere Inequalities
Type 1 . Typ bijvoorbeeld " ( species < > " dog " ) " voor een hypothetische verklaring vergelijken van een variabele " soort " op de waarde " hond. "
Type 2 na de haakjes expressie uit de vorige stap , een vergelijkingsoperator , zoals " en " of "of ". bijvoorbeeld expressie van de vorige stap is nu als " ( species < > " dog " ) of "
Gebruik stap iemands 3 instructie om een ander haakjes ongelijkheid , zoals het type" ( oogkleur < > ' blue ' ) . "
< br > Type 4 een Visual Basic-instructie die werkt op voorwaardelijke expressies aan de linkerkant van de volledige verbinding ongelijkheid je net klaar . Typ bijvoorbeeld deze uitdrukking :
Als ( species < > " dog " ) Or ( oogkleur < > " blue " ) Then "
Press 5 " F5 " om uw programma te draaien .
Sample programma
6 Open de Visual Basic ontwikkelomgeving , klik vervolgens op de " Nieuw project " link VB vertellen wil een nieuw project te maken . Klik op de optie " Windows- vorm " op het scherm dat verschijnt om een project te selecteren met een gebruiker inschrijfformulier .
7 Klik op de " tekstvak " item uit de " Tools" palet , dan slepen op de gebruiker formulier om het tekstvak te plaatsen. Plaats een ander tekstvak onder de eerste .
8 Klik op een " knop " controle van de " Tools" palet , sleept u onder het tweede tekstvak om een opdrachtknop plaatsen. Dubbelklik op die knop om de programmering venster te openen.
9 Plak volgende programma in het venster . Public Sub ValidateApplicant ( ) op Dim speciesDim eyecolorspecies = TextBox1.Texteyecolor = TextBox2.TextIf ( species < > " dog " ) Or ( oogkleur < > " blue " ) ThenMsgBox ( " Sorry : . uw soort of oogkleur disqualfies u uit de toelating in ons programma " ) ElseMsgBox ( " , welkom om het programma " ) End IfEnd SubPrivate Sub Button1_Click ( ByVal afzender als System.Object , ByVal e als System.EventArgs ) Handles Button1.ClickValidateApplicant ( ) End Sub
10 Klik op de " ; Debug " menu 's " Debug commando " aan uw programma te draaien . Typ een diersoort in het bovenste tekstvak en een oogkleur in de tweede , en druk dan op de knop om uw programma de verschillende ongelijkheden schreef je passen . Uw programma zal een bericht op basis van de resultaten van de ongelijkheid weer te geven .
|
