Foxtable(狐表)用户栏目专家坐堂 → AutoSizeCols对备注列如何处理


  共有2526人关注过本帖树形打印复制链接

主题:AutoSizeCols对备注列如何处理

帅哥哟,离线,有人找我吗?
Fotable
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1015 积分:6979 威望:0 精华:0 注册:2012/8/1 18:41:00
AutoSizeCols对备注列如何处理  发帖心情 Post By:2016/3/15 21:41:00 [显示全部帖子]

AutoSizeCols会对备注列 
弄的非常宽吗,
这可不是我们想要的自动效果呀。

 回到顶部
帅哥哟,离线,有人找我吗?
Fotable
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1015 积分:6979 威望:0 精华:0 注册:2012/8/1 18:41:00
  发帖心情 Post By:2016/3/17 16:26:00 [显示全部帖子]

我测试的结果就是 自动列宽后,备注列变得非常的宽了。
图片点击可在新窗口打开查看此主题相关图片如下:2016-03-17_162532.jpg
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
Fotable
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1015 积分:6979 威望:0 精华:0 注册:2012/8/1 18:41:00
  发帖心情 Post By:2016/3/20 13:53:00 [显示全部帖子]

以下是引用大红袍在2016/3/17 17:14:00的发言:

比如可以这样处理

 

Dim t As Table = Tables("表A")
t.AutoSizeCols
For Each c As Col In t.cols
    If c.IsString AndAlso c.DataCol.MaxLength = -1 Then
        c.width = 20
    End If
Next



刚测试了 此方法无效,备注列的maxlength并不是-1 ,而是数据库决定的一个最大的值 是一个很大的数字。


 回到顶部