How to Create Event for Dynamic Control Array in VB.NET

Ich versuche, erstellen Sie ein array von Checkboxen dynamisch und auch auf event, um diejenigen Checkboxen. Wie kann ich dies tun?

Beispiel:

Ich habe ein array von Checkboxen - Chk1, Chk2.

Möchte ich es auf diese Weise zu arbeiten: Wenn ich Chk1, die ich deaktivieren möchten, Chk2, und wenn Chk1 deaktiviert ist, Chk2 aktiviert, und Umgekehrt.

Ihre Eingabe ist die großartige geschätzt.

Dank,

P. S.: Der code ist in VB.NET. Danke.

Danke Euch allen für die inputs. Ich schätzte es wirklich. Vielleicht war ich nicht ganz klar auf meine Erklärung zuvor.

Sagen wir mal, ich habe ein array von 6 Checkboxen und ich möchte, dass Sie Verhalten sich in der Gruppe so:

  • Wenn Chk1 aktiviert ist, Chk2 deaktiviert ist (Grau-out), und wenn wir deaktivieren, Chk1, Chk2 aktiviert ist, und Umgekehrt.

  • Wenn Chk3 aktiviert ist, Chk4 ist deaktiviert, und wenn wir deaktivieren, Chk3, Chk4 aktiviert ist, und Umgekehrt.

und so weiter....

So ist dieses, wie jedes paar Checkboxen im array führen Sie die CheckChanged Veranstaltung bei jedem anderen, aber nicht auf jedes andere paar. Also ich denke Optionsfeld ist nicht der Fall in dieser situation.

Vielen Dank für alle Vorschläge.

  • Was ist das, was Sie bisher ausprobiert? Wo haben Sie Probleme konkret? Was bedeuten die mit einer Reihe von Kontrollkästchen zu sehen, wie viele sind es dynamisch erzeugt oder statisch, wie sind Sie miteinander verbunden?? Meinst du ASP.Net oder Winforms?
  • Sollten Sie kommentieren unsere Antworten, die Sie bisher ausprobiert habe und wo Sie Probleme haben. Ich kann nur reden, meine Antwort sollte diese Arbeit genau so, wie Sie wollen. Ich bin die Identifizierung der Paare über Ihre IDs(chk1 gehört zu chk2, chk3, um chk4 und so weiter). Einen Blick: stackoverflow.com/questions/4199370/... Btw, vergessen Sie nicht, upvote Antworten, die sind wenigstens sinnvoll(Pfeil nach oben) oder/und daneben die beste Antwort als die Antwort(die Prüfung).
InformationsquelleAutor Heang S. | 2010-11-16
  1. 0

    Davon aus, dass es ASP.Net haben Sie einen Blick auf diese "seltsame" Beispiel zu sehen, wie es funktioniert(nehmen Sie Ihre array statt meine statische Schöpfung):

    Private Sub WebForm1_Init(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Init
    For number As Int32 = 1 To 100
        Dim chk As New CheckBox
        chk.ID = "chk" & number
        chk.Text = chk.ID
        chk.AutoPostBack = True
        AddHandler chk.CheckedChanged, AddressOf onCheckedChanged
        Me.MyChkPanel.Controls.Add(chk)
    Next
End Sub

Private Sub onCheckedChanged(ByVal sender As Object, ByVal e As EventArgs)
    Dim chk As CheckBox = DirectCast(sender, CheckBox)
    Dim number As Int32 = Int32.Parse(chk.ID.Substring("chk".Length))
    Dim otherChk As CheckBox
    If number Mod 2 = 0 Then
        otherChk = DirectCast(Me.MyChkPanel.FindControl("chk" & (number - 1)), CheckBox)
    Else
        otherChk = DirectCast(Me.MyChkPanel.FindControl("chk" & (number + 1)), CheckBox)
    End If
    otherChk.Enabled = Not chk.Checked
End Sub

    Abgesehen davon, dass ich abonnieren kann Hans' Vorschlag, RadioButtons oder zumindest eine CheckBoxList.

    • Sie sind ein Genie, Tim! Es funktioniert wie vorgesehen. Vielen Dank!
    InformationsquelleAutor Tim Schmelter
  2. 0

    Einen RadioButton würde dies automatisch tun und ist eher konventionell. Für eine Reihe von Kontrollkästchen, die Sie verwenden können, einen einzigen handler für das gesamte array:

    Private Sub _CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs)
Dim i As Integer
If sender.checked Then
  For i = 0 To UBound(chk)
    If chk(i) IsNot sender Then chk(i).Checked = False
  Next i
End If
End Sub

    Im Hinterkopf behalten, wenn Sie änderungen an dieser Prozedur, dass es heißt rekursiv, wenn Sie set chk(i).überprüft, um false. Es spielt keine Rolle in diesem Fall, denn es springt alles, wenn Absender.überprüft, ist falsch.

    Wenn Sie es brauchen, hier ist eine Möglichkeit zum einrichten des array. (Die index-Eigenschaft im designer verschwunden, in den upgrade von vb6 zu .net, so dass Sie haben, um ein array von Steuerelementen im code jetzt.)

    Public Class Form1
Dim chk(4) As CheckBox

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim i, k As Integer
k = 20
For i = 0 To UBound(chk)
  chk(i) = New CheckBox
  Me.Controls.Add(chk(i))
  chk(i).Location = New Point(20, k)
  k = k + chk(0).Height * 1.5 ' or some location
  chk(i).Text = "Checkbox " & i ' some appropriate text
  AddHandler chk(i).CheckedChanged, AddressOf _CheckedChanged
Next i

End Sub
    InformationsquelleAutor xpda
Schreibe einen Kommentar