已知两个多边形的坐标，求出他们的交集及坐标再和另外...

kmj787710 发表于 2022-4-23 22:12

本帖最后由 kmj787710 于 2022-4-24 14:26 编辑

已知两个多边形的坐标（图一)，求出他们的交集（黄色线段）及坐标再和另外两个图形中的每一层比较求出交集，再求出面积，其中图二已知所有线段的坐标，图三中间的横线只已知其高度，不知道与外边界的交点坐标。利用VBA及CAD怎么实现？

FanGX7365 发表于 2022-4-23 22:22

在CAD里轻轻松松

kmj787710 发表于 2022-4-23 22:23

FanGX7365 发表于 2022-4-23 22:22
在CAD里轻轻松松

需要用VBA自动求得出，不用手动画图计算。

cmbslgn 发表于 2022-4-24 08:39

hehaohw 发表于 2022-4-24 08:57

CAD VBA有布尔运算，1.根据坐标或者框选创建多段线对象，暂称为黄线和白线多段线对象，2.这2个对象生成黄线面域和白线面域。3.使用布尔运算进行面域并集。'布尔运算：
object.Boolean(Operation, Object)
Object 3DSolid, Region 使用该方法的对象
Operation
   AcBooleanType 常数; 仅用于输入
   acUnion: 执行并集运算
   acIntersection: 执行交集运算
   acSubtraction: 执行差集运算
Object
Object; 仅用于输入要求输入要操作执行的对象
4.布尔运算完，用面积属性即可获得面积。

pdfhvy141 发表于 2022-4-24 10:31

问一下有EXCEL表格的没

kmj787710 发表于 2022-4-24 15:36

pdfhvy141 发表于 2022-4-24 10:31
问一下有EXCEL表格的没

增加了附件

页: [1]

吾爱破解 - 52pojie.cn's Archiver

已知两个多边形的坐标，求出他们的交集及坐标再和另外...