-
Par le geek du 25 le 5 Juin 2014 à 20:22
Le code:
--------------------------------------------------------------------------------------------
menu1 = inputbox ("comment t appelle tu ?")
menu2 = msgbox ("bonjours " & menu1 & " moi s est le geek du 25")
menu3 = inputbox ("quel age a tu ?")
menu4 = msgbox ("ok " & menu1 & " moi j ai 11 ans")
menu5 = inputbox ("que fait tu ?")
menu6 = msgbox ("moi je fais un programe informatique avec mon pote martin donc a plus tard")
question = inputbox ("veus tu que je reste ou pas ?" _
+ chr(13) _
+ "oui" _
+ chr(13) _
+ "non")
if (question = "oui") then
end if
menu7 = inputbox ("que veus tu faire?" _
+ chr(13) _
+ "discuter" _
+ chr(13) _
+ "ou ne rien faire")
if (menu7 = "discuter") then
reponce3 = inputbox ("de quoi?" _
+ chr (13) _
+ chr(13) _
+ "de voiture" _
+ chr(13) _
+ chr(13) _
+ "ou de fille")
end if
if (menu7 = "ou ne rien faire") then
reponce4 = msgbox ("ok j ai ete content de te connetre " & menu1 & "")
end if
if (reponce3 = "de voiture") then
reponce5 = inputbox ("" & menu1 & " a tu un collection minature?")
end if
menu8 = msgbox ("ok " & reponce5 & " moi j en ai 200")
if (reponce3 = "ou de fille") then
reponce6 = inputbox ("a tu une petite amie ou un petit amie" _
+ chr(13) _
+ chr(13) _
+ "oui" _
+ chr(13) _
+ chr(13) _
+ "nan")
end if
if (reponce6 = "oui") then
menu9 = inputbox (" oui tu a de la chance comment s appelle t elle ou il")
end if
menu10 = ("" & menu9 & " jolie prenom je dois partire j ai ete content de te connetre")
if (repnce6 = "nan") then
menu11 = msgbox ("" & reponce6 & "ne te decourage pas je doit y aller a plus")
end if----------------------------------------------------------------------------------------------
N'oublier pas si vous voulez le faire de suivre les règles dans le rubrique présentation.
Bonne conversation
votre commentaire
Suivre le flux RSS des articles de cette rubrique
Suivre le flux RSS des commentaires de cette rubrique