以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  表间关联  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=93859)
--  作者：18661970670
--  发布时间：2016/12/8 17:15:00
--  表间关联
求助：如何实现，默认情况下，如果“个人产值”表中的“项目名称”列内容与“项目表”中的“项目名称”列内容相同，则“个人产值”表中的“开始日期”列显示“项目表”中的“开始日期”列内容，同时也可以对“个人产值”表中的“开始日期”列内容进行更改
--  作者：18661970670
--  发布时间：2016/12/8 17:17:00
--  
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.rar
--  作者：有点色
--  发布时间：2016/12/8 17:34:00
--  

DataColchanged事件

 

If e.DataCol.name = "项目名称" Then
    If e.DataRow.IsNull("开始日期") Then
        Dim fdr As DataRow = DataTables("项目表").Find("项目名称 = \'" & e.DataRow("项目名称") & "\'")
        If fdr IsNot Nothing Then
            e.DataRow("开始日期") = fdr("开始日期")
        End If
    End If
End If

 

http://www.foxtable.com/webhelp/scr/1453.htm