L'un des domaines les plus frustrants dans l'écriture de code dans toutes les langues, y compris Visual Basic, consiste à veiller à ce que lorsque les utilisateurs des informations d'entrée sous une forme qu'il est valide. Les utilisateurs, en particulier les inexpérimentés, peuvent trouver des moyens quasi illimités pour entrer des données invalides. Au mieux, un programmeur doit couvrir un nombre raisonnable de possibilités et de fournir des rapports d'erreur compréhensible dans le reste des cas. Visual Basic 6.0 gère la validation à deux termes: "Entraîne une validation" et "Validez."
Commencer un nouveau projet en sélectionnant le "EXE standard" modèle après vous ouvrez Visual Basic (VB). Cela ouvre une fenêtre de formulaire nommé "Form1." Pour démontrer comment les travaux de validation, ajoutent ces contrôles à la forme de la "ToolBox" sur la gauche de l'écran en double-cliquant sur chacun:
Une "Étiquette," représenté par une grande capitale "UN" icône.
Une "Zone de texte," représenté par une icône d'un petit carré contenant les lettres "ab."
Deux "CommandButtons," représenté par une petite icône rectangle blanc.
Cliquez sur et faites glisser les contrôles vous venez d'ajouter pour les séparer et de les aligner comme indiqué ci-dessous. Chaque commande ajoutée recouvre les précédentes, de sorte que celui du haut montrant à ce stade est la dernière "De commande," nommé "Command2."
Déplacez le "Command2" boîte à la droite de la forme.
Déménagement "Command1" dessus "Command2."
Déménagement "Label1" sur le côté gauche de la forme opposée "Command1."
Déménagement "Text1" en dessous "Label1."
Cliquer sur "Label1" et changer le "Légende" propriété dans le "Propriétés" colonne sur la droite de l'écran pour lire "Entrez le numéro désiré entre 1 et 1000." Cliquer sur "Text1" et supprimer le défaut "Texte" propriété. Changer la "Légende" propriétés "Command1" à "Aller" et "Command2" à "Annuler." Changer la "Entraîne une validation" propriété de "Command2" à "Faux." Note: Ne pas insérer des guillemets lors de ces changements. Utilisez les poignées de déplacement, les petits carrés autour de chaque commande pour les élargir suffisamment pour afficher le contenu complet.
Cliquez "Vue" dans le menu du haut niveau en VB et sélectionnez "Code." Entrez le code suivant sur des lignes séparées exactement comme indiquées:
Private Sub Command1_Click ()
MsgBox "Nombre est acceptable."
End Sub
Private Sub Command2_Click ()
Fin
End Sub
Private Sub Text1_Validate (Cancel As Boolean)
Si Non IsNumeric (Text1.Text) Ensuite,
Annuler = True
ElseIf CDbl (Text1.Text) lt; 1 ou CDbl (Text1.Text) gt; Puis 1000
Annuler = True
Fin si
Si Alors Annuler
MsgBox "Le numéro entré doit être comprise entre 1 et 1000", VbExclamation
Fin si
End Sub
Appuyez "F5" pour exécuter le programme. Entrez un numéro sur le formulaire et cliquez sur "D'ACCORD." Si le nombre se situe entre 1 et 1000, vous verrez un message d'acceptation. Test en entrant un numéro en dehors de cette plage ou texte, qui donne alors un message d'erreur. Utilisez cette approche pour valider d'autres opérations et effectuer des opérations désirées sur les informations saisies.