- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 如何提高表头的高度 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=102362)
-- 发布时间：2017/6/18 17:15:00
-- 如何提高表头的高度
在窗体中，插入了一个内部表，表头如下：
此主题相关图片如下：1.png
现在我想使得表头高度增大，使得“出生年月”显示为四行：（列宽我会限制很小）
此主题相关图片如下：2.png
请问，如何书写代码，写在哪个事件里？
KW.png)
[此贴子已经被作者于2017/6/18 17:20:47编辑过]
-- 发布时间：2017/6/18 17:37:00
--
Dim dt As DataTable = DataTables("表B")
dt.DataCols("第一列").Caption = "出" & vbcrlf & "生" & vbcrlf & "年" & vbcrlf & "月"
dt.BuildHeader()
此主题相关图片如下：表头.jpg
[此贴子已经被作者于2017/6/18 17:43:26编辑过]
-- 发布时间：2017/6/18 18:39:00
--
谢谢，可我没有确定标题中列的内容名称，我还有的列名是：最高学列_毕业学校 这个格式
-- 发布时间：2017/6/18 22:23:00
--
参考代码
Dim t As Table = Tables("表A")
For Each c As Col In t.cols
Dim nstr As String = ""
For Each s As String In c.Name
nstr &= s & vbcrlf
Next
c.caption = nstr
Next
t.DataTable.BuildHeader
t.AutoSizeHeaderRow
-- 发布时间：2017/9/25 7:47:00
--
方法 很好 ，谢谢！
-- 发布时间：2017/9/25 7:57:00
--
mark