- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]表属性代码效果 不会在窗口控件实现，求帮助 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=119659)
-- 发布时间：2018/5/29 18:25:00
-- [求助]表属性代码效果 不会在窗口控件实现，求帮助
跨表列值下拉选择（没录入的）录入
表属性代码效果 不会在窗口控件实现，求帮助
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:表属性代码效果 不会在窗口控件实现，求帮助.table |
此主题相关图片如下：窗口控件 跨表选择列录入.jpg
-- 发布时间：2018/5/29 18:34:00
--
enter事件
Dim lst1 As List(of String) = DataTables("表B").GetUniqueValues("","第一列")
Dim lst2 As new List(of String)
Dim val As String = DataTables("表A").GetComboListString("第一列","[_Identify] <> " & Tables("表A").current("_Identify"))
val = val.Replace("|",",")
lst2.AddRange(val.split(","))
For Each v As String In lst2
If lst1.Contains(v) Then
lst1.Remove(v)
End If
Next
e.sender.ComboList = String.Join("|",lst1.ToArray)
-- 发布时间：2018/5/29 18:48:00
-- 回复：（有点甜）enter事件 Dim lst1 As Lis...
表B的第二和第四列的值也一起填入表A，代码要加到这里，怎么写呢？
-- 发布时间：2018/5/29 20:14:00
--
没看懂你的意思，截图说明一下
-- 发布时间：2018/5/29 23:30:00
-- 回复：（有点蓝）没看懂你的意思，截图说明一下
图1：表B的第二列 中国 第四列 广东 窗口空间勾选是一起填入表A
图2：窗口下拉表B 勾选第一列后 表A填入第二列 中国 和第四列 广东
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:f.table |
此主题相关图片如下：图1.png
此主题相关图片如下：图2.png
-- 发布时间：2018/5/29 23:56:00
--
参考：http://www.foxtable.com/webhelp/scr/1451.htm
要在datacolschanged事件处理