摘要: ArcMap下用VBA操作图层基本的过程了。 1 Private Sub UIButtonControl1_Click() 2 Dim pApp As IApplication 3 Set pApp = Application 4 Dim pDoc As IMxDocument 5 Set pDoc = pApp.Document 6 Dim pMap As IMap 7 Set pMap = pDoc.FocusMap 8 Dim pLayer As ILayer 9 Set pLayer = pDoc.SelectedLayer 10 11 If (pLayer Is... 阅读全文
posted @ 2013-07-29 09:05 Lulee 阅读(849) 评论(0) 推荐(0) 编辑