试试这个:
Printer.PaperSize = vbPRPSUser ' 自定义,其他常量参看 MSDN
Printer.Height=4500
Printer.Width=9600
Printer.PaperSize = vbPRPSUser ' 自定义,其他常量参看 MSDN
Printer.Height=4500
Printer.Width=9600
调试欢乐多
Printer.Height=4500
Printer.Width=9600
两句 papersize 属性已经是 256(vbprpsuser)了。