重命名面板VB中的多个标签

Question

我是VB新手，对于重命名标签有疑问

我已经在面板中添加了64个标签，并且想知道是否可以使用代码一次重命名它们，例如Square1，Square2等。

感谢您花时间寻找

马修

Answer 1

如果它们位于名为Panel1的Panel中

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

如果您想更改表单中的标签... Me.Controls.OfType(Of Label)