Corrigé 12.9 Effectuer une action selon le choix de l’utilisateur
Sub ActionSelonChoix()
Dim strMessage As String
Dim intBoutonIcône As Integer
Dim strTitre As String
Dim intChoix As Integer
strMessage = "Ajout... Pour consulter la suite, découvrez le livre suivant :
En version papier
En version numérique
En illimité avec l'abonnement ENI
Sur la boutique officielle ENI
Conditions générales d'utilisationCopyright - © Editions ENI ||Politique de protection des données du groupe ENI