voila, je vous explique mon problème

je suis étudiant et je débute en visual basic. J'aimerais savoir pourquoi l'expression logique en rouge est toujours vraie, même si les valeurs ne sont pas dans les bornes définies
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
Dim compt As Integer
Dim compt2 As Integer
c = 0
If j = 1 Then
  c = 0
  chargtab
ElseIf j > 1 Then
  For compt = 1 To (j - 1)
 
    For compt2 = 0 To 3
      ' aucun point ne peut être mit dans un rectangle existant[/color]
      If (X1(compt) < GX(compt2) < X4(compt)) And (Y1(compt) < GY(compt2) < Y4(compt)) Then ' <- Cette ligne
        Text3.Text = "aie"
        X1(j) = Empty
        Y1(j) = Empty
        X4(j) = Empty
        Y4(j) = Empty

merci de me répondre car là je bloque