以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  动态列表项目  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=31450)

--  作者:gaoshr
--  发布时间:2013/4/15 18:19:00
--  动态列表项目

图片点击可在新窗口打开查看此主题相关图片如下:截图04.png
图片点击可在新窗口打开查看
如何把A表中的第三列的列表项目设定为SN列与FFF列的差异数据部分:D,E,F,G呢?
--  作者:y2287958
--  发布时间:2013/4/15 21:38:00
--  
PrepareEdit事件
Dim s As String
Dim ss1 As List(of String) = DataTables("表A").GetUniqueValues("","第一列")
Dim ss2 As List(of String) = DataTables("表A").GetUniqueValues("","第二列")
For Each s1 As String In ss1
    If ss2.Contains(s1) = False
        s += "|" & s1
    End If
Next
For Each s2 As String In ss2
    If ss1.Contains(s2) = False
        s += "|" & s2
    End If
Next
Tables("表A").Cols("第三列").ComboList=s.trimstart("|")

--  作者:gaoshr
--  发布时间:2013/4/16 13:18:00
--  PrepareEdit代码错误
复制代码确定后提示:Exception has been thrown by the target of an invocation.为什么?
图片点击可在新窗口打开查看此主题相关图片如下:截图05.png
图片点击可在新窗口打开查看

--  作者:sunsenfeng
--  发布时间:2013/4/16 14:05:00
--  
最起码"第一列"应该改"SN","第二列"应该改"FFF"