TIAN_MM 发表于 2004-12-2 16:29:00

[VBA]急!请帮忙 关于plot vba编程中如何用*.ctb文件控制出图的颜色

本帖最后由 作者 于 2004-12-2 16:57:32 编辑 <br /><br /> 请高手帮忙:在2004版vba 编程中如何用*.ctb文件控制出图的颜色,我试了如下的方法和属性都没成功:下面一段程序我想实现打出来的图是黑白(没有灰度的),一直实现不了打开的图是r14版的.



ThisDrawing.Application.Preferences.Output.DefaultPlotStyleTable = "monochrome.ctb" 


ThisDrawing.ModelSpace.Layout.PaperUnits = acMillimeters                               '" millimeters"<BR>               ThisDrawing.ModelSpace.Layout.PlotType = acExtents<BR>               ThisDrawing.ModelSpace.Layout.PlotRotation = ac0degrees<BR>                       ThisDrawing.ModelSpace.Layout.SetCustomScale 1,        400                                                       ThisDrawing.ModelSpace.Layout.PlotWithPlotStyles = True<BR>                                       ThisDrawing.ModelSpace.Layout.ShowPlotStyles = True<BR>        ThisDrawing.Application.Preferences.Output.PlotPolicy = acPolicyLegacy<BR>               ThisDrawing.ModelSpace.Layout.RefreshPlotDeviceInfo<BR>               ThisDrawing.Plot.NumberOfCopies = 1                                                <BR>               ThisDrawing.Application.Preferences.Files.PrinterConfigPath =cfgpath        <BR>                       ThisDrawing.Plot.PlotToDevice ("test_BW.pc3")


页: [1]
查看完整版本: [VBA]急!请帮忙 关于plot vba编程中如何用*.ctb文件控制出图的颜色