L'un des domaines les plus frustrants dans l'écriture de code dans n'importe quelle langue , y compris Visual Basic, consiste à faire en sorte que lorsque les utilisateurs des informations d'entrée sous une forme qu'il est valide. Les utilisateurs, particulièrement inexpérimentés , peuvent trouver des moyens presque illimités pour entrer des données non valides. Au mieux, un programmeur doit couvrir un nombre raisonnable de possibilités et de fournir des rapports d'erreurs compréhensibles dans le reste des cas. Visual Basic 6.0 gère la validation de deux termes : " CausesValidation " et " Valider ". Choses que vous devez
Visual Basic 6.0
Voir Plus Instructions
1

entamer un nouveau projet en sélectionnant le modèle " standard EXE " après vous ouvrez Visual Basic (VB) . Cela ouvre une fenêtre de formulaire nommée " Form1 ". Pour démontrer comment la validation fonctionne , ajouter ces contrôles à la forme de la « boîte à outils» sur la gauche de l'écran en double- cliquant sur chacun d'eux:

Un «label », représentée par un grand «A» majuscule icône .

One " TextBox ", représenté par une icône d'un petit carré contenant les lettres " b" .

deux « boutons de commande », représentée par une petite icône rectangle blanc .

2

Cliquez sur et faites glisser les contrôles que vous venez de les séparer et de les aligner comme ci-dessous. Chaque commande ajouté recouvre les précédentes, de sorte que le haut montrant une à ce stade est le dernier « bouton de commande » nommé « Commande2 . "

Déplacer la boîte " Command2 " sur le côté droit de la forme .

Move " Command1 " au-dessus " Command2 . "

Move " Label1 " sur le côté gauche du formulaire ci-contre " Command1 ".

Move " Text1 " en dessous " Label1 . "
3

Cliquez sur " Label1 " et changer le" " propriété dans la " Légende Propriétés " colonne à droite de l'écran pour lire " Entrez le nombre désiré entre 1 et 1000 . " Cliquez sur " Text1 " et supprimer la propriété "Texte" par défaut. Modifiez les propriétés de " légende" de " Command1 " à " Go" et " Command2 » à « Annuler». Changer le " CausesValidation " propriété de " Command2 " à "false". Note: Ne pas insérer des guillemets lors de ces changements. Utilisez le glisser les poignées , les petits carrés autour de chaque contrôle d'élargir suffisamment pour afficher le contenu complet .
4

Cliquez sur "Affichage" dans le menu du haut niveau en VB et sélectionner "Code ". Entrez le code suivant sur ​​des lignes séparées exactement comme indiqué:

Private Sub Command1_Click ()

MsgBox " nombre est acceptable. "

End Sub

privé sous Command2_Click ()

End of

End Sub Private Sub

Text1_Validate ( Cancel As Boolean)

If Not IsNumeric ( Text1.Text ) Puis < br >

Annuler = True

ElseIf CDbl ( Text1.Text ) < 1 ou CDbl ( Text1.Text ) > 1000 Then

Annuler = True

Fin Si

Annuler Puis

MsgBox " Le nombre saisi doit être compris entre 1 et 1000 " , vbExclamation

End If End Sub

5

Appuyez sur " F5" pour exécuter le programme. Entrez un numéro sur le formulaire et cliquez sur "OK". Si le nombre se situe entre 1 et 1000 , vous verrez un message d'acceptation . Testez en entrant un numéro à l'extérieur de cette plage ou un texte, qui donne alors un message d'erreur . Utilisez cette méthode pour valider d'autres opérations et effectuer les opérations souhaitées sur les informations saisies .