Foxtable(狐表)用户栏目专家坐堂 → [讨论]目录树显示某表中某行的某列


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

主题:[讨论]目录树显示某表中某行的某列

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106067 积分:539428 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/11/1 21:34:00 [显示全部帖子]

没看懂,请给出一些测试数据,并截图说明最终要的效果
[此贴子已经被作者于2022/11/1 21:33:38编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106067 积分:539428 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/11/2 12:19:00 [显示全部帖子]

文件管理器控件绑定窗口的副表A即可,表格选中哪一行就会显示哪一行绑定的列的文件。

如果绑定主表A的,考虑做联动:http://www.foxtable.com/webhelp/topics/2631.htm
[此贴子已经被作者于2022/11/2 12:19:40编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106067 积分:539428 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/11/2 14:29:00 [显示全部帖子]


 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106067 积分:539428 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/11/2 16:11:00 [显示全部帖子]

dim 表名 as string = “ComboBox控件选择而定的表名
dim 列名 as string = “ComboBox控件选择而定的列名
e.Form.Controls("TextBox1").BindingField = 表名 & “.” & 列名

 回到顶部
帅哥,在线噢!
有点蓝
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106067 积分:539428 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/11/3 9:00:00 [显示全部帖子]

Dim s As String = e.Form.Controls("ComboBox表").text
Dim p As String = e.Form.Controls("CheckedComboBox列").text

另外注意,一个FileManager只能绑定一个列,所以"CheckedComboBox列"如果勾选多个是不行的

 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106067 积分:539428 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/11/3 10:51:00 [显示全部帖子]

放到选择表和列的控件的valuechanged事件

 回到顶部
帅哥,在线噢!
有点蓝
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106067 积分:539428 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/11/3 13:32:00 [显示全部帖子]

"CheckedComboBox列"里选择勾选表B的一个列

 回到顶部
帅哥,在线噢!
有点蓝
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106067 积分:539428 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/11/3 15:19:00 [显示全部帖子]

1、表格没有文件列:http://www.foxtable.com/webhelp/topics/1646.htm
2、表格文件列没有添加文件

如果是固定的一个列是文件列,比如是第五列,代码直接这样即可
Dim s As String = e.Form.Controls("ComboBox表").text
e.Form.Controls("FileManager1").BindingField = s & “.第五列

 回到顶部
帅哥,在线噢!
有点蓝
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106067 积分:539428 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/11/3 15:24:00 [显示全部帖子]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:绑定控件.zip


 回到顶部