一、充满
'视图充满
Await QueuedTask.Run(Sub()
pAV.ZoomToFullExtent()
End Sub)
二、缩放到图层
'缩放至图层
Dim lyr As FeatureLayer = Pmap.FindLayers("DLTB").First()
Dim pAV As MapView = MapView.Active
Await QueuedTask.Run(Sub()
pAV.SelectLayers(lyr)
End Sub)
三、视窗放大、缩小
’在地图视图中放大固定的量
Dim pAV As MapView = MapView.Active
Await pAV.ZoomInFixedAsync
’在地图视图中缩小固定的量
Await pAV.ZoomOutFixedAsync
四、定义区域显示
Dim rng as RangeExtent
MapView.Range
五、刷新
MapView.Active.Redraw(True)
六、将视图缩放到图层的范围
ZoomTo(Layer,Boolean,Nullable<TimeSpan>,Boolean)