en passant un argument dans Ans oui

enfin, un truc du genre :
prgmMAIN

Disp "blablabla"
1:prgmSUB
2:prgmSUB

prgmSUB

If Ans=1
Then
        Disp "HELLOW :)"
        Return
End

If Ans=2
Then
        Disp "lol"
        Return
End

...

Return

Ici, ça affiche "blablabla", puis "HELLOW " puis "lol"