Bonjour,
je souhaiterai contrôler les minutes d'un textbox. En fait, j'ai un textbox (format texte) dans lequel je saisis l'heure (au format 16:59 par exemple) mais je ne sais pas comment extraire uniquement les deux derniers caractères (ici le 59) à partir de la troisième position afin de pouvoir faire le test pour que les minutes soient < 60 et dans le même sens faire de telle sorte que les heures soient < 24. Merci d'avance.
NB : pour contrôler les minutes, j'ai essayé :
mais le problème est que même pour 16:48 il m'affiche l'erreur.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18 pos6 = InStr(4, txtheure.Text, "6", 1) pos7 = InStr(4, txtheure.Text, "7", 1) pos8 = InStr(4, txtheure.Text, "8", 1) pos9 = InStr(4, txtheure.Text, "9", 1) If pos6 Then MsgBox "Veuillez resaisir les minutes svp!" txtheure.SetFocus ElseIf pos7 Then MsgBox "Veuillez resaisir les minutes svp!" txtheure.SetFocus ElseIf pos8 Then MsgBox "Veuillez resaisir les minutes svp!" txtheure.SetFocus ElseIf pos9 Then MsgBox "Veuillez resaisir les minutes svp!" txtheure.SetFocus Else End If
Cordialement
Partager