以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  报表中表格问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=24671)

--  作者:mamuaiqing
--  发布时间:2012/10/19 19:57: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.Width =
150 \'表宽为150毫米
rt.Height =
150 \'表高为150毫米
rt.Rows.Count =
3 \'设置行数
rt.Cols.Count =
3 \'设置列数

Doc.Preview()
\'预览报表


--  作者:mamuaiqing
--  发布时间:2012/10/19 20:13:00
--  
图片点击可在新窗口打开查看自己解决了