Aide pour convertir un code C# en VB.NET

Question

Salut
Dans le cadre de la création d'une application Windows Phone, j'ai besoin d'utiliser la classe CustomMessageBox apportée par le WindowsPhoneToolkit. Le problème, c'est que je n'ai trouvé nulle part de code en VB.NET, et que les convertisseurs que j'ai essayés n'ont pas converti le code comme il le fallait. Alors si quelqu'un pouvait m'aider... Le code n'est pas très complexe mais j'ai des problèmes pour les gestionnaires d'évènements (pour leurs conversions) :
        CustomMessageBox messageBox = new CustomMessageBox()
{
    Caption = "Do you like this sample?",
    Message = "There are tons of things you can do using custom message boxes. To learn more, be sure to check out the source code at CodePlex.",
    LeftButtonContent = "yes",
    RightButtonContent = "no"
};

messageBox.Dismissed += (s1, e1) =>
    {
        switch (e1.Result)
        {
            case CustomMessageBoxResult.LeftButton:
                // Do something.
                break;
            case CustomMessageBoxResult.RightButton:
                // Do something.
                break;
            case CustomMessageBoxResult.None:
                // Do something.
                break;
            default:
                break;
        }
    };

messageBox.Show();
    }

cs_Robert33 · Answer

Bonsoir

Difficile d'être formel sans connaitre avec précision le type  CustomMessageBox

mais cela devrait être quelque chose comme:
Déclaration d'une variable messageBox

Private WithEvents messageBox As CustomMessageBox
 

Déclaration du gestionnaire d'évènements
 c'est là ou il faut connaitre les types des arguments retournés par l'évènement

Private Sub messageBoxResult(sender As Object, e1 As CustomMessageBoxResultType) Handles messageBox.Dismissed
    Select Case e1.Result

Case CustomMessageBoxResult.LeftButton
            ' Do something.
        Case CustomMessageBoxResult.RightButton
            ' Do something.
        Case CustomMessageBoxResult.None
            ' Do something.
        Case Else
    End Select

End Sub
 
Utilisation

messageBox = New CustomMessageBox()

messageBox.Caption = "Do you like this sample?"
messageBox.Message = "There are tons of things you can do using custom message boxes. To learn more, be sure to check out the source code at CodePlex."
messageBox.LeftButtonContent = "yes"
messageBox.RightButtonContent = "no"

messageBox.Show()


Bon code...

Aide pour convertir un code C# en VB.NET

1 réponse

Discussions similaires