ArcGIS VBA点生成矩形缓冲区

ArcGIS 的 VBA 脚本真的是老前端们的宝藏之一,尤其是像这个能帮你批量生成点缓冲区的脚本,实用得。脚本里用到了IMxDocumentIFeatureLayer这些经典接口,逻辑也清晰——遍历点图层,一个个点转成矩形。你只要在 UserForm 里输入长宽,它就能自动搞定,省事不少。

缓冲区不是只能做圆,其实矩形更适合多业务场景,比如你要表示某种设施的影响范围,就直观。这个 VBA 脚本还挺智能的,自动算中心点,按你设的距离生成四个顶点,封闭成IPolygon,就能直接在地图上显示了,操作流程一气呵成。

IFeatureCursor那一段,大数据量的时候性能也还不错,响应也快。你可以把这段逻辑挂在按钮事件里,点一下就跑,方便。用完记得刷新视图,别忘了IActiveView.Refresh()哦。

如果你正好在做 ArcMap 相关的自动化,或者在帮客户定制工具,这段代码真的可以拿去直接改改就用。不想重复造轮子?直接抄就是了。

docx 文件大小:18.68KB