[VB.NET 2005] ToolStripItem et class
bonjour,
Je voudrais personnaliser la class ToolStripItem
Voici un exemple simple de ce que je fais.
Mais le problème c'est que les sous menu apparaisse bien dans mon MenuStrip mais sans le text.
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28
|
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim P1 As New cls_Personne("TOTO", "TATA")
Dim P2 As New cls_Personne("LULU", "LILI")
Menu_Personne.DropDownItems.Add(P1)
Menu_Personne.DropDownItems.Add(P2)
End Sub
End Class
Public Class cls_Personne
Inherits ToolStripItem
Private _Nom As String = ""
Private _Prenom As String = ""
Public Sub New(ByVal strNom As String, ByVal strprenom As String)
_Nom = strNom
_Prenom = strprenom
Me.Name = strNom
Me.Text = strNom
End Sub
End Class |
Merci de votre aide