[求助]AE中如何设置地图显示比例

<P>我想设置我的mapcontrol中的地图的比例，没找到方法，不知道该如何写？</P>
<P>是axMapcontrol.mapScale????好像不是！</P>

<P>The following VBA script zooms the focus map to a 1:10,000 scale.</P><PRE><CODE>Public Sub ZoomToScale()
  Dim pMxDocument As IMxDocument
  Dim pActiveView As IActiveView
  Dim pDisplayTransform As IDisplayTransformation

  Set pMxDocument = Application.Document
  Set pActiveView = pMxDocument.FocusMap
  Set pDisplayTransform = pActiveView.ScreenDisplay.DisplayTransformation
  pDisplayTransform.ScaleRatio = 10000
  pActiveView.Refresh
End Sub
</CODE></PRE>