当一个drawing.point在里面时Arraylist访问x和y答案

【问题标题】：Arraylist access to x and y when a drawing.point is inside当一个drawing.point在里面时Arraylist访问x和y
【发布时间】：2020-03-13 08:22:49
【问题描述】：

我想访问一个包含点的数组列表。下面的示例适用于选项严格关闭。但是我怎样才能在选项严格的情况下以正确的方式做到这一点？非常感谢！

Option Strict Off
Imports System.Drawing

Module Module2
    Sub Main()

        Dim ArrayList As New ArrayList
        Dim R As New Random

        For i = 0 To 9
            ArrayList.Add(New Point(R.Next(50), R.Next(50)))
        Next i

        Dim firstY As Integer = ArrayList(0).Y
        Dim firstX As Integer = ArrayList(0).X

    End Sub
End Module

【问题讨论】：

使用暗点作为新列表（点）而不是 ArrayList。然后调用 points.Add(New Point(R.Next(50), R.Next(50))
好的，谢谢你的提示 - 我会试试这个

标签： vb.net arraylist option-strict

【解决方案1】：

您可以考虑使用更类型安全的泛型集合（例如 List(Of T) 而不是 ArrayList）：

Imports System.Collections.Generic
Imports System.Drawing

Module Module2
    Sub Main()

        Dim Points As New List(Of Point)
        Dim R As New Random

        For i = 0 To 9
            Points.Add(New Point(R.Next(50), R.Next(50)))
        Next i

        Dim firstY As Integer = Points(0).Y
        Dim firstX As Integer = Points(0).X

    End Sub
End Module

【讨论】：

【解决方案2】：

这就是解决方案：

        Dim p As Point = CType(ArrayList(0), Point)
        Dim x As Integer = p.X
        Dim y As Integer = p.Y

【讨论】：

ArrayList 大约在 20 年前就已经过时了。