主题：[求助]跨表引用

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

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

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

 

去官网下载最新版本的foxtable安装即可打开。

If e.DataCol.Name = "年份" OrElse e.DataCol.name = "月份" Then '年份列发生变化.
   
    Dim nms() As String = { "机队可利用率" ,"机队日利用率","小时循环比","机械SDR万时率"}
    Dim fdr = DataTables("昆明航空可靠性数据").find("[航空公司] = '昆航' and [年份] = '" & e.DataRow("年份") & "' and 月份 = '" & e.DataRow("月份") & "'")
    If fdr IsNot Nothing Then
       
        For Each nm As String In nms
            e.DataRow(nm) = fdr(nm)
        Next
    End If
   
End If