以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 自动行高不起作用 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=145011) |
-- 作者:tld -- 发布时间:2020/1/6 8:13:00 -- 自动行高不起作用 老师,我用了论坛中老师的代码自动调整行高,代码如下: If e.Col.Name="委托单位" Then Dim t As Table = e.Table Dim cname As String = e.Col.name Dim lc As Integer = t.cols(cname).index+1 Dim br As Integer = e.Row.index+t.HeaderRows t.grid.AutoSizeRows(0, lc, br, lc, 0, 0) End If |
-- 作者:有点蓝 -- 发布时间:2020/1/6 8:25:00 -- 参考这个用法:http://www.foxtable.com/webhelp/topics/1564.htm |
-- 作者:tld -- 发布时间:2020/1/6 11:00:00 -- 老师,我试了,还是不行 此主题相关图片如下:捕获.png 此主题相关图片如下:捕获1.png |
-- 作者:有点蓝 -- 发布时间:2020/1/6 11:20:00 -- 如果是使用代码给单元格赋值的,或者是在窗口编辑的,把代码改改放到datacolchanged事件 |
-- 作者:tld -- 发布时间:2020/1/6 11:52:00 -- |
-- 作者:有点蓝 -- 发布时间:2020/1/6 11:57:00 -- If e.dataCol.Name = "备注" Then Tables(e.datatable.name).AutoSizeRow(Tables(e.datatable.name).findrow(e.datarow)) End If |
-- 作者:tld -- 发布时间:2020/1/6 13:35:00 -- 蓝老师,还是不行,没有反应。是版本的问题吗?我的是2019版 |
-- 作者:有点蓝 -- 发布时间:2020/1/6 14:19:00 -- 和版本无关。上传实例说明 |
-- 作者:tld -- 发布时间:2020/1/6 23:18:00 -- 老师,自动换行后自动调整行高,有没有完整的资料可供学习?我在论坛上搜索后,也找不到实现的方法。谢谢 |
-- 作者:有点蓝 -- 发布时间:2020/1/6 23:22:00 -- 请上传实例说明问题 |