Dim pBoolean As Boolean Dim reason As esriNonSimpleReasonEnum Dim pTopologicalOperator As ITopologicalOperator3 Set pTopologicalOperator = pGeometry pTopologicalOperator.IsKnownSimple = False pBoolean = pTopologicalOperator.IsSimpleEx(reason) 'pBooleadn に不正かどうかが返される 'reason に不正の種類が返される
ジオメトリの不正の種類を判定
2016/9/1 (木)
![Pinterest](https://www.pinterest.com/pin/create/button/?url=https%3A%2F%2Fwww.wingfield.gr.jp%2Farchives%2F7352&media=https://www.wingfield.gr.jp/wp/wp-content/uploads/2024/05/WINGFIELD_since1995_200x200.png&description=[vb title="VBA"] Dim pBoolean As Boolean Dim reason As esriNonSimpleReasonEnum Dim pTopolo){kind=link}