!!!!各位达人，本人在用VBA在AO上进行二次开发，现在急求教如何实现图层控制???

<P ><FONT size=3><B><FONT face="Times New Roman">1</FONT></B><B>，背景</B>：××市规划国土资源管理局是市政府主管城市规划管理和国土资源管理的职能部门，在城市规划、土地管理过程中涉及大量的图形，同时在规划国土审批过程中要产生大量的空间信息，这些空间信息既是规划国土资源管理的结果，也是下阶段工作的重要参考和决策依据。</FONT></P>
<P ><FONT size=3><FONT face="宋体, MS Song">本系统是用数据库对各种数据进行有效地集成管理，在AO中用VBA编程，实现各种信息的显示、叠加、查询、统计、分析等功能，能方便地和其他GIS系统进行数据交换。</P>
<P ><FONT face="宋体, MS Song"><B>2，图层控制</B>该功能的要求：</FONT></P>
<P >图层控制菜单有图层控制（专题图）和<FONT face="Times New Roman"> </FONT>图层控制（地形图）两项，用于专题图和地形图的控制。</P>
<P ><B><FONT face="Times New Roman">A,</FONT></B><B>图层控制（专题图）<p></p></B></P>
<P >可进行专题图层的叠加，其中包含<FONT face="Times New Roman">1</FONT>：<FONT face="Times New Roman">500</FONT>接合表，<FONT face="Times New Roman">1:2000</FONT>接合表，正射影像图，地下管线图，总体规划（用地规划），水系，规划道路<FONT face="Times New Roman">(</FONT>边线<FONT face="Times New Roman">)</FONT>，规划道路<FONT face="Times New Roman">(</FONT>中线<FONT face="Times New Roman">)</FONT>，规划道路<FONT face="Times New Roman">(</FONT>标注<FONT face="Times New Roman">)</FONT>，市政控制线，市政控制线注记，控制性详规，土地利用总体规划，专题规划，<FONT face="Times New Roman">1</FONT>：<FONT face="Times New Roman">10000</FONT>土地利用现状，城中村调查数据，土地定级估价，卫片监测信息，出让红线，划拨红线，征地红线，地籍地政，市政红线，主城街区图，全市权属图，武汉粘性土分布等等三十个专题图。</P>
<P >要求：</P>
<P >点击该菜单，即弹出图层控制（专题图）对话框，系统已自动将各专题图的名称添加到了列表框中.</P>
<P >选中某专题图前的复选框即代表叠加上该专题图，反之，将选中标志去掉，则当前视图区不再显示该项专题图。</P>
<P ><B><p><FONT face="Times New Roman"> </FONT></p></B></P>
<P ><B>在AO＋VBA下面如何实现该功能？？？请教各位达人？小弟不胜感激！！</B></FONT></FONT></P>

<P>希望各位达人能够帮忙哟；）我的油箱是<a href="mailtzhouyuqing214@hotmail.com,qq:99106857" target="_blank" >zhouyuqing214@hotmail.com,qq:99106857</A></P>

<P>万分感激！！！！</P><img src="images/post/smile/dvbbs/em12.gif" /><img src="images/post/smile/dvbbs/em12.gif" /><img src="images/post/smile/dvbbs/em12.gif" />

<P><U>点击该菜单，即弹出图层控制（专题图）对话框，系统已自动将各专题图的名称添加到了列表框中.</U></P><P>这一个要求很简单，可以通过pmap.layers 来取得当前已加载到视图的图层名称，就可以放置到下接列表框中，如果你要将不同类的图层置于不同的下接列表框中，可以对图层的类型进行判断，再做处理，是比较简单的，在线帮助例子也很多。</P><P><U>选中某专题图前的复选框即代表叠加上该专题图，反之，将选中标志去掉，则当前视图区不再显示该项专题图。</U></P><P>这个主要是通过图层名称来对视图中的图层的 visible 等到属性来控制，达到你要求的效果。</P><P>多看一下layer 接口相关内容。</P>

<img src="images/post/smile/dvbbs/em03.gif" />谢谢啊：）希望高人再指点详细，小弟非常感激！！<img src="images/post/smile/dvbbs/em05.gif" />