Bonjour,

J'ai besoin de votre aide car je suis sûre que d'autres ont rencontré le même problème.

Voici mon code (au complet) :

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
 
'test si date fin < date début et l'initialise par déf à date début
 
Private Sub DateTimePicker8_ValueChanged(ByVal sender As System.Object, _
ByVal e As System.EventArgs) _
Handles DateTimePicker8.ValueChanged
 
   If DateTimePicker8.Value < DateTimePicker1.Value Then
 
      MessageBox.Show("La date de fin ne peut être antérieure à la date de début.", _
      "Erreur sur la date de fin", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
 
      End If
 
   'prend la date de début par défaut
   DateTimePicker8.Value = DateTimePicker1.Value 
 
End Sub
et voici mon problème :
lorsque je fais " DateTimePicker8.Value = DateTimePicker1.Value ", il relance "Private Sub DateTimePicker8_ValueChanged" (normal, j'ai changé ...8.Value) et me réaffiche le msgbox.

Où dois-je mettre le " DateTimePicker8.Value = DateTimePicker1.Value " pour qu'il ne relance pas la Sub ?

Merci pour vos réponses.


*** Y a vraiment personne qui a eu ce problème ? ***