Aucune action après Clic sur un bouton [Résolu]

Signaler
-
Messages postés
3258
Date d'inscription
jeudi 26 novembre 2009
Statut
Membre
Dernière intervention
3 décembre 2019
-
Bonjour,
Je suis en train de créer un jeu, et je souhaite que lorsque l'utilisateur clique sur un bouton, cela compare le texte qu'il a entré et une variable, et que si les deux sont identiques, cela affiche un message :

Dim Titre As String
Dim Reponse As String
Reponse = "GET LUCKY"
Titre = Titre_Entré.Text
Titre.Replace("é", "e")
Titre.Replace("è", "e")
Titre.Replace("à", "a")
Titre.Replace("ù", "u")
Titre.Replace("'", " ")
Titre = Titre.ToUpper
Dim Comparaison As Integer = Titre.CompareTo(Reponse)
If Comparaison = 1 Then
Dim messageDialog = New MessageDialog("Bonne Réponse")

' Add buttons and set their callbacks
messageDialog.Commands.Add(New UICommand("Question Suivante", Sub(command)
Me.Frame.Navigate(GetType(Série_2___Question_2))
End Sub))
Else
Dim messageDialog = New MessageDialog("Mauvaise Réponse")

' Add buttons and set their callbacks
messageDialog.Commands.Add(New UICommand("Question Suivante", Sub(command)
Me.Frame.Navigate(GetType(Série_2___Question_2))
End Sub))
End If


Or, lorsque je Clique sur le bouton, rien ne se passe.
Où ai-je fait un erreur?

1 réponse

Messages postés
3258
Date d'inscription
jeudi 26 novembre 2009
Statut
Membre
Dernière intervention
3 décembre 2019
50
Bonjour

quel type de projet développes tu ? wpf application ?