En av de mest frustrerande områdena i att skriva kod på alla språk , inklusive Visual Basic , innebär att säkerställa att när användare in information i en form den är giltig. Användare, särskilt oerfarna sådana, kan hitta nästan obegränsade sätt att skriva in ogiltiga data . I bästa programmerare måste täcka ett rimligt antal möjligheter och ge begripliga felrapporter i resten av fallen . Visual Basic 6. 0 handtag validering med två termer : ” CausesValidation ” och
Du behöver ” Validate ”. :
Visual Basic 6 .
0 .
1 .
Börja ett nytt projekt genom att välja ” Standard EXE ” mall när du öppnar Visual Basic (VB ) . Detta öppnar ett formulär fönster som heter ” Form1 . ” För att visa hur validering fungerar , tillsätt dessa kontroller till formuläret från ”Toolbox ” till vänster på skärmen genom att dubbelklicka på varje :
One ” Label , ” representeras av ett stort kapital ” A ”-ikonen .
One ” TextBox , ” representeras av en ikon av en liten fyrkant som innehåller bokstäverna ” ab ”.
Två ” CommandButtons ” representeras av en liten blank rektangel ikon .
2 .
Klicka på och dra de kontroller du just har lagt för att separera dem och anpassa dem enligt nedan . Varje kontroll la täcker upp de föregående , så den övre visar på denna punkt är den sista ” CommandButton , ” heter ” Kommando2 . ”
Flytta ” Kommando2 ” rutan till höger i formuläret .
Flytta ” Kommando1 ” ovanför ” Kommando2 . ”
Flytta ” Label1 ”till vänster sida av blanketten motsatta ” Kommando1 . ”
Flytta ” Text1 ” under ” Label1 . ”
3 .
Klicka på ” Label1 ” och ändra ” Caption ” egendom i ” Egenskaper ” kolumnen till höger på skärmen för att läsa ” Ange önskad siffra mellan 1 och 1000. ”Klicka på ” Text1 ” och ta bort standard ” Text ” egendom . Ändra ” Caption ” egenskaper ” Kommando1 ”till ” Go ” och ” Kommando2 ” till ” Avbryt . ”Ändra ” CausesValidation ” egendom ” Kommando2 ” till ” . Falska ”Notera : inte märken in offert när du gör dessa förändringar Använd dra handtagen till små torg runt varje kontroll vidga dem tillräckligt för att visa hela innehållet
4
. . Klicka på ” Visa ” i toppnivåmenyn i VB och välj ” kod ”. Skriv följande kod på separata rader exakt så som visas :
Sub Command1_Click ()
MsgBox ” Antal är acceptabel. ”
End Sub
Private Sub Command2_Click ( )
End
End Sub
Private Sub Text1_Validate ( Avbryt As Boolean )
Om inte IsNumeric ( Text1. Text ) Sen
Cancel=True
ElseIf CDbl ( Text1. Text ) <1 eller cdbl ( text1. text )> 1000 sedan
Cancel=True
End If
Om Avbryt Då
MsgBox ” Antalet trädde måste vara mellan 1 och 1. 000 ” , vbExclamation
End If
End Sub
5 .
Tryck ” F5 ”för att köra programmet . Ange en siffra på formuläret och klicka på ” OK ”. Om antalet sjunker mellan 1 och 1000, kommer du att se en acceptans meddelande . Testa genom att ange ett antal utanför detta område eller text , som sedan ger ett felmeddelande. Använd den här metoden för att validera andra verksamheter och utföra önskade operationer på den inmatade informationen .
tips och varningar