Bonjour,
je suis sur VB6.
Dans "Test2" je genere volontairement une erreur.
Si dans "Test1" j'appelle "Test2", l'erreur est récuperée par le gestionnaire
d'erreur de "Test1".
Mais si je l'appelle par "Form1.Test2", alors c'est VB6 qui m'affiche l'erreur.
Qui peut m'expliquer pourquoi ?
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 Private Sub Bouton1_Click() Form1.Test1 End Sub Public Sub Test1() On Error GoTo ErrorTest1 Test2 'ok Form1.Test2 'pas ok Exit Sub ErrorTest1: MsgBox Err.Number End Sub Public Sub Test2() Dim a As Byte a = -1 End Sub
Partager