以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  窗口所有表自动行高  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=189118)

--  作者:1234567
--  发布时间:2023/11/11 16:38:00
--  窗口所有表自动行高
老师,窗口所有表自动行高怎么写?
For Each c As WinForm.Table In e.Form.Controls 
c.AutoSizeHeaderRow()
Next

--  作者:有点蓝
--  发布时间:2023/11/11 16:40:00
--  
http://www.foxtable.com/webhelp/topics/1849.htm

For Each c As WinForm.Control In e.Form.Controls
    If
 Typeof c Is 
WinForm.Table Then \'判断控件是否是文本框
        
Dim t As 
WinForm.Table = c \'使用特定类型的变量引用控件
        t.
AutoSizeHeaderRow
    End
 If
Next

--  作者:1234567
--  发布时间:2023/11/11 19:42:00
--  
图片点击可在新窗口打开查看
--  作者:有点蓝
--  发布时间:2023/11/12 20:04:00
--  
t.table.AutoSizeHeaderRow