vsprinter自定义页面问题——在线等待

With dayinyulan.VSPrinter1
.PaperSize = pprUser
.MarginLeft = Val(dayinshezhi.Text1.Text) * 567
.MarginRight = Val(dayinshezhi.Text2.Text) * 567
.MarginTop = Val(dayinshezhi.Text3.Text) * 567
.MarginBottom = Val(dayinshezhi.Text4.Text) * 567
.PaperWidth = Val(dayinshezhi.Text5.Text) * 567
.PaperHeight = Val(dayinshezhi.Text6.Text) * 567
自定义类型预览时怎么PaperWidth和PaperHeight 不起作用呢，怎么改变还是默认的页面，高手搭救啊！

[解决办法]
是不是值不正确？你单步调试看看付给它的值是什么？