代码如下:
Dim pnl As WinForm.Panel = e.Form.Controls("Panel1")Dim doc As PrintDoc = e.Form.GernatePrintDoc(pnl)Doc.PageSetting.Width=210Doc.PageSetting.Height=90Doc.PageSetting.TopMargin =5Doc.PageSetting.LeftMargin=5doc.Preview()
其中:
Doc.PageSetting.TopMargin =5Doc.PageSetting.LeftMargin=5这两句不起作用,页边距预览的时候无论设置多少都没变化