关于打印机配置

wudapeng · 发表于 2011-11-8 14:58:00

高手能帮忙看看吗，我想出1：500的图，但是出来的图好像都是自动按图纸空间缩放的，怎么回事啊？
ThisDrawing.Application.ZoomExtents
ThisDrawing.ModelSpace.Layout.PlotType = acExtents
ThisDrawing.ModelSpace.Layout.StandardScale = 0.5
ThisDrawing.ModelSpace.Layout.CenterPlot = True
ThisDrawing.Plot.NumberOfCopies = 1
ThisDrawing.Plot.QuietErrorMode = True
' ThisDrawing.Plot.PlotToDevice
ThisDrawing.Plot.DisplayPlotPreview acFullPreview