- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助] 关联公式与多行录入冲突问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=57717)
-- 发布时间：2014/9/29 20:13:00
-- [求助] 关联公式与多行录入冲突问题
在 "机房设备板件表" 中的PositionChanged中写有如下命令：
Dim t As Table = Tables("机房板件端口表")
Dim r As Row = e.Table.Current
If r Is Nothing Then Return
With Tables("机房设备板件表")
If .Current IsNot Nothing Then
If r.IsNull("设备编号") Then
t.Filter = "机房名称 = \'" & .Current("机房名称") & "\' And 设备型号 = \'" & .Current("设备型号") & "\' And 设备编号 Is Null And 板件槽位 = \'" & .Current("板件槽位") & "\' And 板件型号 = \'" & .Current("板件型号") & "\'"
Else
t.Filter = "机房名称 = \'" & .Current("机房名称") & "\' And 设备型号 = \'" & .Current("设备型号") & "\' And 设备编号 = \'" & .Current("设备编号") & "\' And 板件槽位 = \'" & .Current("板件槽位") & "\' And 板件型号 = \'" & .Current("板件型号") & "\'"
End If
Else
t.Filter = "False"
End If
End With
如果像下图右边的关联表“机房板件端口表”当前为空的话；在同时新增多行的时候项目会自动关闭；
此主题相关图片如下：360截图20140929200610662.jpg
如果像下图右边的关联表“机房板件端口表”已经存在有内容的话；在同时新增多行的时候就可以正常增加多行；
此主题相关图片如下：360截图20140929200646319.jpg
如果将"机房设备板件表" 中的PositionChanged命令删除掉、也可以正常增加多行。帮我看一下是不是
PositionChanged的命令 有问题？
-- 发布时间：2014/9/29 20:16:00
--
你的代码，条件应该只是关联列的内容，不要全部条件都加上去。
-- 发布时间：2014/9/29 20:18:00
--
你做个简单的例子发上来吧，感觉有点乱