alex_bn_lee

摘要： IApplication接口：》》》点击查看《《《移动选中图层，使用IMap接口的MoveLayer方法Sub MapIndex() Dim pDoc As IMxDocument Dim pMap As IMap Dim pLayer As ILayer Set pDoc = ThisDocument Set pMap = pDoc.FocusMap Set pLayer = pDoc.SelectedLayer pMap.MoveLayer pLayer, pMap.LayerCount - 1End SubIApplication接口的属性和方法... 阅读全文