实现本例的功能用到接口IFeatureLayerDefinition中的属性DefinitionExpression ：设置查询条件来选择出要显示的Features。
程序说明
先得到要过滤层的FeatureLayer,再用IFeatureLayerDefinition.
DefinitionExpression设置显示条件。
代码
Private Sub UIButtonControl1_Click()
Dim pMxDocument As IMxDocument
Dim pMap As IMap
Dim pActiveView As IActiveView
Dim pFeatLayer As IFeatureLayer
Dim pFeatureLayerD As IFeatureLayerDefinition
Set pMxDocument = Application.Document
Set pMap = pMxDocument.FocusMap
Set pActiveView = pMap
Set pFeatLayer = pMap.Layer(0)
Set pFeatureLayerD = pFeatLayer
pFeatureLayerD.DefinitionExpression = "FID <=10"
pMxDoc.UpdateContents
pActiveView.Refresh
End Sub
（本文已被浏览 次） | | |
相关评论
