通过开发简易插件,实现了在低版本AutoCAD与CASS中对闭合宗地进行实际亩数标注的功能,弥补了原软件在此方面的不足,提升了地形图处理的效率与实用性。
1、 启动CASS7.1后,在命令行输入vbaide并回车,即可进入VBA编程界面。
2、 在VBA左侧工程窗口中,右键点击并选择插入下的模块选项。
3、 在模块右侧的代码框内输入以下内容
4、 提示用户选择宗地线,并获取所选实体及其基点信息。
5、 文字高度设为1.21,确保清晰可读。
6、 获取用户指定的点作为面积标注的位置。
7、 双击工程窗口中AutoCAD对象的ThisDrawing,右侧代码窗口将变为空白状态。
8、 在右侧代码窗口中输入以下内容:
9、 点击左上角保存按钮,在弹出窗口中选择保存位置及文件名称即可完成保存操作。
10、 返回CAD绘图界面,该编辑宗地面积的VBA宏名称为bmjhs,命令行调用的自定义命令设置为ss。
11、 命令执行结果所示。
12、 标注面积单位采用亩,文字高度设为1.21,相关参数均支持调整,有兴趣的开发者可根据个人偏好自行修改设置。
评论
更多评论