[求助]行高设置 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]行高设置

共有3385人关注过本帖树形打印复制链接主题：[求助]行高设置

江南小镇

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：七尾狐帖子：1765 积分：11811 威望：0 精华：0 注册：2015/6/22 8:11:00

[求助]行高设置 发帖心情

Post By：2023/7/3 7:06:00 [显示全部帖子]

老师好

下面的表行高怎样设置

Dim tj As String = "Select * Fr om {" & e.sender.text & "}"

Dim c As String

If e.Sender.Text = "数据汇总" Then

c = "编号,65|日期,90|年,45|季,21|月,23"

Else If e.Sender.Text = "用电记录" Then

c = "编号,60|项目,50|项目ID,72"

SetHeaderRowHeight(25,80)

江南小镇

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：七尾狐帖子：1765 积分：11811 威望：0 精华：0 注册：2015/6/22 8:11:00

Post By：2023/7/3 9:01:00 [显示全部帖子]

老师

不起作用

Dim tj As String = "Select * Fr om {" & e.sender.text & "}"

Dim c As String

If e.Sender.Text = "数据汇总" Then

c = "编号,65|日期,90|年,45|季,21|月,23"

Tables("数据汇总").SetHeaderRowHeight(25,80)

End If

Tables("打印_Table1").Fill(tj,"用电记录", False) '加载Table

Functions.Execute("DataList",Tables("打印_Table1"),c) '显示列表

江南小镇

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：七尾狐帖子：1765 积分：11811 威望：0 精华：0 注册：2015/6/22 8:11:00

Post By：2023/7/3 18:22:00 [显示全部帖子]

老师，在窗口中怎样设置行高

此主题相关图片如下：2023-07-03 17 29 29.png

下载信息 [文件大小：下载次数： ]
点击浏览该文件:行高.rar

主题：[求助]行高设置