为什么我得不到打印机的正确设置?

[myhot-河马吃草]

form窗体中加了一Dialog1控件来调出系统打印机设置对话框..设置完成之后..为什么末了显示始终不变呢..w98下正常..W2K..下通不过..

Dialog1.Flags = cdlPDHidePrintToFile + cdlPDPrintSetup
Dialog1.PrinterDefault = True
Dialog1.ShowPrinter
Set Printer = Printers(1)'注.这里没有问题.通过下面的名称可以确定你调整的打印机
MsgBox Printer.DeviceName
msgbox "纸张:" & Printer.PaperSize & "高:" & Printer.ScaleHeight & "宽:" & Printer.ScaleWidth


大家试一下呀.

[wumylove1234]

msgbox "纸张:" & Printer.PaperSize & "高:" & Printer.ScaleHeight & "宽:" & Printer.ScaleWidth

Printer.Height = lngPaperHeight
Printer.Width = lngPaperWidth

是以这样来搞打印纸的值的.不好意思,QQ上我没有好好看,我以为是自定义纸型的问题.不过挣你40大分你必需给我!!!!!!!!!!!!!!!!不给我,我就整死你!!

[ryuginka]

up

[jam021]

关注,帮顶