Dim ZahlenKoordinaten() As PointF = {New PointF(x, y), New PointF(x, y), New PointF(x, y), New PointF(x, y), New PointF(x, y), New PointF(x, y), New PointF(x, y), New PointF(x, y), New PointF(x, y), New PointF(x, y), New PointF(x, y)}