mortalino
Messages postés6786Date d'inscriptionvendredi 16 décembre 2005StatutMembreDernière intervention21 décembre 201118 20 déc. 2005 à 13:46
Salut,
Tu as une autre possibilité : tu crées 2 textbox
entre ces deux textbox, tu crées un Label avec ":" en prorpiété Caption de ce Label
Dans ta procédure, déclare deux variables (ex: dim Heure1, Minute1 as Integer)
Puis, dans ton code avant la validation des données :
Heure1 = Textbox1.Value
Minute1 = Textbox2.Value
If Heure1 < 0 and Heure1 >= 24 then
Msgbox ("Vous ne pouvez rentrer que des chiffres compris entre 0 & 23")
End sub
ElseIf Minute1< 0 and Minute1>= 60then
Msgbox ("Vous ne pouvez rentrer que des chiffres compris entre 0 & 59")
End sub
End if
Comme ça, si quelqu'un rentre un nombre indésirable ou des lettres, il aura ce message d'erreur et la procédure s'arrête.