以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  AutoSizeRows(),表格样式为默认起作用,其他样式不起作用  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=173576)

--  作者:hgy
--  发布时间:2021/12/6 15:59:00
--  AutoSizeRows(),表格样式为默认起作用,其他样式不起作用
图片点击可在新窗口打开查看



图片点击可在新窗口打开查看


代码如下:
Dim tb As Table = e.Form.Controls("Table1").Table
tb.Cols("备注").Width= 150
tb.AutoSizeRows()

--  作者:有点蓝
--  发布时间:2021/12/6 16:44:00
--  
是有问题,已反馈
--  作者:有点蓝
--  发布时间:2021/12/7 9:22:00
--  
这个是样式的自身的设置属性,有些样式是不允许自动换行显示的。加一句代码处理一下

Dim tb As Table = e.Form.Controls("Table1").Table
‘tb.Theme = "BeigeOne"
tb.Cols("第六列").Width= 150
tb.sysStyles.normal.WordWrap= True
tb.AutoSizeRows()