Una delle zone più frustrante nella scrittura del codice in qualsiasi lingua, tra cui Visual Basic, consente di garantire che quando gli utenti inserire le informazioni in un modulo è valido. Gli utenti, quelli particolarmente inesperti, possono trovare modi quasi illimitati per immettere dati non validi. Nella migliore delle ipotesi un programmatore deve riguardare un numero ragionevole di possibilità e fornire report di errore comprensibile nel resto dei casi. Visual Basic 6.0 gestisce la convalida con due termini: "CausesValidation" e "Validate".
Istruzioni
1
Iniziare un nuovo progetto selezionando il modello di "EXE Standard" dopo aver aperto Visual Basic (VB). Questo apre una finestra del modulo denominata "Form1". Per illustrare il funzionamento della convalida, è possibile aggiungere questi controlli al form da "ToolBox" sulla sinistra dello schermo facendo doppio clic su ciascuno:
Un' "etichetta", rappresentato da una grande capitale "A" icona.
Un "TextBox", rappresentato da un'icona di una piccola piazza che contengono le lettere "ab".
Due "CommandButtons," rappresentato dall'icona di un piccolo rettangolo vuoto.
2
Fare clic su e trascinare i controlli che appena aggiunto per separarli e allinearle elencati di seguito. Ogni controllo aggiunto copre quelli precedenti, quindi la parte superiore uno risultati a questo punto è l'ultimo "CommandButton," denominato "Command2."
Spostare la casella "Command2" al lato destro del form.
Spostare "Command1" sopra "Command2."
Spostare "Label1" sul lato sinistro del modulo fronte "Command1."
Spostare "Text1" sotto "Label1."
3
Fare clic su "Label1" e modificare la proprietà "Caption" nella colonna "Proprietà" sulla destra dello schermo per leggere "Invio desiderato numero compreso tra 1 e 1.000." Fare clic su "Text1" ed elimina la proprietà "Text" predefinito. Modificare le proprietà "Caption" di "Command1" al "Go" e "Command2" "Annulla". Modificare la proprietà "CausesValidation" di "Command2" su "False". Nota: Non inserire virgolette quando si apportano queste modifiche. Utilizzare le maniglie di trascinamento, le piccole piazze intorno a ciascun controllo per allargare loro sufficientemente per mostrare il contenuto completo.
4
Fare clic su "Visualizza" nel menu di primo livello in Visual Basic e selezionare "Codice". Immettere il seguente codice su righe separate, esattamente come indicato:
Private Sub Command1_Click)
MsgBox "Il numero è accettabile."
End Sub
Private Sub Command2_Click()
Fine
End Sub
Private Sub Text1_Validate(Cancel As Boolean)
Se non IsNumeric(Text1.Text) poi
Annulla = True
ElseIf CDbl(Text1.Text) < 1 o CDbl(Text1.Text) > 1000 quindi
Annulla = True
End If
Se annullare quindi
MsgBox "il numero inserito deve essere compreso tra 1 e 1.000", 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 1.000, si vedrà un messaggio di accettazione. Prova inserendo un numero all'esterno di questo intervallo o testo, che poi dà un messaggio di errore. Utilizzare questo approccio per convalidare altre operazioni ed eseguire operazioni desiderate al momento le informazioni immesse.
Consigli & Avvertenze
- Test per altri tipi di convalida utilizzando l'operatore "Uguale a" (=). Ad esempio, test per un codice postale valido controllando il numero di cifre immesso, vale a dire, se cadono tra gli intervalli stabiliti di ZIP numeri. Se ci sono sette cifre, verificare se il modello corrisponde "xxxxx-xxxx." Test per un campo vuoto con l'operazione di "Se/allora" utilizzando una coppia di virgolette insieme, che indica che il campo è vuoto. Convalidare una stringa di caratteri e numeri con l'operatore "Like".
- Questi metodi di convalida VB funzionano con singoli campi, non immediatamente con tutti i campi in un record della maschera. Se un utente immette dati in alcuni ma non tutti i campi e fa clic su un "salvataggio", "Invia" o un pulsante simile, scavalcando altri campi, convalida completa non ha effetto. Che copre questa possibilità richiede la codifica più complessa.