- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]请教如何使用代码 让整个表的列宽根据内容长度自动调整 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=184835)
-- 发布时间：2023/1/7 17:47:00
-- [求助]请教如何使用代码 让整个表的列宽根据内容长度自动调整
此主题相关图片如下：131.png
这是软件汇总数据默认出来的数据 很占位置
此主题相关图片如下：132.png
这是双击表最左上角 自动根据内容调整列宽后的效果 就很美观了
请教下 这种效果要用代码实现应该怎么写？ 另外半成品信息那些列 想内容默认居中 应该怎么写？
-- 发布时间：2023/1/8 13:47:00
--
顶贴 请教
-- 发布时间：2023/1/8 19:31:00
--
有空多看看帮助了：http://www.foxtable.com/webhelp/topics/1554.htm
-- 发布时间：2023/1/9 12:45:00
--
这个我找到了 多谢！ 帮助经常看 就是经常想找内容的时候找不到 第二天在搜索下又能找到！
搜索有什么技巧吗？
-- 发布时间：2023/1/9 12:50:00
--
技巧就是多看帮助。
-- 发布时间：2023/1/11 21:54:00
-- 可参考以下代码
\'自动调整列列宽,并排除指定列
Dim Names As New List(Of String) \'定义一个集合,记录当前表的列名
For Each c As Col In CurrentTable.Cols
Names.Add( c.Name) \'将列名称添加到集合中
Next
For Each Name As String In Names
If Name = "第十列" Or Name = "第八列" Then \'不需要自动调整列宽的列名
\'什么也不操作
Else
CurrentTable.AutoSizeCol(Name)\'自动调整列宽
End If
Next