Valeur sur un boutton

Signaler
Messages postés
675
Date d'inscription
samedi 31 mai 2003
Statut
Membre
Dernière intervention
26 mai 2013
-
Messages postés
1247
Date d'inscription
mardi 7 mai 2002
Statut
Membre
Dernière intervention
18 février 2019
-
Je voudrais savoir si c'est possible de
placer une valeur a un boutton sur une form
et qu'il garde la valeur quand j'ouvre une autre form

je voudrais quand je clic sur un boutton
par ex: boutton 5 ou boutton 6 ou boutton 7

il ouvre une form et dans le titre j'ai la valeur du boutton

comme :

titre5 titre6 titre7
et ne me dite pas de faire plusieur form sa je sais
je voudrais la meme form mais uniquement la valeur qui change

Merci d'avance

1 réponse

Messages postés
1247
Date d'inscription
mardi 7 mai 2002
Statut
Membre
Dernière intervention
18 février 2019
4
Tu a plusieurs posibilité, la plus simple a mon sens et de créer un groupe de bouton avec index. Si tu ne connait pas :

-Tu place un bouton : command1 et tu met dans la propriété index de ce bouton 1
-ENsuite tu remplace un bouton du même nom : Command1 et tu met l'index a 2, et ainsi de suite .....

Dans ton code :
Private Sub Command1_Click(Index As Integer)
Form2.Show
Form2.Caption = "Titre " & Index
End Sub


Une autre solution moin propre et qui alourdirait le code serait par exemple d'afficher sur tes boutons :
Titre 1
Titre 2
etc....

et dans chaque evenement click des boutons :

Private Sub Command1_Click()
Form2.Show
Form2.Caption = Command1.Caption
End Sub

Private Sub Command2_Click()
Form2.Show
Form2.Caption = Command2.Caption
End Sub

'Ainsi de suite


Voila 2 possibilité, mais la premiére et certainement la solution la plus propre au niveau du code....

++