<P>to kuanghu16:</P><P>arcexe83\ArcObjects Developer Kit\Samples\Controls\Commands</P>

<P>另外 我想请问</P><P>第二，也是重要的，就是如果你这样写，转到VB中就有麻烦了。据我所知，在VB中Esri提供的Dll就只有：</P><P>我可以列举一下（可以节省大家开发的时间）</P><P>DLL文件            实现的工具或按钮</P><P>File.dll                AddData print export</P><P>Layer.dll            Layers</P><P>Panzoom.dll           zoomin    zoomout  pan panup pandown panleft panright                                               </P><P>                         fullextent  GoBackToPreviousExtent GoToNextExtent   (这个比较全）</P><P>selection.dll          ClearSelection  Select  Identify  Query  Measure</P><P>ReportObject.dll         AttributeReport</P><P>Tools.dll                  RefreshView</P><P>所以我说这些提供的都是很基本的，我要实现一个Arcmap中常用的功能：Zoomtofeature,就要自己写了（虽然很简单）。</P><P>这些dll是在哪里?    呵呵 我以前没注意呢?  嘿嘿</P><P> 真实笨蛋,, 这些是在arcmap框架中么?</P>

<P>我想加入!  呵呵 我正要做这方面的!</P>

<P>不错！期待完善</P>

<P>我是想过ExploringAO，可能有这些例子，但是可能大家都不了解我的出发点：就是大家要某个简单功能的代码时，不用去翻1300多页的ExploringAo，举个简单的例子：ADDData这个工具，我们怎么去把AddData这个窗体调出来，我不相信你一下子在ExploringAo中能找到！</P><P>而且，可能有些人会有疑问说：向上面这个工具，两三句代码就搞定了</P><P>Dim pStdBar As ICommandBar
Dim pCmdItem As ICommandItem
Set pStdBar= Application.Document.CommandBars.Find(ArcID.Standard_Toolbar)
Set pCmdItem = pStdBar.Find(ArcID.File_AddData)</P><P>没错，这样可以调用Arcmap中所有工具按钮；</P><P>但是，我不这样做原因就是：第一，这样很不灵活，而且还不如直接用人家做好的，还要你自己定制干嘛？</P><P>第二，也是重要的，就是如果你这样写，转到VB中就有麻烦了。据我所知，在VB中Esri提供的Dll就只有：</P><P>我可以列举一下（可以节省大家开发的时间）</P><P>DLL文件            实现的工具或按钮</P><P>File.dll                AddData print export</P><P>Layer.dll            Layers</P><P>Panzoom.dll           zoomin    zoomout  pan panup pandown panleft panright                                               </P><P>                         fullextent  GoBackToPreviousExtent GoToNextExtent   (这个比较全）</P><P>selection.dll          ClearSelection  Select  Identify  Query  Measure</P><P>ReportObject.dll         AttributeReport</P><P>Tools.dll                  RefreshView</P><P>所以我说这些提供的都是很基本的，我要实现一个Arcmap中常用的功能：Zoomtofeature,就要自己写了（虽然很简单）。</P><P>目的就是：快速查找，代码重用</P>

<P>

<img src="http://www.gisempire.com/bbs/Skins/Default/topicface/face1.gif"> <B></B>
这些功能在例子里好象写得比较详细，偶觉得可以弄个基本的功能和界面设计，大家分模块做些dll，然后整和，那样才可以提高自己的水平，不过在做之前，必须进行些开发规则和思想的交流，有兴趣的可以跟贴建议，我首先加入

</P><P>个人觉得GIS的想法比较好，支持。</P>

<P>to：kisssy版主</P><P>VB+AO 首先撇开系统特定的业务功能之外，可分为：
1、地图简单操作：放大（拉框、点击、当前中心放大）、缩小（拉框、点击、当前中心缩小）、前视图、后视图、全图、平移、测距、图例、鹰眼、图层控制、地图的打印输出、保存、
2、地图上色：图层标记（简单线形、复杂线形、点线结合的线形等）、颜色、粗细
3、属性操作：点击查询、输入条件查询空间要素位置、要素定位、要素闪烁、要素被选中、多边形区域查询、
</P><P>这些都是非常基本的地图操作功能，有了这些一个最简单的GIS系统雏形就可以搭建起来了！呵呵，还有好几个功能我还没有做出来呢，呵呵！</P>

这些功能在例子里好象写得比较详细，偶觉得可以弄个基本的功能和界面设计，大家分模块做些dll，然后整和，那样才可以提高自己的水平，不过在做之前，必须进行些开发规则和思想的交流，有兴趣的可以跟贴建议，我首先加入

<P>好吧！我稍微详细点的说一下，先征集哪方面的代码：</P><P>打开ArcMap/Tools/Customize/commands标签页：</P><P>左面的列表是 工具栏的各个大类；右边是每个大类包括的具体按钮</P><P>在ArcMap定制中，我们试着先实现下面几个大类：Zoom/Pan,Selection,File,Edit,View,Layer,Label中常用的几个具体按钮的功能，比如Zoom/Pan下有Zoomin等（Zoom/Pan我基本都已经做了）</P><P>所以，如果大家已经有定制其它几个工具条的代码，现在就可以贴出来^_^</P>

<P>to fenye:</P><P>好建议！我们一步一步来呵呵，先整理一下VBA＋AO的代码，看看能整理出来多少！我想要是这个都没做好，就没必要往下做了!</P><P>thank  you ,anyway!</P>