主题：[求助]直接在窗体打印时标题居中的问题

Dim t As Table = e.form.controls("Table1").Table
For Each c As Col In t.cols
    c.TextAlign = TextAlignEnum.Center
Next
Dim doc As PrintDoc = e.Form.GernatePrintDoc()
doc.Preview

完美！

参考

 

Dim t As Table = e.form.controls("Table1").Table
For Each c As Col In t.cols
    c.TextAlign = TextAlignEnum.Center
Next
t.SetHeaderRowHeight(50)
Dim doc As PrintDoc = e.Form.GernatePrintDoc()
doc.Preview

老师啊，

Dim t As Table = e.form.controls("Table1").Table
For Each c As Col In t.cols
    c.TextAlign = TextAlignEnum.Center
Next
t.DefaultRowHeight = 50
Dim doc As PrintDoc = e.Form.GernatePrintDoc()
doc.Preview

老师，我输入这个代码之后，标题行都居中了，但是内容区的数据要怎样才能保持原来的右对齐呢？

Dim doc As PrintDoc = e.Form.GernatePrintDoc()
For Each c As object In doc.body.children
    If typeof c Is prt.RenderTable Then
        For i As Integer = 0 To c.cols.count-1
            c.cells(0,i).style.TextAlignHorz = prt.AlignHorzEnum.Center
        Next
    End If
Next
doc.Preview