Exclusion de nombre!
Bonjour à tous,
je souhaiterai exclure les chiffres 4, 7, 12 et 13 mais je ne sais pas comment m'y prendre. Je voudrai faire par exemple :
Si txtnumcours.text différent de (4, 7, 12, 13) alors
traitement
sinon
traitement
finsi
Merci d'avance
Cordialement
je souhaiterai exclure les chiffres 4, 7, 12 et 13 mais je ne sais pas comment m'y prendre. Je voudrai faire par exemple :
Si txtnumcours.text différent de (4, 7, 12, 13) alors
traitement
sinon
traitement
finsi
Merci d'avance
Cordialement
2 réponses
-
NB : J'utilise Visual basic 6.0
-
ContributeurBonjour,
Une façon de faire parmi d'autre..Sub VTest() Dim I As Integer, TB, B As Boolean TB = Array(4, 7, 12, 13) For I = 0 To 3 If txtnumcours.Value = TB(I) Then B = True: Exit For Next I If B Then 'Traitement quand un des nombres a été trouvé Else 'Si non End If End Sub
A+
L'expérience instruit plus sûrement que le conseil. (André Gide)
Si tu te cogne à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)
