ManicCW
Well-known member
Hi I want to copy all items from toolstrip to menustrip. i have a sub that raises click event and does some work:
code to copy items:
now i have a problem here. how do i attach the same event to menu? i have tried bolded part above but it does not work. i have no expirience with events so any help is great. tnx.
VB.NET:
Private Sub Naljepnice_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles _
tbMIL.Click, tbMPU.Click, tbMU.Click, tbMOP.Click, tbMKD.Click, tbMKDD.Click, tbR.Click, tbRS.Click, _
tbNEZG.Click, tbNEZGU.Click, tbNEZGZ.Click, tbZIVS.Click
Dim mn As ToolStripMenuItem
mn = CType(sender, ToolStripItem)
Select Case mn.Name.ToString
Case "tbNMKDD", "mnNMKDD"
CreateNew("Naljepnica", "MKD-D")
Case Else
CreateNew("Naljepnica", mn.Name.ToString.Remove(0, 2))
End Select
End Sub
code to copy items:
VB.NET:
Private Sub frmInterface_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Me.mnNaljepnice.DropDownItems.Clear()
Dim tb As ToolStripMenuItem
For Each tb In Me.tbNaljepnice.DropDownItems
Dim mn As New ToolStripMenuItem
mn = tb
mn.Name = tb.Name.ToString.Replace("tb", "mn")
mn.Text = tb.Text
Me.mnNaljepnice.DropDownItems.Add(mn.Text)
[B]AddHandler mn.Click, AddressOf Naljepnice_Click[/B]
Next
End Sub
now i have a problem here. how do i attach the same event to menu? i have tried bolded part above but it does not work. i have no expirience with events so any help is great. tnx.