Ako overiť v jazyku Visual Basic

Jeden z najviac frustrujúcich oblastí v písaní kódu v ľubovoľnom jazyku , vrátane jazyka , znamená to , že keď používatelia vstupné informácie v podobe , je platný . Užívatelia , najmä tie neskúsených , nájdete takmer neobmedzené možnosti zápisu neplatné údaje . V najlepšom prípade programátor musí zahŕňať primeraný počet možností a poskytnúť zrozumiteľné chybové správy v ostatných prípadoch . Visual Basic 6.0 spracováva overenie s dvoma podmienkami : " CausesValidation " a " Potvrdiť " . Veci , ktoré budete potrebovať
Visual Basic 6.0
Zobraziť ďalšie inštrukcie Cestuj 1

Začnite nový projekt výberom " Štandardné EXE " šablóny po otvorení Visual Basic ( VB ) . Tým sa otvorí okno formulára s názvom " Form1 . " Ak chcete dokázať , ako práce na validácii , pridajú sa tieto ovládacie prvky do formulára z " ToolBox " na ľavej strane obrazovky dvojklikom na každý :

" Label " , zastúpená veľkým kapitálom " " ikonu .

One " textové pole " , reprezentovaný ikonou malého štvorca obsahujúci písmená " ab " .

dva " CommandButtons " , zastúpené malú prázdnu ikonu obdĺžnika .

2

Kliknite na a pretiahnite ovládacie ste práve pridali do seba oddeliť a zladiť ich, ako je uvedené nižšie . Každý ovládací prvok pridaný zakrýva tie predchádzajúce , tak , aby horná jedno predstavenie v tomto bode je posledný " CommandButton , " s názvom " Command 2. "

Presunúť " Command2 " box na pravej strane formulára .

Move " Command1 " nad " Command2 . "

Move " Label1 " na ľavej strane formulára naproti " Command1 . "

Move " Text1 " pod " TextLabel1 . "
3

Kliknite na " Label1 " a zmeňte " Titulok " vlastníctva vo " Vlastnosti " stĺpci na pravej strane obrazovky čítať " Zadajte požadované číslo medzi 1 a 1000 . " Kliknite na " Text1 " a odstrániť predvolené " Text " vlastnosť . Zmeňte " Titulok " vlastnosti " Command1 " na " Go " a " Command2 " na " Zrušiť " . Zmeňte " CausesValidation " majetok " Command2 " na " False " . Poznámka : Pri vykonaní týchto zmien Nevkladajte úvodzovky . Pomocou drag rukoväte , malé štvorca okolo každej kontroly je rozšíriť dostatočne ukázať celý obsah .
4

Kliknutím na tlačidlo " View " v menu najvyššej úrovne vo VB a vyberte " Code " . Zadajte nasledujúci kód na samostatných riadkoch , presne tak , ako je uvedené :

Private Sub Command1_Click ( )

MsgBox " Číslo je prijateľné . "

End Sub

súkromia sub Command2_Click ( )

Koniec

End sub ​​

Private sub Text1_Validate ( Cancel As Boolean )

Ak nie je IsNumeric ( Text1.Text ) Potom

Zrušiť = TRUE

ElseIf CDbl ( Text1.Text ) < 1 alebo CDbl ( Text1.Text ) > 1000 Potom

Zrušiť = True

End ak

Ak Zrušiť Potom

MsgBox " Zadané číslo musí byť medzi 1 a 1000 " , vbExclamation

End If

End Sub

5

Stlačte " F5 " pre spustenie programu . Zadajte ľubovoľné číslo na formulári a kliknite na " OK " . Ak je číslo v rozmedzí od 1 do 1000 , uvidíte správu prijatie . Otestujte zadaním čísla mimo tohto rozsahu alebo text , ktorý potom dáva chybovú správu . Použite tento postup na overenie ďalších operácií a vykonávať požadované operácie na zadané informácie .

• Predchádzajúca strana: Ako nájsť úplnú cestu názov súboru v jazyku Visual Basic 
• Ďalšia strana: Ako otvoriť URL Cez VBS