printer.zoomを設定するには

ワークス 2003-12-23 12:06:04 No: 81101

お聞きしたんですが、あるものを縮小して印刷したいとき、
Printer.Line (xx1 - (1 / 4), yy - yy1)-(xx1 + (1 / 4), yy + yy1), QBColor(0), BF
Printer.Zoom=50
と書くと、
「'Printer.Zoom'プロパティは1ページ内では設定できません」
というエラーが出てくるんですが、printer.zoomはどのように設定すればよいのでしょうか？