主题：[求助]类似记录窗口，新增项问题！

如果已经建立关联：

if e.Col.name = "客户" andalso e.NewValue > "" then

    dim dr as datarow = e.DataRow.GetParentRow("父表")

    if dr is nothing then

        dr = datatables("父表").AddNew()

        dr("客户") = e.NewValue

    end if

end if 

如果没有建立关联，改用find查找判断：