Hallo,
wie mache ich es am besten?
Ich habe zwei Listboxen da stehen ähnliche Sachen drin. Wenn ich in Listbox 1 einen Eintrag aktiviere soll der Eintrag (falls einer markiert ist) ist Listbox 2 (egal welcher markiert ist) deaktiviert werden. 2 markierte Eintrage (in 2 Listboxen) würden den Benutzer verwirren, zu wem die angezeigten Daten nun gehören. Das gleiche auch umgekehrt.
Ich habe schon einige Varianten ausprobiert, aber immer gibt es Nebenwirkungen. Momentan deaktivieren sich beide Einträge wenn ich einen in der2. Listbox aktiviere.
Bei der anderen Variante habe ich das Problem das ewin Speicherüberlauf kommt...
Edit: um es verständlicher zu machen.
wie mache ich es am besten?
Ich habe zwei Listboxen da stehen ähnliche Sachen drin. Wenn ich in Listbox 1 einen Eintrag aktiviere soll der Eintrag (falls einer markiert ist) ist Listbox 2 (egal welcher markiert ist) deaktiviert werden. 2 markierte Eintrage (in 2 Listboxen) würden den Benutzer verwirren, zu wem die angezeigten Daten nun gehören. Das gleiche auch umgekehrt.
Ich habe schon einige Varianten ausprobiert, aber immer gibt es Nebenwirkungen. Momentan deaktivieren sich beide Einträge wenn ich einen in der2. Listbox aktiviere.
Bei der anderen Variante habe ich das Problem das ewin Speicherüberlauf kommt...
VB.NET-Quellcode
- Private Sub LB_2er_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles LB_2er.SelectedIndexChanged
- Dim Liste As Integer = 2, Index As Integer = LB_2er.SelectedIndex
- If Index <> -1 Then Call Effekte_markieren(Liste, Index)
- LB_3er.ClearSelected()
- End Sub
- Private Sub LB_3er_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles LB_3er.SelectedIndexChanged
- Dim Liste As Integer = 3, Index As Integer = LB_3er.SelectedIndex
- If Index <> -1 Then Call Effekte_markieren(Liste, Index)
- LB_2er.ClearSelected()
- End Sub
- Private Sub Effekte_markieren(ByVal Liste As Integer, ByVal Index As Integer)
- ' ...
- ' LB_3er.ClearSelected()
- ' LB_2er.ClearSelected()
- If Index = -1 Then Exit Sub
- Select Case Liste
- Case 2
- ' If LB_2er.SelectedIndex > -1 And LB_3er.SelectedIndex > -1 Then
- ' LB_3er.ClearSelected()
- 'LB_2er.SetSelected(Index, True)
- ' ...
- Case 3
- ' LB_2er.ClearSelected()
- 'LB_3er.SetSelected(Index, True)
- ' If LB_2er.SelectedIndex > -1 And LB_3er.SelectedIndex > -1 Then
- ' ...
- End Select
- ....
- End Sub
Edit: um es verständlicher zu machen.
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „o815michi“ ()