表A，表B都 有编号，金额，数量，删除四列，
此主题相关图片如下：微信图片_20220702162826.png
如附件图，表A的2个编号101对应表B的2个编号101，怎么做到删除 表B灰色的一行，表A对应的一行（编号101，金额5，数量10) 的”删除“ 显示为true，而不是表A两行都显示为true
表B datacolchanged:
Select Case e.DataCol.Name
Case "金额","数量"，"删除”
Dim Filter As String = "[编号] = '" & e.DataRow("编号") & "'"
DataTables("表A").ReplaceFor(e.DataCol.Name, e.NewValue, Filter)
End Select
删除B表行按钮代码：
'If Tables("窗口1_table1").Current Is Nothing Then
'e.Cancel = True
Tables("窗口1_table2").current("删除") = true
DataTables("表B").DataCols("删除").RaiseDataColChanged()
Tables("窗口1_table2").current.Delete
'End If
'Tables("窗口1_table2") 是表B的窗口副表
[此贴子已经被作者于2022/7/2 16:29:09编辑过]
加好友 
发短信
Post By：2022/7/2 16:22:00 [只看该作者]
