以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  请问有没有办法让窗口中的table自动适应表行从而显示相应的高度?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=75836)

--  作者:大红袍
--  发布时间:2015/10/15 16:53:00
--  

比如代码

 

Dim t as table = tables("表A")
Dim h As Double = t.grid.height / (t.rows.count+1)

t.DefaultRowHeight = h