重庆交通大学学生实验报告实验课程名称地理信息系统软件二次开发开课实验室空间数据处理实验室学院河海学院年级2008专业班1学生姓名学号08260117开课时间2011至2012学年第1学期总成绩教师签名目录TOC\o"1-3"\h\z\uHYPERLINK\l"_Toc313009240"实验五GIS应用系统中专题地图的绘制PAGEREF_Toc313009240\h3HYPERLINK\l"_Toc313009241"一、实验内容PAGEREF_Toc313009241\h3HYPERLINK\l"_Toc313009242"二、实验要求PAGEREF_Toc313009242\h3HYPERLINK\l"_Toc313009243"三、实验步骤PAGEREF_Toc313009243\h3HYPERLINK\l"_Toc313009244"1、系统完善；PAGEREF_Toc313009244\h3HYPERLINK\l"_Toc313009245"2、标注型专题地图PAGEREF_Toc313009245\h4HYPERLINK\l"_Toc313009246"3、数值型专题地图PAGEREF_Toc313009246\h6HYPERLINK\l"_Toc313009247"4、点密度专题地图PAGEREF_Toc313009247\h10HYPERLINK\l"_Toc313009248"5、分类专题地图PAGEREF_Toc313009248\h13HYPERLINK\l"_Toc313009249"6、图表专题地图PAGEREF_Toc313009249\h16HYPERLINK\l"_Toc313009250"四、实验成果PAGEREF_Toc313009250\h19HYPERLINK\l"_Toc313009251"五、实验心得PAGEREF_Toc313009251\h19实验五GIS应用系统中专题地图的绘制一、实验内容1、学习运用代码在所编系统中进行专题地图的绘制；2、完善系统。二、实验要求1、完善系统，实现在主窗体中调用多个窗体；2、实现标注型专题地图的制作；3、实现数值型专题地图的制作；4、实现点密度专题地图的制作；5、实现分类专题地图的制作；6、实现图表专题地图的制作。三、实验步骤1、系统完善；在主界面窗体中完善系统界面，在“专题地图”菜单栏下添加标注型专题地图、数值型专题地图、点密度专题地图、分类专题地图、标图表专题地图等选项，如图5-1图5-1（系统界面）2、标注型专题地图由于学生水平局限，不能够在一个窗体中完成所有功能的，因此此实验在多个窗体中实现，添加名为“frmlabelrenderer”的窗口，设置其界面。在代码窗口中写入以下代码：OptionExplicitDimDblAsBooleanPrivateSubDrawLayer()DimdcAsNewDataConnectionDimlayerAsMapLayerdc.Database=App.Path+"\..\"+"Data"IfNotdc.ConnectThenMsgBox"在指定的文件夹下没找到图层数据文件！"EndEndIfSetlayer=NewMapLayerSetlayer.GeoDataset=dc.FindGeoDataset("行政区")layer.Symbol.Color=moOrangelayer.Symbol.Size=1layer.Symbol.Style=2layer.Symbol.OutlineColor=moBrownMap1.Layers.AddlayerSetlayer=NewMapLayerSetlayer.GeoDataset=dc.FindGeoDataset("行政区")layer.Symbol.Color=moRedlayer.Symbol.Size=3layer.Symbol.Style=0Setlayer.Renderer=NewLabelRendererWithlayer.RendererIfDblThen.XOffsetField="行政区"EndIf.Field="行政区".Symbol(0).Color=moBlack.Symbol(0).Font.Size=8EndWithMap1.Layers.AddlayerMap1.Refresh