Pass Variable in dynamisch erstellte Schaltfläche Click-Ereignishandler

Question

Ich erstelle ein Textfeld und Schaltfläche dynamisch wie dies in einem Flowlayoutpanel:

 Dim txtRating As New TextBox 
     txtRating.Name = "buildingRating_" + intCount.ToString 

     Dim btnAddRating As New Button 
     btnAddRating.Name = "addRating_" + intCount.ToString 

Und dann erstelle ich einen Event-Handler für die Schaltfläche:

AddHandler btnAddRating.Click, AddressOf HandleAddRatingButtonClick 

Jedes Textfeld und jede Schaltfläche werden mit dem intCount-Wert verknüpft, sodass es wie folgt aussieht:

buildingRating_1 addRating_1 
buildingRating_2 addRating_2 
buildingRating_3 addRating_3 
etc.... 

Ich muss den Wert der Textbox abrufen, die der Schaltfläche zugeordnet ist.

Zum Beispiel, wenn der Benutzer die Schaltfläche addRating_1 namens klickt, wird der Textwert von buildingRating_1 einer Datenbank gespeichert werden ...

Gibt es eine Möglichkeit, dass die Assoziation zu erhalten oder intCount in das btnAddRating.Click Ereignis passieren das ich erschaffe?

Danke!

Answer 1

Extrahieren Sie den Index aus dem Namen der Schaltfläche und verwenden Sie ihn, um den Namen der Textbox neu zu erstellen. Dann finden Sie die Textbox auf dem Formular.

Private Sub HandleAddRatingButtonClick(sender As Object, e As EventArgs) 
    Dim button = DirectCast(sender, Button) 
    Dim index = button.Name.Split("_"c).Last() 
    Dim textboxname = "buildingRating_" & index 
    Dim textbox = Me.Controls.OfType(Of TextBox).Single(Function(tb) tb.Name = textboxname) 
    Dim text = textbox.Text ' this is the text 
End Sub 

Wenn die Textbox in einem Behälter (Panel, groupbox, etc.) dann statt Me.Controls... tun Container.Controls...