PDA

Click to See Complete Forum and Search --> : Control Arrays in VB.Net


Mih_Flyer
Apr 14th, 2002, 04:20 AM
Well, i know that the Control Array are no longer supported in Vb.NET, Also i know i can use something like this instead:

Private Sub MixedControls_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles Button1.Click, _
Button2.Click, Button3.Click
Select Case sender.TabIndex
Case 0
MsgBox("Button 1")
Case 1
MsgBox("Button 2")
Case 2
MsgBox("Button 3")
End Select
End Sub


But My problem is in this Class:

Event MenuClick(ByVal Index As Integer)

Private Sub MenuTitles_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles MenuTitles.Click
RaiseEvent MenuClick(sender.TabIndex)
End Sub

Public Sub AddMenu(ByVal MenuTitle As String)
MenuCount = MenuCount + 1
MenuTitles = New mnu()
MenuTitles.Text = MenuTitle
MenuTitles.AutoSize = True
MenuTitles.Tag = "Menu"
MenuTitles.TabIndex = MenuCount
MenuTitles.BorderStyle = BorderStyle.FixedSingle
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.MenuTitles})
End Sub


Now,, the MenuTitles_Click Event is not Raised unless i clicked in the last instanse of Menutitles Which is a Label,,,please help..
i wish you could understand the problem

Thanx