Code associé à des nouveaux boutons?

Question

Bonjour!

voici mon code qui sert à créer des nouveaux boutons dans mon form1.toolstrip1 à partir de mon form2.

Form1.ToolStrip1.Items.Add(New ToolStripButton With {.Text TextBox2.Text, .Tag TextBox1.Text, .Image = fav,.}

est-ce possible d'ajouter un code (method) identique à chaque bouton ? je voudrais que chaque boutons puisse faire naviguer mon webbrowser avec l'adresse qu'ils ont dans la propriété tag. possible? idées ?

Merci !

us_30 · Answer

Bonsoir,

- Possible, mais je ne sais pas. 
- Idée : Non plus. 
Mais une suggestion... Faire directement les boutons en "dur" dans l'application, plutôt que s'amuser à en créer de toute pièce, tu gagneras du temps, car je suis certain qu'au final si tu veux que ta programmation fonctionne, tu arriveras a faire comme ça... Il faut toujours penser à faire au simple, c'est déjà bien assez compliqué comme ça...

Amicalement,
Us.

foliv57 · Answer

Pour créer les boutons :

Dim tsb As New ToolStripButton(Text:=TextBox2.Text, Image:=fav)
tsb.Tag = TextBox1.Text
AddHandler tsb.Click, AddressOf ToolStripButton_Click
Me.ToolStrip1.Items.Add(tsb)

La sub qui exécute le code sur click du bouton :

Private Sub ToolStripButton_Click(ByVal sender As Object, ByVal e As EventArgs)
        MsgBox("Click sur " & CType(sender, ToolStripButton).Tag)
End Sub

Code associé à des nouveaux boutons?

2 réponses

Votre réponse

Discussions similaires