GIS实习报告.docVIP

苏州科技学院 环境学院 地理信息系统 GIS软件与程序设计 实 习 报 告 专业班级 成员 学号 实习地点 指导教师 2012 年 7 月 20日 实验要求概述 通过在一学年的学习中，我们对GIS程序设计的各个分项工程有了初步的了解、熟悉，同时能够掌握一些基本功能并建立其工程。本次的实验要求让我们能够根据前面的学习，综合GIS的各项地图功能，建立一个完整的系统。系统分成四个功能模块：地图浏览模块、地图符号化功能模块、地图编辑模块、地图空间分析模块。 实验过程内容 实验的整个过程均在一个工程里完成，运行进入主界面如下图： 主界面由菜单项、工具条控件ToolbarControl、地图显示控MapControl以及图层显示控件TOCControl组成。 工程中各项命令的执行均通过菜单栏的下拉菜单完成： 菜单“文件”包含打开、另存为、退出命令。通过CommonDialog控件实现图层的打开和另存为，打开文件使用showopen方法，保存文件实验使用shpwsave方法。（如下图） “编辑”选项包含了对图层的各项操作，有加载图层、调整图层、删除图层、全部删除以及撤销操作等。 “鹰眼视图”选项主要通过弹出的窗口对指定区域的图层进行显示。 “符号化”选项针对不同的图层信息（点图层、线图层、面图层）进行符号化以及对图层的相关信息进行文本标注。 “地图渲染”选项是对点线面图层按不同的标准要求进行的渲染操作。有简单渲染、唯一值渲染、成比例渲染、多比例渲染、点密度渲染，统计图渲染等等。 “地图标注”选项主要是对点、线、面图层的相关属性按特定要求进行标注。 “地图编辑”选项对图层进行的操作有添加点对象，线对象，面对象，同时还可以选择指定的对象进行删除，移动操作。地图属性中有错误的地方还可以对其修改。 “空间查询分析”利用各种各式的查询方式对所覆盖的区域进行属性查询。 工具栏包含如图所示的一些基本工具 通过在Toolbarcontrol1控件下的【Toolsets】工具集标签页中的【MapNavigation】中添加常用工具：全局显示，漫游，放大，缩小，视图回退，撤消回退，刷新，书签这几个常用工具。 实验结果 实习一： 加载图层，图层的加载可以通过“文件”菜单下的“打开”选项，实现图层的逐个添加，也可以通过“编辑”下的“加载图层”实现多个图层的一次性加载： 单个加载： 多个一次性加载： 图层调整： 删除图层： 地图浏览： 拉框放大： 拉框缩小： 创建书签： 鹰眼视图： 实习二： 点渲染： 简单渲染： 2、唯一值渲染： 成比例渲染： 4、多比例渲染： 线渲染： 简单渲染： 唯一值渲染： 面渲染： 简单渲染： 唯一值渲染： 成比例渲染： 4、点密度渲染： 统计表渲染： 6、多比例渲染： 地图标注： 简单标注： 点标注： 线标注： 面标注： 复杂标注： 线标注： 面标注： 文本标注： 实习三： 创建新图层： Dim pfws As IFeatureWorkspace Dim pworkspacefactory As IWorkspaceFactory Dim str As String str = InputBox(存储地址：, 请输入创建图层的地址, D:\gcl2012实习\123) Set pworkspacefactory = New ShapefileWorkspaceFactory Set pfws = pworkspacefactory.OpenFromFile(str, 0) Dim pfield As IField Dim pfieldedit As IFieldEdit Set pfield = New Field Set pfieldedit = pfield pfieldedit.Name = shape pfieldedit.Type = esriFieldTypeGeometry Dim pspa As ISpatialReference Dim pgeomdef As IGeometryDef Dim pgeomdefedit As IGeometryDefEdit Set pgeomdef = New GeometryDef Set pgeomdefedi