Printer对象获得是当前默认打印机的句柄和信息，所以当前默认打印机的设置中纸张大小是多少Printer.PageSize就是多少。
Printer.Page属性只是返回当前页号而已。
另外还有Printer.TrackDefault属性，其值为True时表明Printer对象随控制面板中打印机的设置的改变而改变。
Printer.Page属性只是返回当前页号而已。
另外还有Printer.TrackDefault属性，其值为True时表明Printer对象随控制面板中打印机的设置的改变而改变。
如果设置Printer.PaperSize为vbPRPSUser，则表示使用“用户定义”纸张，此时纸张大小由打印机 Height 和 Width 属性决定。如果设置打印机 Height 和 Width 属性自动地将 PaperSize 设置为 vbPRPSUser。
'Item' property cannot be set within a page (Error 396)
See AlsoCertain properties of the Printer object can't be changed within a page. This error has the following cause and solution: You tried to change the Height, Width, or PaperSize properties of the Printer object before advancing the print job to the next page.
Use the NewPage method before changing the Height, Width, or PaperSize properties.意思好像是不能在打印期间进行设置
Values for the PaperSize Member
See Also Specifics
Value Paper size
1 Letter (8.5 x 11 in.)
2 Letter Small (8.5 x 11 in.)
3 Tabloid (11 x 17 in.)
4 Ledger (17 x 11 in.)
5 Legal (8.5 x 14 in.)
6 Statement (5.5 x 8.5 in.)
7 Executive (7.25 x 10.5 in.)
8 A3 (297 x 420 mm)
9 A4 (210 x 297 mm)
10 A4 Small (210 x 297 mm)
11 A5 (148 x 210 mm)
12 B4 (250 x 354 mm)
13 B5 (182 x 257 mm)
14 Folio (8.5 x 13 in.)
15 Quarto (215 x 275 mm)
16 11 x 17 in.
18 Note (8.5 x 11 in.)
19 Envelope #9 (3.875 x 8.875 in.)
20 Envelope #10 (4.125 x 9.5 in.)
21 Envelope #11 (4.5 x 10.375 in.)
22 Envelope #12 (4.25 x 11 in.)
23 Envelope #14 (5 x 11.5 in.)
24 C size sheet (17 x 22 in.)
25 D size sheet (22 x 34 in.)
26 E size sheet (34 x 44 in.)
27 Envelope DL (110 x 220 mm)
28 Envelope C5 (162 x 229 mm)
29 Envelope C3 (324 x 458 mm)
30 Envelope C4 (229 x 324 mm)
31 Envelope C6 (114 x 162 mm)
32 Envelope C65 (114 x 229 mm)
33 Envelope B4 (250 x 353 mm)
34 Envelope B5 (176 x 250 mm
35 Envelope B6 (176 x 125 mm)
36 Envelope (110 x 230 mm)
37 Envelope Monarch (3.875 x 7.5 in.)
38 6-3/4 Envelope (3.625 x 6.5 in.)
39 US Std Fanfold (14.875 x 11 in.)
40 German Std Fanfold (8.5 x 12 in.)
41 German Legal Fanfold (8.5 x 13 in.)
256 User-defined