Ouvrez un de vos projets VB.NET en utilisant Microsoft Visual Studio. Localisez la méthode Page_Load dans le formulaire de démarrage du projet.
Collez le code suivant en haut de cette méthode:
Dim stringValue1 Comme String = "100"
Dim stringValue2 Comme String = "100,1"
Dim stringValue3 Comme String = "A B C D"
MessageBox.Show (MakeInt (stringValue1))
MessageBox.Show (MakeInt (stringValue2))
MessageBox.Show (MakeInt (stringValue3))
Cela crée trois variables de chaîne, et leur attribue des valeurs. La première variable contient "100." Cela est une valeur entière valide. La valeur de la deuxième variable est "100.1." Voilà un numéro valide, mais il est pas un entier valide. La dernière variable, "stringValue3," a une valeur non valide. Cette valeur est "A B C D." Les trois derniers états passent les trois variables d'une fonction nommée "MakeInt." Cette fonction tente de convertir chaque chaîne d'un entier et renvoie le résultat de cette tentative de la méthode Page_Load. Les commandes de MessageBox.Show affichent les valeurs renvoyées par les appels de fonction.
Collez la fonction suivante ci-dessous la méthode Page_Load:
Fonction MakeInt (ByVal val As String) As Integer
Dim INTVAL As Integer
Si Non Integer.TryParse (val, INTVAL) Ensuite,
INTVAL = -1
Fin si
Retour INTVAL
End Function
Cette fonction utilise le "TryParse" méthode pour convertir la valeur de chaîne qu'il reçoit en un entier. Si elle réussit, elle stocke le résultat dans la "INTVAL" variable. Si la tentative de conversion échoue, la fonction définit la valeur de "INTVAL" variable pour "-1."
Appuyez sur votre "F5" clé. Visual Studio gère le projet. La première "MessageBox.Show" commande affiche "100" parce que la fonction était capable de convertir la chaîne contenant "100" dans un entier valide. Les deux prochains "MessageBox.Show" affichage des commandes "-1." Ces valeurs, "100,1" et "A B C D," ne sont pas des nombres entiers. La fonction retourne "-1" car il n'a pas pu convertir ces valeurs en nombres entiers.