怎么实现组长、副组长、成员三个字段的值实现类似1，2，3，4，5，6……的组合后，去比对人员信息表中姓名里是否有相同的内容，如果有输出1 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 怎么实现组长、副组长、成员三个字段的值实现类似1，2，3，4，5，6……的组合后，去比对人员信息表中姓名里是否有相同的内容，如果有输出1

共有6444人关注过本帖树形打印复制链接主题：怎么实现组长、副组长、成员三个字段的值实现类似1，2，3，4，5，6……的组合后，去比对人员信息表中姓名里是否有相同的内容，如果有输出1

有点蓝

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110810 积分：563988 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2022/9/15 11:18:00 [显示全部帖子]

没看懂

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110810 积分：563988 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2022/9/15 11:57:00 [显示全部帖子]

Dim cmd As New SQLCommand
cmd.Connec tionNa me = "主数据源"
cmd.CommandText = "select 组长,副组长,联络员,成员 from {巡察组信息}"
Dim dt1 As DataTable = cmd.ExecuteReader(True)

dim s as string = dt1.GetComboListString("组长") & "|" & dt1.GetComboListString("副组长") & "|"dt1.GetComboListString("联络员") & "|"dt1.GetComboListString("成员")

s = s.replace("|","','")

cmd.CommandText = "update {巡察专业人才库} set 是否组队='未组队' ;update {巡察专业人才库} set 是否组队='已组队' where 姓名 in ('" & s & "');"

cmd.ExecuteNonQuery