Hallo,
ich habe folgende Problemstellung:
Ich habe einen Tabcontrol, welcher während der Laufzeit dynamisch Tab's hinzugefügt bekommt.
Anschließend bekommt jedes Tag eigene Controls zugewiesen wie z.B. eine ListBox.
Diese Listbox wird dann gefüllt. Alles soweit hinbekommen.
Nun möchte ich Ereignisse hervorrufen durch Events, habe bisher mit Addhandler gearbeitet.
Funktioniert vom Prinzip her so wie ich es mir vorgestellt habe nur folgendes:
Sobald ich ein Item im dynamisch Generierten Listbox anklicke soll er die anderen ebenfalls
dynamisch hinzugefügten Controls anzeigen lassen (visible = true). Nur kann ich darauf nicht
zugreifen da sie nicht Global deklariert sind. Kann ich die anderen Objekte/Controls irgendwie
über das gleiche Addhandler mitsenden, sodass ich beim Sub darauf zugreifen kann?
Code:
Gruß
ich habe folgende Problemstellung:
Ich habe einen Tabcontrol, welcher während der Laufzeit dynamisch Tab's hinzugefügt bekommt.
Anschließend bekommt jedes Tag eigene Controls zugewiesen wie z.B. eine ListBox.
Diese Listbox wird dann gefüllt. Alles soweit hinbekommen.
Nun möchte ich Ereignisse hervorrufen durch Events, habe bisher mit Addhandler gearbeitet.
Funktioniert vom Prinzip her so wie ich es mir vorgestellt habe nur folgendes:
Sobald ich ein Item im dynamisch Generierten Listbox anklicke soll er die anderen ebenfalls
dynamisch hinzugefügten Controls anzeigen lassen (visible = true). Nur kann ich darauf nicht
zugreifen da sie nicht Global deklariert sind. Kann ich die anderen Objekte/Controls irgendwie
über das gleiche Addhandler mitsenden, sodass ich beim Sub darauf zugreifen kann?
Code:
VB.NET-Quellcode
- Private Sub Daten_Laden()
- For Each Page As TabPage In TabControl1.TabPages
- Dim Tabelle As New ListBox
- Dim PBox As New PictureBox
- Dim DB As New Button
- ...
- AddHandler Tabelle.SelectedIndexChanged, AddressOf ItemAuswahl
- Next
- End Sub
- (...)
- Private Sub ItemAuswahl(sender As System.Object, e As System.EventArgs)
- Dim Tabelle As ListBox
- Tabelle = CType(sender, ListBox)
- 'Hier würde ich gerne DB oder PBox.visible = true stellen
- End Sub
Gruß
Hochachtungsvoll
MindFreak
MindFreak