主题：关联表行内容不显示或显示不完整

我做了2个表, 1个表为主表, 另一表为字表, 两表未采用关联, 操作方式为当主表变更内容, 附表也将按主表内容调整为对应关联信息,

但当我点击设置的附表增加行时, 理论上在原有内容下应该增加空行, 但实际却仅显示增加的空行, 但是如果单击一下主表另一行,再重新点击该行,则所有应该显示的内容确认又显示了

本来想利用 _IDentify ,同时将过滤定义为 或大于这个值

 

 

我的增加行的代码如下:

Dim dr As Row = Tables("MainProcessData").Current
Dim max As Integer = DataTables("ProcessData").Compute("max([_Identify])")
MessageBox.Show( "max=" & max)
With Tables("Processdata")
    '.StopRedraw
    Dim drn As Row = .AddNew()
    drn("PartID")=dr("PartID")
    drn("LotID")=dr("LotID")
    drn.DataRow.Save
    'Dim max1 As Integer = DataTables("ProcessData").Compute("max([_Identify])")
    'MessageBox.Show("max=" & max & "    Max1=" & max1)
    .Filter ="(PartID =' " & dr("PartID") & "' and LotID=' " & dr("lotID") & "')"          '  Or [_Identify]> " & Max
    '  .ResumeRedraw
End With

 

 

此主题相关图片如下：2018-07-20 15_33_12-工艺数据维护.jpg

Dim dr As Row = Tables("MainProcessData").Current

试试改成

 

Dim dr As Row = e.form.controls("Table1").Table.Current

如果还有问题，弹出 dr("PartID") 等的值看看是否正确。