Foxtable(狐表)用户栏目专家坐堂 → [求助]如何编写代码使列名按一定顺序排列


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

主题:[求助]如何编写代码使列名按一定顺序排列

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


加好友 发短信
等级:一尾狐 帖子:407 积分:5093 威望:0 精华:0 注册:2015/4/30 15:42:00
[求助]如何编写代码使列名按一定顺序排列  发帖心情 Post By:2017/3/14 21:39:00 [只看该作者]

如何编写代码使列名按一定顺序排列

排列前


图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看
排列后


图片点击可在新窗口打开查看此主题相关图片如下:2.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/3/14 21:44:00 [只看该作者]


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


加好友 发短信
等级:一尾狐 帖子:407 积分:5093 威望:0 精华:0 注册:2015/4/30 15:42:00
  发帖心情 Post By:2017/3/14 21:46:00 [只看该作者]

这个我知道,我想通过代码比较前后顺序自动实现排列


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


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/3/14 21:48:00 [只看该作者]

取列名到集合中排序

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


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/3/14 21:51:00 [只看该作者]

Dim lst As new List(of String)
For Each c As Col In Tables("表A").Cols
    lst.Add(c.Name)
Next
lst.sort
Tables("表A").SetColVisibleWidth(String.Join("|100|",lst.ToArray) & "|-1")

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


加好友 发短信
等级:一尾狐 帖子:407 积分:5093 威望:0 精华:0 注册:2015/4/30 15:42:00
  发帖心情 Post By:2017/3/14 21:51:00 [只看该作者]

无思路,请教一下怎么写?

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


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/3/14 22:04:00 [只看该作者]

看5楼

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


加好友 发短信
等级:六尾狐 帖子:1249 积分:9480 威望:0 精华:0 注册:2013/5/12 9:22:00
  发帖心情 Post By:2017/3/15 9:20:00 [只看该作者]

Dim lst As new List(of String)
For Each c As Col In Tables("表A").Cols
    lst.Add(c.Name) '将所有的列名添加到集合中
Next
lst.sort '排序集合的元素
Tables("表A").SetColVisibleWidth(String.Join("|100|",lst.ToArray) & "|-1") '设置排序后的列宽

另请教“|-1”表示什么?自适应宽度?
[此贴子已经被作者于2017/3/15 9:33:40编辑过]

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/3/15 10:29:00 [只看该作者]

回复8楼,-1指的是默认宽度,也就是98像素

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


加好友 发短信
等级:六尾狐 帖子:1249 积分:9480 威望:0 精华:0 注册:2013/5/12 9:22:00
  发帖心情 Post By:2017/3/15 22:03:00 [只看该作者]

哦!默认列宽。
那自适应列度如何设置?(不用Table的AutoSizeCols()方法)

 回到顶部
总数 11 1 2 下一页