Discussion :

[Bonero]

Bonjour a tous,

Quelqu’un aurait-il l’amabilite de m’expliquer pourquoi mon code ne s’arrete pas lorsque la variable C n’est plus egale a 97 ?

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
19
20
21
22
23
24
25
26
27
28
29
30
31
Sub DebugAssert_Help2()
 
 
    Dim a As Boolean, b As Boolean, c As Integer
    a = True
    b = True
    c = 97
    Debug.Assert c = 97
 
 
    If a And b Then
        a = False
        c = c + 1
    Else
        a = True
        c = c - 1
    End If
 
 
    If Not (a And b) Then
        b = True
        c = c + 1
    Else
        c = c - 1
    End If
 
 
    Debug.Print c
 
 
End Sub

[vodiem]

salut Bonero,

parce que

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Debug.Assert c = 97

correspond à:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

If Not c = 97 Then Stop

(avec un arrêt total en plus)

[Papy Turbo]

Bonsoir, et merci Diem

N'ayant jamais utilisé Debug.Assert, j'ai fait le test.

Qu'est-ce que tu entends par :

(avec un arrêt total en plus)

Dans mon test, il s'arrête comme un Stop standard, et repart sur F8 ou F5.

[vodiem]

salut Papy

ben t'as raison. c'est équivalent.
mais dans le doute j'avais fait un test rapide comme j'utilise jamais non plus ^^ et je me suis emmêlé dans la tête F5 et F8...
bon ben en tant que bon informaticien, il me doit de déclaré ma mauvaise foi:
ben y en a qu'un qui suit ???
merci Papy...

[Bonero]

merci a tous pour vos reposnes.
j ai maintenant compris le jeu ; -)