?区找到的主题单击某个主题，然后单击“显示”。AreaDfInterest Property人lapObjects 2.2Help口回CoordinateSystem Property文件）编错（）书签）选项）帮助()DensificationTolerance Property选顶帮助Q)自目录索引后退打印）Extent Property印FilterExpression PropertyMapLayerObjectFilterFields PropertyMethod00000FilterOperator PropertyAprliesToAMapLayerobiectrepresents ageo-referenceddatalFilterOrder PropertyMap,drawnwithfeaturesfroma.GeoDataset.YoucanFilterShape PropertyMGeoDatasetobject from on ESRI shapefle,an SDE leARCINFO coveraceCADfiles and VPFdata显示）取消Thebounding rectangle of a MapLayeris stored in itsEhasthesepartsproperty.contributing to theextentof the Map.PartDescriptionUsing the Valid property.you can determine whether a MapLayerisvalid before adding itto the Layers collection.Use the LayersalyecAnobjectexoressianthatevaluatestoanproperty of a Map objecto retrieve its Layers collection.The defaulobjectinthe AppliesTolistproperty of Layers is Item.rectangleAn object expression which is a.You can retrieve the Recordset associated with aMapLayerwithMapObjects Rectangle.the Records property.To draw a MapLayer.you createaRenderer object establish that object as the MapLayer object'sRemarksrenderer and then setthe properties ofthe renderer.By default a.MapLayer draws with a single Symbol. Use the Visible propertytoIn Visual Basic you maywishtouse the Extent propertytotoggle whether a MapLayer or an ImageLayeris Visible or hidden.zoom in on a.map.Below, a code fragment shows you howyou might do this in the Map's MouseDown eventYou can perform spatial queries on MapLayer objects and qualifythemwithSQL“where'clauseexpressionsbyusingtheMapLayerDin r as New MapObjects2.Rectanglemethods SearchByDistanceorSearchShape.UseSet r = Hapl .TrackRectangleSearchExpression to performlogicalqueries on the RecordsetSet Mapl.Extent rassociatedwith the MapLayer.You can also display subsets of thefeatures contained in a.MapLayerby settingthe FilterExpressionorFilterShapeproperies.2、阅读开发实例MO还自带有许多实例（ESRI\MapObjectslSampleslVB），它们的Form设计和代码可以参考；口回区Iracking SanpleQ5Projecti -Foral (Code)口回LaplouseDorn口司PrivateSub Form LoadOInitializellapDataInitializeTrackingLayerRandomizeseed the random number generatorEndSubPrivate Sub Mapl_ouseDown (Button As Integer, Shift As Integer, x As Single, yIf Toolbarl.Buttons (1).Value =1 ThenDoZoom ShiftElseIf Toolbarl.Buttons (2).Value = 1 ThenMapl.PanElseIf Toolbarl.Buttons (3).Value = 1 ThenAddEvent x,ElseIf Toolbari.Buttons (4).Value = 1 ThenSelectEventsEndIfEnd SubPrivate Sub Timerl_Timer (maxDist =lapl.Extent.Width/ 20nEventCount =Mapl.TrackingLayer,EventCountFor iIndex = 0 Io nEventCount- 1Set gEvt = Mapl.TrackingLayer_Event (iIndex)gEvt.Move maxDist * (Rnd-0.5), maxDist * (Rnd -0.5)Next iIndexEnd Sub一11
11 2、阅读开发实例 MO 还自带有许多实例（ESRI\MapObjects\Samples\VB），它们的 Form 设计和代码可以 参考；
3、网络资源http://www.gischina.com/-http://www.gisky.com/http://www.gisempire.com/E中http://www.geo-spatial.nethttp://www.digitalearth.net.cn/脑http://www.digitalearth.gov/-http://www.othermap.com/-http:/www.honox.com/4、参考书：■刘光.地理信息系统：组件开发篇中国电力出版社，2003；1刘光.地理信息系统二次开发教程：语言篇、组件篇：清华大学出版社，2003；服1王占全.地理信息系统（GIS）开发工程案例精选.人民邮电出版社，2005■汤国安.ArcVieW地理信息系统空间分析方法.科学出版社，2002实习安排：■利用VB和MO，初步设计开发：“石河子****信息系统”口分组：2人，自由组合；口时间：8-14周；口考核：上机占总成绩40%，提交初步的系统及相关文件；12
12 3、网络资源 ◼ http://www.gischina.com/ ◼ http://www.gisky.com/ ◼ http://www.gisempire.com/ ◼ http://www.geo-spatial.net ◼ http://www.digitalearth.net.cn/ ◼ http://www.digitalearth.gov/ ◼ http://www.othermap.com/ ◼ http://www.honox.com/ 4、参考书： ◼ 刘光.地理信息系统：组件开发篇 .中国电力出版社，2003； ◼ 刘光.地理信息系统二次开发教程：语言篇、组件篇 . 清华大学出版社，2003； ◼ 王占全.地理信息系统 (GIS) 开发工程案例精选.人民邮电出版社，2005; ◼ 汤国安. ArcView 地理信息系统空间分析方法. 科学出版社，2002 实习安排： ◼ 利用VB和MO，初步设计开发：“石河子****信息系统” 分组：2人，自由组合； 时间：8-14周； 考核：上机占总成绩40%，提交初步的系统及相关文件；
第三章VB环境下的MO一、实验目的1.了解组件GIS开发环境的构建，相关软件的安装。2.利用VB进行“石河子****信息系统"欢迎界面和操作界面的设计。二、实验准备完成时间：6学时预备知识：实验的操作系统环境为Windows2000/XP，要基于MapObjects进行应用开发，系统中需要安装有：VisualBasic6.0及补丁ServicePack6;GIS组件—MapObjects2.x;实验数据：在文件夹data中部件区三、实验步骤及方法控件设计器可插入对象1.VB环境下运行MOESRI Grid controlOLE（1）装入MapObjects控件ESRI ISO Metadata Wizard Pages ControESRI MapControl①安装MapObjects2.2及ESRI MapObjects 2.1ESRI MapObjects Legend ControlVisual Basic 6.0;ESRI MapObjects Sealebar ControlESRI PageLayoutControl②运行VisualBasic，ESRI ReaderControlESRI SceneControl从对话框中选择NewESRI SceneViewer Control 1.0ESRISpatialAnalystUI Object LibraryStandardEXE，创建一浏览（）ESRI Survey Analyst Obiect Library2个新的应用程序。右击只显示选定项（S）ESRI ToolbarControl工具箱，然后选择弹出定位：CI...l..lAreGISibiniToolbarControl.oex菜单中的“部件”（或确定取消应用（）Ctrl+T组合键），打开对话框（图3.1），从控件列表中找到并勾选图3.1部件对话框MapObjects2.x，此时工具箱出现新的控件（图3.2）；13
13 第三章 VB 环境下的 MO 一、实验目的 1.了解组件GIS开发环境的构建，相关软件的安装。 2. 利用VB进行“石河子****信息系统”欢迎界面和操作界面的设计。 二、实验准备 完成时间：6学时 预备知识： 实验的操作系统环境为Windows 2000/XP，要基于MapObjects 进行应用开发，系统中 需要安装有：Visual Basic 6.0 及补丁Service Pack 6; GIS 组件――MapObjects 2.x; 实验数据：在文件夹data中 三、实验步骤及方法 1. VB 环境下运行 MO （1）装入 MapObjects 控件 ①安装MapObjects 2.2及 Visual Basic 6.0； ②运行Visual Basic， 从对话框中选择New StandardEXE，创建一 个新的应用程序。右击 工具箱，然后选择弹出 菜单中的“部件”（或 Ctrl+T组合键），打开对话框（图 3.1），从控件列表中找到并勾选 MapObjects 2.x，此时工具箱出现新的控件（图3.2）； 图 3.1 部件对话框
MapObjects为地图控件图3.2显示在工具箱中的MapObjects地图控件③添加地图控件（也可双击添加），在地图控件上点右键，选择弹出菜单“特性”一Add，添加数据一“green.Shp”（图3.3），并可设置图层的属性（图3.4）。如果操作正确，运行程序后，此图层应该能够显示在窗体的Map控件上。区属性页General颜色Layers置indow mode:ereenWindowedAdd.BorderRemove-SingleCancelPropertiesCancel MapTSerollbars取消确定应用(A)图3.3属性页对话框区Layer PropertiesOKName:ereenCancelColorSizeStyle0Solid4图3.4图层属性对话框2.“石河子****信息系统”欢迎界面的设计（1）包括系统名称、开发者、进入、退出按键和欢迎示意（图3.5）；（2）用户名和密码设置（图3.6）；（3）简洁美观、操作简单：14
14 ③添加地图控件（也可双击添加），在地图控件上点右键，选择弹出菜单“特性”—Add，添 加数据—“green.Shp” （图3.3），并可设置图层的属性（图3.4）。如果操作正确，运行程 序后，此图层应该能够显示在窗体的Map控件上。 2. “石河子****信息系统” 欢迎界面的设计 （1）包括系统名称、开发者、进入、退出按键和欢迎示意（图3.5）； （2）用户名和密码设置（图3.6）； （3）简洁美观、操作简单； MapObjects 地图控件 图3.2 显示在工具箱中的MapObjects地图控件 图 3.4 图层属性对话框 图 3.3 属性页对话框
Forml石河子旅游信息系统版本：1.0飞001进入退出石河子大学师范学院地理系开发欢迎进入石河子旅游信息系统！图3.5欢迎界面XXForml石河子旅游信息系统口输入错误，您没有权限进入本系统！请输入用户名：确定******请输入密码：X石河子旅游信息系统******欢迎进入石河子旅游信息系统！确定退出确定图3.6用户名、密码设置及欢迎示意3.操作界面的设计和布局：简洁美观、操作简单(1)界面布局：包括系统名称、菜单栏、工具栏、地图显示区域、缩略图区域、图层显示区域和可查数据显示区域，其中地图显示区域占较大显示空间（图3.7）；15
15 3.操作界面的设计和布局：简洁美观、操作简单 (1)界面布局： 包括系统名称、菜单栏、工具栏、地图显示区域、缩略图区域、图层显示区域和可查 数据显示区域，其中地图显示区域占较大显示空间（图3.7）； 图 3.5 欢迎界面 图 3.6 用户名、密码设置及欢迎示意