主题：字体表格

e.Table.SetHeaderRowHeight(40)
For i As Integer = 1 To e.Table.Rows.Count
    e.Table.Grid.Rows(i).Height = 36
    Dim j As Integer = CInt(e.Table.Grid.Rows(i).Height / 3.2)
    e.Table.Font = New Font("宋体",j , FontStyle.Bold)
Next

在AfterLoadTableSetting中加入上述代码，如果表是复制过来的表，好像不起作用？

不是这个意思，我说的是重新建立的表就有效，复制过来的表，无论怎样打开都无效。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:例子.rar

请老师帮我修改一下。

为什么表A 不用呢？而表D就要呢？

在AfterOpenProject中对所有表进行设置，是否可以？

MessageBox.show(1)