以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  专业报表指定行高  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=192068)
--  作者：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行也是集中在页面的图片点击可在新窗口打开查看图片点击可在新窗口打开查看
--  作者：有点蓝
--  发布时间：2024/5/27 15:40:00
--  
1楼红色代码指定的是整个表格的高，不是某一行的高

下面才是行高的设置
rt.Rows(i).Height = 10 * i \'设置行高
--  作者：lxhmax
--  发布时间：2024/5/27 15:45:00
--  
老师,这个可以设置最小行高吗?如果行内文本多就随着文本能容增加行高
--  作者：lxhmax
--  发布时间：2024/5/27 15:51:00
--  
老师,预览的时候没问题,导出pdf的时候是乱码,这个要怎么解决?
图片点击可在新窗口打开查看
--  作者：有点蓝
--  发布时间：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阅读器不支持的字体，换个其它字体