我练习跨表引用, 想把产品表的四列追过来, 一点反应也没有
If e.DataCol.Name = "产品编号" Then
Dim nms() As String = {"品名","型号","规格","单价"}
If e.NewValue Is Nothing Then
For Each nm As String In nms
e.DataRow(nm) = Nothing
Next
Else
Dim dr As DataRow
dr = DataTables("产品").Find("[产品编号] = '" & e.NewValue & " '")
If dr IsNot Nothing
For Each nm As String In nms
e.DataRow(nm) = dr(nm)
Next
End If
End If
End If
帮我看看, 把这个命令放在订单表的datecolchanged事件里了, 咋不好使呢