メニュー

WINGFIELD since1995

記事

ツールチップの制御

2016/9/1 (Thu)2017/12/9 (Sat)

'IFeatureLayerの取得
Dim pFeatureLayer As IFeatureLayer
Set pFeatureLayer = pLayer
 
'ツールチップを表示するフィールド名を指定
pFeatureLayer.DisplayField = "JCODE"
 
'ツールチップの表示をOn
pFeatureLayer.ShowTips = True
 
'指定した座標・トレランスでツールチップ情報を表示
Dim strToolTip As String
strToolTip = pFeatureLayer.TipText(135, 35, 0.1)
MsgBox strToolTip

URLをコピーしました！

この記事を書いた人

伊達と酔狂のGISエンジニア。GIS上級技術者、Esri認定インストラクター、CompTIA CTT+ Classroom Trainer、潜水士、PADIダイブマスター、四アマ。WordPress は 2.1 からのユーザーで歴だけは長い。
代表著書『"地図リテラシー入門―地図の正しい読み方・描き方がわかる』
GIS を使った自己紹介はこちら。ESRIジャパン(株)所属、2021年度～2023年度まで青山学院大学非常勤講師も兼務。日本地図学会常任委員。発言は個人の見解です。