umbenennen mehrere Etiketten in einem Panel VB

Question

Ich bin neu in VB und habe eine Frage über das Umbenennen von Etiketten

Ich habe 64 Etiketten ich zu einem Panel hinzugefügt haben und würde gerne wissen, ob man über sie alle auf einmal umbenennen unter Verwendung von Code, zum Beispiel Square1, Square2 usw.

Dank für die Zeit nehmen

Matthew

Answer 1

zu suchen, wenn sie innerhalb eines Panels ist genannt Panel1

Dim i As Integer = 1 
    For Each lb As Label In Panel1.Controls.OfType(Of Label) 
     lb.Text = "A" & i 
     i += 1 
    Next 

Wenn Sie die Etiketten im Formular ändern möchten ... Me.Controls.OfType(Of Label)