Page 1 sur 1

[R] Petit Problème avec MsgBox.

Posté : jeu. 28 août 2008 20:46
par Maxter
Bon c'est encore moi :o Alors je découvre, je teste, je vais dans l'aide et voilà un truc me pose problème alors que ça parait anodin...

Code : Tout sélectionner

; -------------------------------------------
; -------------------------------------------

$msgbox = MsgBox(0, "Message 1", "???")
If $msgbox = $msgbox[1]  Then 
    MsgBox(0, "Message 2", "???")
Else
    Exit
EndIf

Ce que je veux faire est simple. Si j'appuie sur OK dans la première boite de message, alors la deuxième boite s'ouvre. Si je clique sur la croix, le programme s'arrête.

Return Value de OK (a ce que j'ai lu dans l'aide) devrait être [1]. Donc j'ai fait ça... Qu'est-ce qui cloche SVP?

Re: [...] Petit Problème

Posté : jeu. 28 août 2008 22:36
par jbnh

Code : Tout sélectionner

$msgbox = MsgBox(1, "Message 1", "continuer?")

If $msgbox = 1  Then

    MsgBox(0, "Message 2", "C'est parti")
    
Else

    MsgBox(0, "Message 2", "Bye")
    exit
    
EndIf

Re: [R] Petit Problème avec MsgBox.

Posté : ven. 29 août 2008 13:07
par Maxter
C'est facile maintenant que c'est dit^^ Merci en tout cas.