『公告』 预祝您龙年大吉,万事如意, 过节期间, 大家如需数据服务,请拨打400 或直接添加客服微信,再祝大家龙年,心想事成。
关注我们 新浪 腾讯

设置图层的地图提示字段

设置图层的地图提示字段
设置图层的地图提示字段。

Private Sub UIButtonControl30_Click()

'显示地图提示

 Dim pDoc As IMxDocument

 Dim pMap As Imap

 Set pDoc = ThisDocument

 Set pMap = pDoc.FocusMap

 Dim pLayer As IFeatureLayer

 Set pLayer = pDoc.FocusMap.Layer(0)

 pLayer.DisplayField = "Name"    '设置地图提示显示内容的字段

 pLayer.ShowTips = True      '显示地图提示

End Sub

      京ICP备2025132830号-1 京公网安备 号