关于制图打印的问题

<P>刚刚接触AE中的PageLayout制图打印功能，有几个疑问：</P>
<P>1，怎么样实现ArcMap中实现Mapcontrol和PageLayout的相互切换功能。例子程序中PageLayout打开的都是Mxd文件。</P>
<P>2，怎么样实现ArcMap中的打印预览功能（SimpleDisplay CoClass？？？）</P>

<P>Private Sub CopyFocusMap()
'  Dim i As Integer</P><P>'  For i = 0 To m_pPMap.LayerCount - 1
'    PageLayoutControl1.ActiveView.FocusMap.AddLayer m_pPMap.layer(i)
'  Next
    '获取 IObjectCopy 接口
    Dim pObjectCopy As IObjectCopy
    Set pObjectCopy = New ObjectCopy</P><P>    '获取 IUnknown 接口 (源“Map”)
    Dim pToCopyMap As IUnknown
    Set pToCopyMap = frmMap.map1.ActiveView.FocusMap 'm_pPactiveview.FocusMap</P><P>    '获取 IUnknown 接口 (参与复制的源“Map”)
    Dim pCopiedMap As IUnknown
    Set pCopiedMap = pObjectCopy.Copy(pToCopyMap)</P><P>    '获取 IUnknown 接口 (目的“Map”)
    Dim pToOverwriteMap As IUnknown
    Set pToOverwriteMap = PageLayoutControl1.ActiveView.FocusMap</P><P>    '复制 Map
    pObjectCopy.Overwrite pCopiedMap, pToOverwriteMap</P><P>    
    '设置 PageLayoutControl 的 Extent
  
    PageLayoutControl1.Extent = frmMap.map1.Extent 'm_pPactiveview.Extent  ''hzm
  
    '刷新显示
    PageLayoutControl1.Refresh esriViewGraphics</P><P>End Sub</P>

<img src="images/post/smile/dvbbs/em46.gif" />

<P>第一个问题你可以看一下readercontrol控件，它可以实现</P>
<P>第二个现在我也不知道，有知道得可以交流一下</P>