打印页面设置的问题！

[复制链接]

los_su

9 主题	25 帖子	1 银币

初露锋芒

Rank: 3 Rank: 3 Rank: 3

铜币: 61

发消息

发表于 2006-9-27 11:40:00 | 显示全部楼层 |阅读模式

Dim PlotConfigurations As AcadPlotConfigurations
   Dim plotCon As AcadPlotConfiguration, Dy$

   Set PlotConfigurations = acaddoc.PlotConfigurations
   Set plotCon = PlotConfigurations.Add("55", True)
’以下对plotcon的各项属性进行设置
   With plotCon

      .ConfigName = 默认打印机名
      .CanonicalMediaName = "A3"
      .PaperUnits = acMillimeters
      .StyleSheet = "acad.ctb"
      .CenterPlot = True
      .PlotRotation = ac90degrees
      .StandardScale = acScaleToFit
      .PlotType = acExtents
      .PlotWithPlotStyles = True

   End With
‘这里设置plotcon完成以后，如何把plotcon设置为默认的页面设置？？？？？
我一直找不到设置的方法，这样打印图纸的时候要手动在《页面设置名》中选择才可以！
请高手指教一下！

使用道具举报