- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 如何分隔控件的宽度=表的实际宽度 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=109010)
-- 发布时间：2017/11/2 15:27:00
-- 如何分隔控件的宽度=表的实际宽度
老师，因为会根据显示隐藏列来显示不同的列，想让分隔控件的宽度=表的实际宽度
msgbox(Forms("调拨补").Controls("table1").Table.Grid.Width) 用这个不行
此主题相关图片如下：微信截图_20171102151801.png
-- 发布时间：2017/11/2 15:57:00
--
Dim t As Table = Tables("表A")
Dim sum As Double = 0
For i As Integer = 0 To t.grid.cols.count-1
If t.grid.cols(i).visible Then
sum += t.grid.cols(i).widthdisplay
End If
Next
output.show(sum)
-- 发布时间：2017/11/2 16:00:00
--
谢谢甜老师！！