Una delle zone più frustranti nella scrittura del codice in qualsiasi lingua , tra cui Visual Basic , significa assicurare che quando gli utenti le informazioni di input in una forma che sia valido. Gli utenti , in particolare quelli meno esperti , possono trovare modi quasi illimitate per immettere i dati non validi . Nella migliore delle ipotesi un programmatore deve coprire un numero ragionevole di possibilità e di fornire rapporti di errore comprensibili nel resto dei casi . Visual Basic 6.0 gestisce la convalida di due termini : " CausesValidation " e "Convalida ". Cose che ti serviranno
Visual Basic 6.0
Mostra più istruzioni
1

cominciare un nuovo progetto selezionando il modello " standard EXE" dopo aver aperto Visual Basic ( VB ) . Si apre una finestra del modulo denominato " Form1 ". Per dimostrare come funziona la convalida , aggiungere questi controlli al form della " cassetta degli attrezzi" sulla sinistra dello schermo , fare doppio clic su ciascuna :

One " Etichetta ", rappresentato da una grande "A" maiuscola icona .

One " TextBox ", rappresentato da una icona di una piccola piazza che contiene le lettere " aB" .

Due
" CommandButtons, " rappresentata da una piccola icona in bianco rettangolo .

2

Cliccate e trascinate i controlli appena aggiunti per separarli e allinearle come elencati di seguito . Ogni controllo ha aggiunto copre le precedenti, in modo da quello superiore mostra a questo punto è l'ultimo " CommandButton ", denominato " Command2 ".

Spostare la casella " Command2 " al lato destro del modulo . < br

Sposta> " Command1 " sopra " Command2 ".

Move " Label1 " sul lato sinistro del modulo opposto " Command1 ".

Move " Text1 " sotto " Label1 . "
3

Clicca su" Label1 " e cambiare il" "proprietà nel" Caption proprietà " colonna a destra dello schermo per leggere " Inserire il numero desiderato tra 1 e 1000 . " Clicca su " Text1 " ed eliminare la proprietà predefinita "Testo" . Modificare le "caption" proprietà " Command1 " a " Go" e " Command2 " a " Annulla". Modificare la proprietà " CausesValidation " di " Command2 " a " False". Nota : Non inserire le virgolette quando fare questi cambiamenti . Utilizzare il trascinamento maniglie , i quadratini attorno ad ogni controllo di ampliare a sufficienza per mostrare l'intero contenuto .
4

Fare clic su " Visualizza " nel menu in alto livello in VB e selezionare "Codice ". Inserisci il seguente codice su righe separate esattamente come mostrato:

Private Sub Command1_Click ( ) per

MsgBox " numero è accettabile".

End Sub

Privato sub Command2_Click ( ) per

Fine

End sub ​​private Sub

Text1_Validate ( Cancel As Boolean ) per

If Not IsNumeric ( Text1.Text ) Poi < br

Annulla > = True

ElseIf CDbl ( Text1.Text ) < 1 Or CDbl ( Text1.Text ) > 1000 Poi

Annulla = True

End Se

Se Annulla Poi

MsgBox " Il numero inserito deve essere compreso tra 1 e 1000 " , vbExclamation

End If End

Sub
5

Premere " F5 " per eseguire il programma . Inserisci qualsiasi numero sul modulo e fare clic su "OK ". Se il numero è compreso tra 1 e 1000 , verrà visualizzato un messaggio di accettazione . Prova inserendo un numero di fuori di questo intervallo o un testo , che poi dà un messaggio di errore . Utilizzare questo metodo per convalidare altre operazioni e di eseguire le operazioni desiderate per le informazioni in entrata .