以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  多值字段列如何进行逻辑判断的问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=47938)
--  作者：c510
--  发布时间：2014/3/20 0:27:00
--  多值字段列如何进行逻辑判断的问题

项目安排表中，承担部门列是多值字段，有多个部门承担。 对应的项目负责人的列表则必须在这几个承担部门里面选择

 

如果承担部门是单值的，我已经在PrepareEdit事件中实现了，但多值的就不知道怎么做了。  请老师指导一下。

 

 

单值的代码

If e.IsFocusCell Then
   If e.Col.Name = "项目负责人" Then
            e.Col.ComboList = DataTables("人力资源管理").GetComboListString("姓名", "[所在部门] = \'" & e.Row("承担部门") & "\'")
    End If
End If

 

 

OK，上传附件了。

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

[此贴子已经被作者于2014-3-20 9:06:48编辑过]
--  作者：y2287958
--  发布时间：2014/3/20 6:33:00
--  
http://www.foxtable.com/help/topics/0939.htm
要把列扩展为“多值字段”的
--  作者：lsy
--  发布时间：2014/3/20 6:48:00
--  
附件先压缩，后上传。
--  作者：c510
--  发布时间：2014/3/20 9:07:00
--  
以下是引用y2287958在2014-3-20 6:33:00的发言：
http://www.foxtable.com/help/topics/0939.htm
要把列扩展为“多值字段”的

 

晕，只看标题不看内容的啊？？
--  作者：c510
--  发布时间：2014/3/20 9:07:00
--  
以下是引用lsy在2014-3-20 6:48:00的发言：
附件先压缩，后上传。

谢谢你~ 附件已经上传了~！
--  作者：Bin
--  发布时间：2014/3/20 9:13:00
--  
.
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:测试.rar
--  作者：c510
--  发布时间：2014/3/20 9:21:00
--  文件打不开

谢谢专家。但是我打不开文件。

 

文件版本过高？    我的试用版
--  作者：Bin
--  发布时间：2014/3/20 9:22:00
--  
下载最新版本的试用版.
--  作者：c510
--  发布时间：2014/3/20 10:36:00
--  

OK，搞定了

 

查了好久，没弄懂为什么增加一个replace(",","\',\'") 就搞定了。  多值字段的值其实是一个字符串么？

 

 

If e.IsFocusCell Then
   If e.Col.Name = "项目负责人" Then
            e.Col.ComboList = DataTables("人力资源管理").GetComboListString("姓名", "[所在部门] in (\'" & e.Row("承担部门").replace(",","\',\'") & "\')")
    End If
End If
--  作者：Bin
--  发布时间：2014/3/20 10:38:00
--  
是的