VSPrinter8.0
.PaperSize = pprUser
.PaperWidth =5670 '计算实际尺寸对应数值的方法:实际100毫米*系数56.7=5670
.PaperHeight =5670
自定义类型,在预览时,设置的PaperWidth和PaperHeight 不起作用。
这是因为打印机不支持此纸型。在打印机属性里,手动添加一个自定义纸型,尺寸为为100毫米*100毫米。
再预览时就有效果了。
其他尺寸同理。
发票版凭证的尺寸240*140,对应的数值
.PageWidth = 13606 '240
.PageHeight = 7936 '140