主题：这段代码怎么改

Dim dr1 As DataRow = e.DataRow
If DataTables("还款表").Find("单据号 = '" & dr1("单据号") & "' And 记账单位 = '" & dr1("记账单位") & "'") Is  Nothing Then
    Dim dr2 As DataRow = DataTables("还款表").AddNew
    Dim Cols1() As String = {"单据号","记账单位"}
    Dim Cols2() As String = {"单据号","还款单位"}
    For i As Integer = 0 To Cols1.Length -1
        dr2(Cols2(i)) = dr1(Cols1(i))
    Next
End If

和这段代码无关的，这里只是将数据复制到还款明细表，并未对还款表进行任何操作。

 

提问最好配合简单的例子

 

下面的话是什么意思:

 

在基本表中可能有3个还款单位是物业，而单据号是：2个单据号是1,1个单据号是5。在还款表中显示的是，单据号1，还款单位物业，单据号5

 

你说得不清不楚的，同样的还款单位，基本表有三个单据号，两个1，一个5，为什么还款表只显示一个5？ 为什么是5，规则是设么？

抱歉，我无法理解你的问题，建议看看帮助文件使用指南中《关联表》和《表达式》这两章吧。

既然已经建立了关联，那么用表达式列即可：

http://www.foxtable.com/help/topics/0106.htm

 

 

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

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