(J'ai rajouté des MsgBox sur chaques possibilité pour voir où allait le programme et à chaques fois, il tombe sur "Vide".
Sauf que quoique j'écrive, il détecte toujours la variable comme vide. Voici le code :
Code : Tout sélectionner
Global $oui = 'Oui'
Global $non = 'Non'
Global $sac = ''
InputBox("Question","Y-a t-il quelque chose dans le sac ? (Oui/Non)"&@CRLF&'"Oui" est sélectionné par défaut',$sac)
If $sac = '' Then
$sac = $oui
MsgBox(0,'','Vide')
ElseIf $sac = $oui Then
$sac = $oui
MsgBox(0,'','Oui')
ElseIf $sac = $non Then
$sac = $non
MsgBox(0,'','Non')
Else
MsgBox(16,'Erreur','Veuillez répondre par "Oui", "Non" ou n'&"'écrivez rien")
Quitter()
EndIf
Exit

