Foxtable(狐表)用户栏目专家坐堂 → 关于输入多值字段输入问题


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

主题:关于输入多值字段输入问题

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


加好友 发短信
等级:幼狐 帖子:146 积分:1232 威望:0 精华:0 注册:2019/12/29 16:20:00
关于输入多值字段输入问题  发帖心情 Post By:2020/8/3 15:17:00 [只看该作者]

各位老师,实在无法自己解决,只好又向各位老师请教,不好意思。

我有“参会人员”和“缺席人员”两列,能否实现以下人员输入设想:只需要在“缺席人员”中输入缺席人员姓名,则“参会人员”就会自动输入余下的姓名?敬请指教
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:测试(1).table


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


加好友 发短信
等级:狐神 帖子:4627 积分:33767 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By:2020/8/3 15:24:00 [只看该作者]

两列有什么逻辑,没读懂

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


加好友 发短信
等级:幼狐 帖子:146 积分:1232 威望:0 精华:0 注册:2019/12/29 16:20:00
  发帖心情 Post By:2020/8/3 15:26:00 [只看该作者]

y老师,这两列人员姓名都是一样的,就是想实现快速简洁的输入方法,其中一列输入一些姓名,则另一列就自动输入剩余姓名

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


加好友 发短信
等级:超级版主 帖子:105473 积分:536350 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/8/3 15:54:00 [只看该作者]

首先姓名应该来自一个用户表这种表格,那就好处理了。不能是写死到列属性里的。如果有用户表,那么请把这个用户表也发上来,如果没有,建议建一个用户表

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


加好友 发短信
等级:幼狐 帖子:146 积分:1232 威望:0 精华:0 注册:2019/12/29 16:20:00
  发帖心情 Post By:2020/8/3 16:24:00 [只看该作者]

蓝老师,不知道这张表是否可以?谢谢

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


加好友 发短信
等级:幼狐 帖子:146 积分:1232 威望:0 精华:0 注册:2019/12/29 16:20:00
  发帖心情 Post By:2020/8/3 16:25:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:科开公司人员名单.xlsx


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


加好友 发短信
等级:狐神 帖子:4627 积分:33767 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By:2020/8/3 16:51:00 [只看该作者]

If e.DataCol.Name = "参会人员" AndAlso e.DataRow.IsNull("参会人员") = False
    Dim 数组1() As String = Tables(e.DataTable.Name).Cols(e.DataCol.name).ComboList.split("|")
    Dim 数组2() As String = e.NewValue.split(",")
    e.DataRow("缺席人员") = String.join(",",(数组1.Except(数组2)).ToArray)
End If

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


加好友 发短信
等级:超级版主 帖子:105473 积分:536350 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/8/3 16:57:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:测试(1).zip


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


加好友 发短信
等级:幼狐 帖子:146 积分:1232 威望:0 精华:0 注册:2019/12/29 16:20:00
  发帖心情 Post By:2020/8/3 16:59:00 [只看该作者]

谢谢y老师,这么短的代码就能实现,我该好好学学

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


加好友 发短信
等级:幼狐 帖子:146 积分:1232 威望:0 精华:0 注册:2019/12/29 16:20:00
  发帖心情 Post By:2020/8/3 17:05:00 [只看该作者]

谢谢蓝老师,您的代码我更得认真学一下,一时间恐怕看不懂啊

 回到顶部