Hvordan kode en Hvis Else Statement i VB6
Visual Basic 6 (VB6) er en hendelsesdrevet programmeringsspråk. Som svar på en hendelse som en knapp klikk, VB6 vanligvis driver en rekke kommandoer, en etter en. Imidlertid kan det være lurt maskinen for å kjøre forskjellige sett med kommandoer avhengig av om en betingelse er sann eller ikke. For å gjøre dette, er det best å bruke en "If ... Else" statement.
Bruksanvisning
1 Type "Hvis [betingelse] Så" hvor "[betingelse]" er tilstanden du ønsker å teste. For eksempel vil denne koden teste om litt tekst skrevet inn av brukeren er mindre enn tre tegn:
Hvis Len (txtUsername.Text) <3 Da
2 Skriv inn kommandoene du vil kjøre hvis betingelsen er sann. Du kan legge inn en enkel kommando eller flere, hver på sin egen linje. Disse kommandoer blir noen ganger referert til som en "blokk". For eksempel er denne kommandoen brukes til å informere brukeren om at teksten han skrevet er for kort:
MsgBox "Brukernavn må være minst tre tegn."
3 Skriv inn søkeordet "Else" på en egen linje. Dette markerer slutten av blokken av kommandoer som skal kjøres dersom betingelsen er sann, og begynnelsen av blokken av kommandoer som skal kjøres hvis betingelsen ikke er sann. For eksempel:
Ellers
4 Skriv inn kommandoene du vil kjøre hvis betingelsen er ikke sant. Som med den forrige blokken, kan du legge inn ett eller flere kommandoer. Dette eksemplet sparer teksten brukeren har angitt, og forteller ham at det ble lagret:
Brukernavn = txtUsername.Text
MsgBox "Ditt nye brukernavn er" og brukernavn & "."
5 Skriv "End If" på en egen linje for å markere slutten av "If ... Else" statement. For referanse, her er koden for hele eksempel:
Hvis Len (txtUsername.Text) <3 Da
MsgBox "Brukernavn må være minst tre tegn."
Ellers
Brukernavn = txtUsername.Text
MsgBox "Ditt nye brukernavn er" og brukernavn & "."
Slutt om
Hint
- Du kan reir "Hvis" uttalelser i hverandre for å gjøre mer kompliserte valg.
- Hvis du ønsker å teste for mange ulike muligheter, kan det være bedre å bruke en "Select case" statement.