CRÉATEUR DE MSGBOX V1.0

Signaler
Messages postés
240
Date d'inscription
vendredi 14 juin 2002
Statut
Membre
Dernière intervention
17 mars 2009
-
Messages postés
240
Date d'inscription
vendredi 14 juin 2002
Statut
Membre
Dernière intervention
17 mars 2009
-
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/3747-createur-de-msgbox-v1-0

Messages postés
240
Date d'inscription
vendredi 14 juin 2002
Statut
Membre
Dernière intervention
17 mars 2009

Alors ne perds pas ton temps à laisser un commentaire ;)

PS: j'avais complètement oublié cette source postée en 2002. Ahhh, c'était le bon temps où on était heureux de réussir à ouvrir une boite de dialogue ^^
Messages postés
24
Date d'inscription
samedi 31 décembre 2005
Statut
Membre
Dernière intervention
3 novembre 2007

perd de temps :(
Messages postés
8
Date d'inscription
mercredi 31 mai 2006
Statut
Membre
Dernière intervention
22 juin 2006

Sé encore moi j'ai dekortiker ton programme a la loupe pour aprendrre a programmer mé je ne comprend plus rien sur sa pourait me décorticer sa ligne par ligne
If IconeT "" And Bouton "" Then
MBText = "MsgBox(" & MBFormat & ", " & " " & MDLT & ", " & Chr$(34) & Titre & Chr$(34) & ")"
ElseIf IconeT = "" Then
MBText = "MsgBox(" & MBFormat & ", " & boutonT & " + " & MDLT & ", " & Chr$(34) & Titre & Chr$(34) & ")"
ElseIf Bouton = "" Then
MBText = "MsgBox(" & MBFormat & ", " & boutonT & " + " & MDLT & " + " & IconeT & ", " & Chr$(34) & Titre & Chr$(34) & ")"
Else
MBText = "MsgBox(" & MBFormat & ", " & boutonT & " + " & IconeT & ", " & Chr$(34) & Titre & Chr$(34) & ")"
End If
Open "C:\MsgBox Code Source.txt" For Append As #1
Print #1, MBText
Close #1
MsgBox "Les informations sont enregistrées dans C:\MsgBox Code Source.txt"
End
F1:
End Sub
Messages postés
8
Date d'inscription
mercredi 31 mai 2006
Statut
Membre
Dernière intervention
22 juin 2006

MI JE SUIS NOUVEAUX ET JE SUSI TR2S CONTENT QU4IL AILLE DES PROG COMME SA POUR M'AIDER
Afficher les 16 commentaires