主题：打印问题

e.Form.Page.Width =  240  '纸张宽度为100毫米
e.Form.Page.Height = 140  '纸张高度为120毫米
e.Form.Page.LeftMargin = 10 '设置左边距
e.Form.Page.RightMargin = 5 '设置右边距
e.Form.Page.TopMargin = 5 '设置上边距
e.Form.Page.BottomMargin = 5 '设置下边距
e.Form.Page.Landscape = True '横向打印
Dim doc As PrintDoc =  e.Form.GernatePrintDoc()
doc.Preview()

横、坚向都有试过了，都不行。