主题：多表组合出错

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

点击浏览该文件:管理项目3.foxdb

里面的组合方式应该如何写

此主题相关图片如下：企业微信截图_15487498029898.png

Dim t2 As Table = Tables("店铺同期分析_Table1")
Dim n11 As Double
Dim m11 As Double
For Each r As Row In t2.Rows
    If r.IsNull("销售金额") = False Then
        n11 = r("销售金额")
    Else
        r("销售金额") = n11
    End If
Next
For Each r As Row In t2.Rows
    If r.IsNull("同期销售金额") = False Then
        m11 = r("同期销售金额")
    Else
        r("同期销售金额") = m11
    End If
Next

上图中有两个部门，列“同期销售金额”的第三行和第四行本应该是没有数据的，如何对应各自的部门取数呢