时间戳

首页 > 解决方案 > 在数组中声明点以在 VB 2019 中绘制多边形

vb.net - 在数组中声明点以在 VB 2019 中绘制多边形

问题描述

有没有办法声明一个常量数组，我可以在其中声明绘制多边形的点？

类似的东西：

Dim myPoints As Point() = {{10,10}, {12,12}, {13,13}, {14,14}, {15,15}} 
...
...
...
myGraphics.DrawPolygon(myPen, myPoints)

这个想法是使用最不可能的代码对点进行硬编码

标签： vb.net

解决方案

您可以像这样初始化一个Point数组

Dim myPoints = {
    New Point(10, 10),
    New Point(12, 12),
    New Point(13, 13),
    New Point(14, 14),
    New Point(15, 15)
}

或者将它们全部放在一行上，这看起来就像您的多维数组版本。

Dim myPoints = {New Point(10, 10), New Point(12, 12), New Point(13, 13), New Point(14, 14), New Point(15, 15)}

我们也可以改为使用 LINQ 可以操作的锯齿状数组来选择新点

Dim myPoints =
    {New Integer() {10, 11}, New Integer() {12, 13}, New Integer() {14, 15}}.
    Select(Function(p) New Point(p(0), p(1))).ToArray()

推荐阅读