Aucune action après Clic sur un bouton

Résolu
amacz - 11 janv. 2015 à 13:01
cs_ShayW Messages postés 3253 Date d'inscription jeudi 26 novembre 2009 Statut Membre Dernière intervention 3 décembre 2019 - 11 janv. 2015 à 14:56
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

cs_ShayW Messages postés 3253 Date d'inscription jeudi 26 novembre 2009 Statut Membre Dernière intervention 3 décembre 2019 57
11 janv. 2015 à 14:56
Bonjour

quel type de projet développes tu ? wpf application ?
0
Rejoignez-nous