hvordan man kan validere i Visual Basic

Indlæg af Gunner Poulsen     opdateret: 2011-11-07

Et af de mest frustrerende områder i at skrive kode i et sprog , herunder Visual Basic , handler om at sikre , at når brugerne inputdata i en form, det er gyldigt . Brugere , især uerfarne dem , kan finde næsten ubegrænsede muligheder for at indtaste ugyldige data . I bedste fald en programmør skal dække et rimeligt antal af muligheder og giver forståelige fejlrapporter i resten af tilfældene . Visual Basic 6,0 håndtag validering med to begreber : " CausesValidation " og

Du har brug for " Godkend ". :
Visual Basic 6 .
0 .


1 .
Begynd et nyt projekt ved at vælge " Standard EXE " skabelon, når du åbner Visual Basic ( VB ) . Dette åbner en formular vindue med navnet " Form1 ". At demonstrere, hvordan validering værker , tilføje disse kontrolelementer til formularen fra "Toolbox" i venstre side af skærmen ved at dobbeltklikke på hver :

One " Label , ", Repræsenteret ved et stort stort "A "-ikonet .
One " TextBox , ", repræsenteret ved et ikon med en lille firkant , der indeholder bogstaverne "AB ".
To " CommandButtons , ", repræsenteret ved en lille tomme firkant ikon .
2 .
Klik på og træk den kontrol , du netop har tilføjet for at adskille dem og bringe dem som angivet nedenfor. Hver kontrol tilføjede dækker op foregaaende , så den øverste viser på dette punkt er det sidste " CommandButton , " navnet " Command2 . "

Flyt " Command2 " boksen til højre side af formularen .
Flyt " Command1 " over " Command2 . "

Flyt " Label1 "til venstre side af skemaet modsatte " Command1 . "
Flyt " Tekst1 "under " Label1 . "
3 .

Klik på " Label1 " og ændre " Caption " ejendom i " Egenskaber " kolonnen til højre på skærmen for at læse " Indtast ønsket tal mellem 1 og 1. 000 . " Klik på " Tekst1 " og slette default "Tekst " ejendom . Ændr " Caption " egenskaber " Command1 "til " Go " og " Command2 "til " Annuller ". Ændr " CausesValidation " ejendom " Command2 "til " . Falsk " Bemærk : Sæt ikke anførselstegn , når du foretager disse ændringer Brug træk håndtag , at de små firkanter rundt om hver kontrol udvide dem tilstrækkeligt til at vise hele indholdet
4
. . Klik på "Vis " i øverste niveau menuen i VB , og vælg "Code . "Indtast følgende kode på separate linjer præcist som vist :

Private Sub Command1_Click ( )

MsgBox "Antallet er acceptabelt . "
End Sub
Private Sub Command2_Click ( )
End
End Sub

Private Sub Text1_Validate ( Cancel As Boolean )
Hvis ikke IsNumeric ( Text1. Text ) Så
Cancel=True
ElseIf CDbl ( Text1. Tekst ) <1 Eller CDbl ( Text1. Text ) > 1000 Så
Cancel=True
End If
Hvis Annuller Så

MsgBox " Antallet trådte skal være mellem 1 og 1. 000 " , vbExclamation
End If
End Sub
5 .

Tryk på " F5 " for at køre programmet . Indtast et nummer på formularen og klik på " OK ". Hvis antallet falder mellem 1 og 1. 000 , vil du se en accept besked . Test ved at indtaste en række uden for dette område eller tekst , som så giver en fejlmeddelelse . Brug denne fremgangsmåde til at validere andre operationer og udføre den ønskede operationer på de indtastede oplysninger .

gode råd og advarsler


  • Test for andre typer af validering ved hjælp af " ligemænd " (=) operatør . For eksempel , . test for en gyldig postnummer ved at kontrollere om antallet af cifre, der er , om de falder mellem de etablerede serier af ZIP numreHvis der er syv cifre , teste, om det mønster matcher " xxxxx-xxxx . " Test for et tomt felt med " if /then " operation hjælp af et par anførselstegn sammen, hvilket betyder, at feltet var tom . Validere en streng af tegn og tal med " Like " operatør .
  • Disse VB valideringsmetoder arbejde med de enkelte felter , ikke umiddelbart med alle felter i en form rekord . Hvis en bruger indtaster data i nogle , men ikke alle områder og klik på "Gem ", " Send "eller lignende knap , udenom andre områder , betyder fuld validering ikke træde i kraft . Dækker denne mulighed kræver mere kompleks kodning .


  • Previous:hvordan du tilføjer markører Next:hvordan man åbner en postsættet



     

    Kommentarer

    Code:
    change