将现有标签放入列表并根据列表索引更改名称？

问题描述

我有 22 个标签。一半有 disCNumX，另一半有 TOTNumX，其中 X 分别是 1 到 10 的数字。我已将标签文本需要更新到的值存储在列表中。我还将标签的名称存储在列表中。我试图遍历每个列表，因为它们共享相同的索引，并将 label.text 更新为计数列表中的值。

Dim Counts As New List(Of Integer)
Dim disCNumList As New List(Of Label)({NeedsCorrectionsdisCNum0,NotRecognizeddisCNum1,EPNErrorsdisCNum2,OptionHeadersdisCNum3,ProdPermsdisCNum4,ReadyToImportdisCNum5,WithMemosdisCNum6,RankWarningsdisCNum7,LifecycleWarningsdisCNum8})

Private Sub PopulateCounts()
    Dim i As Integer = 0
    InitializeComponent()
    For Each cont As Control In TableLayoutPanel1.Controls
        If cont.Name.Contains("disCNum" & i.ToString) Then
            disCNumList(i).Text = Counts(i)
            i += 1
        End If
    Next
End Sub

我最近尝试过上述方法，但我一直在尝试做一些像这样简单的事情：

Private Sub PopulateCounts()
    InitializeComponent()
    For i = 0 To 10
        disCNumList(i).Text = Counts(i)
    Next
End Sub

我想重申，disCNumList 中的标签名称已经存在于表单中，我正在尝试更新它们。非常感谢这里的任何/所有帮助，因为我已经能够让自己完成一堆这样的事情，但现在我被正确地卡住了。

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）