1、生成打印之前,把它们显示出来;
e.form.controls("label1").Visible = true
Dim doc As PrintDoc = e.Form.GernatePrintDoc()
doc.Preview()
e.form.controls("label1").Visible = False
2、控制其宽度
Dim doc As PrintDoc = e.Form.GernatePrintDoc()
For Each c As object In doc.Body.Children
If c.Gettype.Name Like "*table*" Then
Dim rt As prt.RenderTable = c
rt.Width = 50
End If
Next
doc.Preview