[R] Petit Problème avec MsgBox.

[Maxter]

Bon c'est encore moi 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?

[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

[Maxter]

C'est facile maintenant que c'est dit^^ Merci en tout cas.