标题：专业报表指定行高

1楼

lxhmax 发表于：2024/5/27 15:36:00

Dim doc As New PrintDoc '定义一个报表

Dim rt As New prt.RenderTable() '定义一个表格对象

doc.Body.Children.Add(rt) '将表格对象加入到报表中

rt.Style.GridLines.All = New prt.LineDef '将网格线类型设为默认类型

rt.Height = 60 '

rt.Rows.Count = 13

rt.Cols(0).Width = 25

rt.Cols(1).Width = 25

rt.Cols(2).Width = 50

Doc.Preview() '预览报表

关于指定行高的,为什么3行和13行行高不一样的?设置30行也是集中在页面的图片点击可在新窗口打开查看

2楼

有点蓝 发表于：2024/5/27 15:40:00

1楼红色代码指定的是整个表格的高，不是某一行的高

下面才是行高的设置

rt.Rows(i).Height = 10 * i '设置行高

3楼

lxhmax 发表于：2024/5/27 15:45:00

老师,这个可以设置最小行高吗?如果行内文本多就随着文本能容增加行高

4楼

lxhmax 发表于：2024/5/27 15:51:00

老师,预览的时候没问题,导出pdf的时候是乱码,这个要怎么解决?
图片点击可在新窗口打开查看

5楼

有点蓝 发表于：2024/5/27 16:13:00

字段行高要自己计算内容的高度，然后动态设置单元格的高度，看看下面的MeasureString用法

http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=145114&authorid=0&page=0&star=1

乱码应该是使用了pdf阅读器不支持的字体，换个其它字体

共5 条记录, 每页显示 10 条, 页签: [1]