我在“FTTH”表DataColChanged中写有以下命令。目的是想实现:
当 "FTTH"表中的'ONU编号'列内容发生变化时,
检查“OLT关联数据表”中的‘olt’‘OLT端口’‘ONU编号’的三列内容与“FTTH”表中当前行内容相同时,
将“OLT关联数据表”中‘cvlan’和‘shebeixinghao’两列的内容复制到“FTTH”表相对应的列中去。
可是以下命令不起作用,帮我看看错在哪啦?(没有错误提示)
If e.DataCol.Name = "ONU编号" Then '如果更改的是 ***列 和 ***列
For Each r As Row In Tables("OLT关联数据表").Rows
Dim dr As DataRow = DataTables("FTTH").Find("olt = '" & r("olt") & "' and OLT端口 = '" & r("OLT端口") & "' and ONU编号 = '" & r("ONU编号") & "'")
If dr IsNot Nothing Then
For Each s As String In "cvlan|shebeixinghao".Split("|")
dr(s) = r(s)
Next
End If
Next
End If