Discussion :

[gderenne]

Salut,

j'ai besoin de traduire un bout de code afin de mieux le comprendre pour le retravailler en VB, mais les traducteurs automatiques ou Reflector (donc, apres compilation du code C#) n'arrivent pas à me donner une version VB fonctionnelle de ce bout de code :

Code C# :

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

1
2
3
4
5
6
7
8
9
10
11
12
public event EventHandler ErrorDetectedEvent;
 
protected virtual void RaiseExceptionDetectedEvent(string messageCourt, Exception ex)
{
    this.LastException = ex;
    this.LastErrorMsg = messageCourt;
    this.IsErrorDetected = true;
 
    EventHandler Evennement = ErrorDetectedEvent;
    if (Evennement != null)
        Evennement(this, new EventArgs());
}

Les traductions automatiques donnent ceci comme réponse :

Code VB :

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

1
2
3
4
5
6
7
8
9
10
11
12
Public Event ErrorDetectedEvent As EventHandler
 
Protected Overridable Sub RaiseExceptionDetectedEvent(ByVal messageCourt As String, ByVal ex As Exception)
  Me.LastException = ex
  Me.LastErrorMsg = messageCourt
  Me.IsErrorDetected = True
 
  Dim Evennement As EventHandler = ErrorDetectedEvent
  If Not Evennement Is Nothing Then
    Evennement(Me, New EventArgs())
  End If
End Sub

Le problème est que la ligne Dim Evennement As EventHandler = ErrorDetectedEvent n'est pas bonne car :

Public Event ErrorDetectedEvent(sender As Object, e As System.EventArgs)' est un événement. Il ne peut donc pas être appelé directement. Utilisez une instruction 'RaiseEvent' pour déclencher un événement.

Si un bilingue (C#/VB) pouvait me donner un coup de main, ca serait super cool

Merci par avance à cette âme charitable.