参考
http://www.foxtable.com/webhelp/scr/2437.htm
Dim tb As WinForm.TabControl = e.Form.Controls("TabControl1")dim pg = tb.TabPages(1)
tb.SelectedPage = pgDim doc As PrintDoc = e.Form.GernatePrintDoc(pg)doc.Preview()