Question

基本上，我想要做的是：

Dim colors1(100, 100) As New List(Of Color)

我需要使用New List(Of Color)创建一个矩阵。

我会更好地解释......

我想读取我图像像素的所有颜色，通常我会通过逐行阅读来做到这一点。但事实并非如此。我将图像划分为8x8正方形，我想要创建一个矩阵（正方形的白色位置）和列表（颜色）（该正方形的颜色），表示每个正方形的所有颜色。 Infortunaly当我尝试这个Dim colors1(100,100) as List(Of Color)程序休息时。

Answer 1

那么，您想要使用Array或List吗？

如果你想要一个固定的100x100矩阵，那么你应该使用2D Array，因为数组是固定大小的。

如果您乐意使用固定的100x100 2D Array，可以声明如下：

Dim colors1(100, 100) As Color

设置如下：

colors1(5, 2) = Color.Aqua

然后像这样使用它：

' Sets the textbox background color to Aqua
TextBox1.BackColor = colors1(5, 2)

这是否实现了您尝试做的事情？或者您是否因为其他原因需要列表？

Answer 2

试试这个

        Dim colors1 As New List(Of List(Of Color))
        For i As Integer = 0 To 99
            Dim newColors As New List(Of Color)
            colors1.Add(newColors)
            For j As Integer = 0 To 99
                newColors.Add(New Color)
            Next
        Next

如何使用新的颜色列表创建矩阵

2 个答案: