主题：跨表引用的自动更新求代码

我有两个表，操作流程是：“操作结算表”录入基本资料后，当在“操作结算表”选择“ 完成情况=True”，代码就会根据“客户结算对应表”“客户全称”的对应的“结算人”自动填写至“操作结算表”“结算人”列中，但是不运作，我是菜鸟级，请帮我修改一下代码吧，代码如下：

Select Case e.DataCol.Name
    Case "是否完成"
        Dim dr As DataRow = e.DataRow
        Dim pr As DataRow
        If dr("是否完成") = False Then
            dr("结算人") = Nothing
            Else
            Dim filter As String
            filter = "客户全称 = '" & dr("客户全称") & "'"
            pr = DataTables("客户结算对应表").Find(filter)
            If pr IsNot Nothing Then
                dr("客户全称") = pr("客户全称")
             Else              
                MessageBox.Show("此客户未曾登记")
            End If
        End If
End Select

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目1.rar