关于打印机配置

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

高手能帮忙看看吗，我想出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

cabinsummer · 发表于 2011-11-14 07:47:11

这就是图纸空间的好处

wudapeng · 发表于 2011-11-16 09:12:08

已经解决了，原来是这句话出了问题
ThisDrawing.ModelSpace.Layout.StandardScale = 0.5
应该这样：
ThisDrawing.ModelSpace.Layout.SetCustomScale 1, 0.5

账号		自动登录	找回密码
密码			注册