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 mata in information i en form är det giltigt . Användarna , särskilt oerfarna sådana, hittar nästan obegränsade möjligheter att komma in ogiltiga data . I bästa fall en programmerare måste omfatta ett rimligt antal möjligheter och ge begripliga felrapporter i resten av fallen . Visual Basic 6.0 hanterar validering med två termer : " CausesValidation " och " Bekräfta ". Saker du behöver Review, Visual Basic 6.0
Visa fler instruktioner
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 demonstrera hur valideringen fungerar , lägg dessa kontroller till formuläret från " Toolbox" till vänster på skärmen genom att dubbelklicka på varje :
One " Label ", representerad av ett stort kapital " A " -ikonen .
One " textrutan " representeras av en ikon med ett litet torg som innehåller bokstäverna " ab ".
Two " CommandButtons , " representeras av en liten svart rektangel ikonen .
2
Klicka på och dra reglagen du just lagt för att separera dem och anpassa dem enligt nedan . Varje kontroll läggs täcker upp de föregående , så den översta visar på denna punkt är det sista " CommandButton , " heter " Kommando2 . "
Flytta " Kommando2 " rutan till höger i formuläret .
Flytta " Kommando1 " ovanför " Kommando2 . "
Flytta " Label1 " till den vänstra sidan av formen motsatt " Kommando1 . "
Flytta " Text1 " nedan " Label1 . " Addera 3
Klicka på " Label1 " och ändra " Caption " egendom i " Egenskaper " kolumnen till höger på skärmen för att läsa " Ange önskat nummer mellan 1 och 1000 . " Klicka på " Text1 " och radera default " Text " egendom . Ändra " Caption " egenskaper " Command1 " till " Go " och " Kommando2 " till " Cancel ". Ändra " CausesValidation " egendom " Kommando2 " till " False ". OBS : Sätt inte in citattecken när du gör dessa ändringar . Använd dra handtagen , de små torgen runt varje kontroll att vidga dem tillräckligt för att visa hela innehållet .
4
Klicka på " Visa " i den översta nivån menyn i VB och välj " Code ". Skriv följande kod på separata rader exakt som visas :
Private Sub Command1_Click ( ) katalog
MsgBox " nummer är acceptabelt . "
End Sub
Privat sub Command2_Click ( ) katalog
End
End sub
Private sub Text1_Validate ( Cancel As Boolean ) katalog p Om inte IsNumeric ( Text1.Text ) Sen
Avbryt = Sant
ElseIf CDbl ( Text1.Text ) < 1 Eller CDbl ( Text1.Text ) > 1000 Sen
Avbryt = Sant
End Om
Om Avbryt Sedan
MsgBox " antalet deltagare måste vara mellan 1 och 1000 " , vbExclamation
End If
End Sub
5
Tryck " F5 " för att köra programmet . Ange valfritt antal i formuläret och klicka på " OK . " Om antalet ligger mellan 1 och 1000 , kommer du att se ett meddelande om godkännande . Testa genom att skriva in ett nummer utanför detta område eller text , vilket då ger ett felmeddelande . Använd denna metod för att validera andra verksamheter och utföra önskade operationer på den inmatade informationen .
