PUBLIC SUB Button1_Click() DIM mareponse AS Integer mareponse = Message.Warning("aimez vous les radis?", "oui", "non", "pastrop") SELECT CASE mareponse CASE 1 Label2.Text = "vous avez cliqué Oui" CASE 2 Label2.Text = "vous avez cliqué Non" CASE 3 Label2.Text = "pourtant c'est bon les radis !!!" END SELECT END
voila pour aujourd'hui
Date de création : 14/01/2010 @ 15:35
Dernière modification : 14/01/2010 @ 15:35
Catégorie : Les Messages Page lue 5253 fois