VBA Microstation的：生成地图界

几天前，我展示了如何产生 打印布局 使用Microstation。 在存在用于处理图纸和模型的选项之前，有必要通过生成块（单元）和剪辑内容来以旧方式进行处理。

从我的分钟回来 休假这次我给你看的这个例子是一个开发的应用程序 Visual Basic中 de Microstation，在其中生成有界地图，或者像某些地籍证书所称的那样。 地籍部门的理想选择，地籍部门必须按要求生成地图，并对其进行收费，但是如果不是自动化的话，则需要很长时间。

Ante有一个我暂时删除的视频，但为了教育目的，我留下了如何开发和定制的方式。

输入。

• 一个dgn，在农场一级链接
• 一个Access数据库，其中包含列面积，周长和范围坐标。 然后从地籍键加入另一个具有纳税人（人）姓名的数据库。
• 一个.cel文件，其中包含以1：100比例缩放的帧单元（块），北符号和节点，以聚合数据库中的数据。 必须将其放置在已注册库的存储位置（工作区/配置/单元）

在VBA中，根据将要使用的市镇地籍代码，以掩码格式制作了捕获表格。 它有一个空间来添加观察值和要插入的选项 注释 所有者的姓名，地籍钥匙或财产号码。

如何执行

一旦指定了特征，按下“生成证书”按钮，如果应用程序不可用，系统将进行手动完成的正常操作。

由于它运行在一个新文件（工作）上，系统执行以下操作：

• 参考火焰包含情节的链接地图
• 从包含绘图的坐标计算范围，以建立适当的刻度
• 然后在属性周围创建一个围栏​​，大小相当于六个属性，以免不必使用整个地图
• 然后他做了一个 夹 其中仅包含必要的层次，属性边界，农场数量，苹果边界和街道名称。 在这个过程中，由于拓扑标准在这些地图中不是非常合适，而不是将它们界定边界的重心结合起来，因此这个例子的操作被推迟了，这些质心被迫从边界到质心的链接转移管理单个地图而不是区域或象限文件使分析变得麻烦。
• 然后计算刻度，作为块（单元）尺寸1：100的大小的参考，以知道它是否占用使其更大或更小，并放置单元格。
• 然后在包含有界图的框架中生成围栏，并切割多余的图层。

结果

在那里，我们有一个地籍证书，我们在其模块中插入了项目执行机构，市政府的标志，计算面积，比例，表格数量和我们说明的描述等数据。

在第二张纸上，生成从属性的内部围栏动态生成的不同桩号，距离和方位的坐标表，并沿其所在位置沿顺时针方向放置一个点和多个顶点。更西。 必要时，由于多边形有很多顶点，请生成必要的图纸。

在极端情况下，如果包裹太近而又太靠近街道，则创建选项以强制使用以下比例尺或生成比例尺1：125，系统将根据该比例尺进行计算。 该示例的情况需要执行此操作，因为他们看到街道另一侧的邻居不会以这种规模出现。

该应用程序可以在Microstation Geographics V8上运行，尽管随着时间的流逝，我希望有一天能完成该过程以及该过程的上千种工作。