Foxtable(狐表)用户栏目专家坐堂 → 表列名或者列标题改变问题


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

主题:表列名或者列标题改变问题

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


加好友 发短信
等级:婴狐 帖子:48 积分:412 威望:0 精华:0 注册:2019/9/10 13:32:00
表列名或者列标题改变问题  发帖心情 Post By:2019/10/31 14:08:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:微信截图_20191031140543.png
图片点击可在新窗口打开查看
我这边想实现点击菜单栏的按钮,列名或者列标题就相应的改变,目前的代码实现了点击后增加相应的列,但是希望是每次点击不同的按钮,列名或列标题是改变的,而不是在已有的基础上增加列,请帮忙看下代码,告知该怎么改
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:daima.txt


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


加好友 发短信
等级:超级版主 帖子:110544 积分:562604 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/10/31 14:19:00 [只看该作者]

还是改标题吧,频繁的更改列名99.9%情况下都是一种失败的的设计。

参考:http://www.foxtable.com/webhelp/topics/1275.htm

With DataTables("表A")
    .DataCols(
Tables("AA").ColSel).Caption = e.ComboBox.Text
    .BuildHeader()

End
 With

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


加好友 发短信
等级:婴狐 帖子:48 积分:412 威望:0 精华:0 注册:2019/9/10 13:32:00
  发帖心情 Post By:2019/10/31 16:30:00 [只看该作者]

我这边点击组合框的选项后,组合框里的内容对应好几个值,将这些值作为列标题,该怎么改代码呢,就是.DataCols(Tables("表B").ColSel).Caption = e.ComboBox.Text 中的e.ComboBox.Text其实是一个集合,该怎么改?

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


加好友 发短信
等级:超级版主 帖子:110544 积分:562604 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/10/31 16:45:00 [只看该作者]

e.ComboBox.Text就是组合框显示的文本,一个字符串,怎么可能是集合。搞不懂,截图或者上传实例说明

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


加好友 发短信
等级:婴狐 帖子:48 积分:412 威望:0 精华:0 注册:2019/9/10 13:32:00
  发帖心情 Post By:2019/10/31 17:01:00 [只看该作者]

同一个组合框里的标签内容有:1和2
假如我选择的组合框的内容是1,那么展示出来的表头就是林地、耕地;
假如我选择的组合框的内容是2,那么展示出来的表头就是苹果、香蕉、梨;



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


加好友 发短信
等级:超级版主 帖子:110544 积分:562604 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/10/31 17:06:00 [只看该作者]

if e.ComboBox.Text = "1" then
With DataTables("表A")
    .DataCols(
Tables("AA").ColSel).Caption = "林地、耕地"
    .BuildHeader()
End
 With
elseif e.ComboBox.Text = "2" then
With DataTables("表A")
    .DataCols(
Tables("AA").ColSel).Caption = "苹果、香蕉、梨"
    .BuildHeader()
End
 With
end if

 回到顶部