【讨论】初级问题。VB+MO如何在拖动 legend1图层时，Map1,Map2的现实状态一起变化

<P>Private Sub Form_Load()</P>
<P>。。。。。。。。。</P>
<P>legend1.setMapSource Map1 '设置legend1控件属性,链接 legend 到地图控制<BR>     legend1.LoadLegend True<BR>     Map1.Refresh</P>
<P>。。。。。。。。</P>
<P>End Sub</P>
<P>Private Sub legend1_AfterSetLayerVisible(Index As Integer, isVisible As Boolean)<BR>     Map1.Refresh<BR>End Sub</P>
<P>以上该做的我都做了，同样我也曾加上过</P>
<P>legend1.setMapSource Map2</P>
<P>Map2.Refresh但不管用！反而拖动legend1同时Map2变了反而Map1，没变,这是咋回事捏！</P>
<P>那位MO高手能指教一下！如果哪位仁兄有更多花样百出legend1用法的代码能否贴一下！谢谢各位了！</P>