生成标签和存储变量？

Question

所以我用以下内容生成100个标签：

Sub Load_Pieces()
    For i = 0 To 9
        For i1 = 0 To 9
            Pieces(i1, i) = New Label
            Pieces(i1, i).Text = ""
            Pieces(i1, i).Location = New Point((i1 * 20) + 13, (i * 20) + 13)

            Pieces(i1, i).Size = New Size(20, 20)
            Pieces(i1, i).BorderStyle = BorderStyle.FixedSingle
            Pieces(i1, i).Font = New Font("Arial", 13)
            Pieces(i1, i).BackColor = Color.White
            AddHandler Pieces(i1, i).Click, AddressOf Piece_Clicked
            Me.Controls.Add(Pieces(i1, i))
        Next
    Next
End Sub

我需要做的是标签每个都包含三个或四个单独的变量（所有整数），并且Piece_Clicked函数能够读取被点击的部分和相邻的瓷砖（或任何瓷砖）。

示例：点击了第66页，它增加了第65页显示的数字，并在第67页显示结果。

我认为，在其他变量中，需要为标签分配标识号，以便它们能够确定哪些标签是相邻的。 我还假设标签本身不能实际存储变量，所以我需要使用存储数字的数组或字典，并单击标签访问相应的数组/字典条目吗？

Answer 1

  

我还假设标签本身不能实际存储变量

控件可以在Tag property中存储任何变量。

我建议使用自定义类来存储这三个变量，并将其实例分配给Tag属性。将其强制转换为Piece_Clicked中的类型。