Bonjour.

Je suis novice en VB et je suis actuellement en parallèles les cours proposés ici et ceux du coach vb net de microsoft.

J'ai une erreur sur l'utilisation du snippet Appevent m'indiquant que My n'est pas déclaré lorsque je lance le debug et je ne comprend pas 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
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
Public Class Calculateur
 
#Region "Fonctions mathématiques"
    ''' <summary>
    ''' 
    ''' Cette fonction ajoute deux valeurs entières
    ''' 
    ''' ''' </summary>
    ''' 
    ''' <param name="valeur1">Première valeur</param>
    ''' 
    ''' <param name="valeur2">Deuxième valeur</param>
    ''' 
    ''' <returns>l'entier de résultat</returns>
    ''' 
    Shared Function Ajouter(ByVal valeur1 As Integer, _
                ByVal valeur2 As Integer) As Integer
 
        Return valeur1 + valeur2
 
    End Function
 
    'TODO : Ajouter le code pour les fonctions *, / et -
 
    Function Multiplier(ByVal valeur1 As Integer, ByVal valeur2 As Integer) As Integer
 
        Return valeur1 * valeur2
 
 
    End Function
 
    My.Application.Log.WriteEntry("Action complete.")
 
#End Region
 
#Region "Autres fonctions de calcul"
 
#End Region
 
End Class
Si je mets ma ligne

Code : Sélectionner tout - Visualiser dans une fenêtre à part
My.Application.Log.WriteEntry("Action complete.")
à l'intérieur d'une fonction, pas de soucis, dans la classe directement : erreur.

Merci d'avance de votre aide.