求助！！excel vba怎样筛选出多边形内的点呀

qinyuanzheng · 发表于 2018-11-13 14:15

本帖最后由 qinyuanzheng 于 2018-11-14 14:39 编辑

怎样将多边形之外的点去除呀

zopey · 发表于 2018-11-13 15:11

如何判断一个点是否在多边形内部？

（1）面积和判别法：判断目标点与多边形的每条边组成的三角形面积和是否等于该多边形，相等则在多边形内部。

（2）夹角和判别法：判断目标点与所有边的夹角和是否为360度，为360度则在多边形内部。

（3）引射线法：从目标点出发引一条射线，看这条射线和多边形所有边的交点数目。如果有奇数个交点，则说明在内部，如果有偶数个交点，则说明在外部。----特殊情况：要检测的点在多变形的一条边上，射线法判断的结果是不确定的，需要特殊处理。

zopey · 发表于 2018-11-13 15:24

如果不用数学方法计算，可以用颜色填充多边形内区域，
然后指定点通过颜色判断是否在其内。

qinyuanzheng · 发表于 2018-11-13 15:59

感谢感谢那我该怎么…写代码呢………完全没有编程基础然后被布置了作业♂

我是来讨说法的 · 发表于 2018-11-13 16:12

这个东西不是那么简单的，你发个悬赏，看有大神能搞不

qinyuanzheng · 发表于 2018-11-13 16:30

本帖最后由 qinyuanzheng 于 2018-11-14 11:16 编辑

拜托大佬指点！

zopey · 发表于 2018-11-13 17:08

填充判断法
白色为界内，红色为“边界“，黑色为界外。

      temp = GetPixel(hDCmem, brr(i, 1), brr(i, 2))
      If temp = 0 Then
         brr(i, 3) = "内"
      ElseIf temp = 255 Then
         brr(i, 3) = "边界"
      ElseIf temp = RGB(255, 255, 255) Then
         brr(i, 3) = "外"
      End If

多边形界内.zip (39.83 KB, 下载次数: 30)

zopey · 发表于 2018-11-13 17:14

RGB(255, 255, 255) 是白色，内、外搞反了，

geoqiang · 发表于 2023-2-8 09:13

不错，值得学习，感谢

		自动登录	找回密码
密码			免费注册

[求助] 求助！！excel vba怎样筛选出多边形内的点呀

评分

评分

评分