Discussion :

[ne2sbeal]

Voilà je suis un étudiant en BTS Info et je me lance dans mon premier programme sous VB.net et j'ai besoin de quelque renseignement que je n'es pas trouvé dans le tuto du site, après peut etre qu'il y es mais en tout cas je ne l'es pas vue.

Donc j'explique mon probleme, j'ai ouvert une "imput box" afin de rentrer un Integer en valeur. Après je voudrais que si on rentre autre choze qu'un Integer ça ne marche pas et je voudrais faire ça dans un "if"

Un peu comme ça en fet :

NbNotes = InputBox("Combien voulez vous rentrer de note?")
If NbNotes "Pas un entier" Then
NbNotes = InputBox("Combien voulez vous rentrer de note?")
End If

merci de votre aide

[tomlev]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
If Not IsNumeric(NbNotes) Then
...

Par contre il vaudrait mieux faire ça dans une boucle, parce que tel que tu le fais, si l'utilisateur se plante encore la 2e fois tu es coincé...

Je ferais un truc comme ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Dim NbNotes As String = "z" ' pas un nombre
While Not IsNumeric(NbNotes)
    NbNotes = InputBox("Combien voulez vous rentrer de note?")
End While

[ne2sbeal]

ok
merci pour ta réponse

j'ai une autre question, comment on peut gérer le bouton annuler d'une inputBox?

[SaumonAgile]

D'après mes souvenirs InputBox renvoie Nothing si tu cliques sur Annuler

[ne2sbeal]

et comment peut-on changer ça?
merci d'avance

[tomlev]

D'après mes souvenirs InputBox renvoie Nothing si tu cliques sur Annuler

Nop...
http://msdn.microsoft.com/fr-fr/library/6z0ak68w.aspx

Si l'utilisateur clique sur Annuler, une chaîne de longueur nulle est retournée.

et comment peut-on changer ça?

Comment ça ? Tu ne peux pas le changer, la fonction marche comme ça, c'est tout... ou alors j'ai pas compris ce que tu demandes

[peregna2007]

Salut

voici un lien qui aide beaucoup.

http://plasserre.developpez.com/vsommair.htm