0

ポイントを含む配列リストにアクセスしたい。以下の例は、オプション strict off で動作します。しかし、オプションstrictをオンにして正しい方法でこれを行うにはどうすればよいですか? よろしくお願いします!

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
4

2 に答える 2

-1

それが解決策です:

        Dim p As Point = CType(ArrayList(0), Point)
        Dim x As Integer = p.X
        Dim y As Integer = p.Y
于 2020-03-13T09:49:54.397 に答える