声明一个图片框数组

Question

我正在尝试声明一个 PictureBoxes 数组（Boxes）并存储我以 1 形式创建的图片框（Box1,Box2,....）；在数组中。我放了代码。

Dim Boxes() As PictureBox

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    Boxes(0) = Box1
    Boxes(1) = Box2
    Boxes(2) = Box3
    Boxes(3) = Box4
    Boxes(4) = Box5
    Boxes(5) = Box6
    Boxes(6) = Box7
    Boxes(7) = Box8
    Boxes(8) = Box9
End Sub

但是显示空引用错误的错误。如何解决错误。请帮我。注意{box1, box2, box3}都是PictureBox，我在表单中创建了所有的九个picturebox(box1, box2, box3……)。

Answer 1

你有一个错误，因为你声明了数组而不是数组的长度。

改变这个：

Dim Boxes() As PictureBox

收件人：

  Private Boxes(9) As PictureBox

---

也许您可以使用列表而不是数组：

Private Boxes As List(Of PictureBox) = New List(Of PictureBox)

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    Boxes.Add(Box1)
    Boxes.Add(Box2)
    Boxes.Add(Box3)
    Boxes.Add(Box4)
    Boxes.Add(Box5)
    Boxes.Add(Box6)
    Boxes.Add(Box7)
    Boxes.Add(Box8)
    Boxes.Add(Box9)
End Sub

有了列表，你就不必关心长度了。