以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]关于跨表引用数据列  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=25796)

--  作者:天涯娇子
--  发布时间:2012/11/16 19:52:00
--  [求助]关于跨表引用数据列

表中有 成本明细表   信息汇总表 两个表

 现在要在 信息汇总表 中 成本合计 列 引用 成本明细表 中 成本合计列的数据

 

直接用帮助中跨表引用 例子  引用过来 在信息汇总表中 数据为"0"  小弟不解 求狐爸帮忙看一下代码问题 

Select Case e.DataCol.Name
    Case "车辆编号","车牌号码"   
        Dim dr As DataRow = e.DataRow
        Dim pr As DataRow
        If dr.IsNull("车辆编号") OrElse dr.IsNull("车牌号码") Then
            dr("车辆成本合计") = Nothing
        Else
            Dim filter As String
            filter = "车辆编号 = \'" & dr("车辆编号") & "\' And 车牌号码 = \'" & dr("车牌号码") & "\'  "
            pr = DataTables("车辆信息汇总").Find(filter)
            If pr IsNot Nothing Then
                dr("车辆成本合计") = pr("车辆成本合计")
            End If
        End If
End Select

 

 

以下是实例

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:二手车管理系统.table

[此贴子已经被作者于2012-11-16 20:44:51编辑过]

--  作者:lin_hailun
--  发布时间:2012/11/17 9:31:00
--  
 方法一:用表达式。

 方法二:用你上面的方法,但是,你的表名写错了。

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:二手车管理系统.table



--  作者:天涯娇子
--  发布时间:2012/11/17 10:32:00
--  

用表达式 前提条件是要在表与表之间做了关联

 

如果用方法二    朋友能不能详细的说一下 


--  作者:lin_hailun
--  发布时间:2012/11/17 10:37:00
--  
 方法一,方法二,都在例子里面了。

 方法二的代码,在表属性的DataColChanged事件里,我只是改了一下表的名字。
[此贴子已经被作者于2012-11-17 10:37:39编辑过]

--  作者:天涯娇子
--  发布时间:2012/11/17 10:56:00
--  

奇怪  我也试了呀 就是不行

 

 


--  作者:lin_hailun
--  发布时间:2012/11/17 11:07:00
--  
你需要填入车辆编号和车牌号码,才会激发这个事件,得到值的。
--  作者:天涯娇子
--  发布时间:2012/11/17 11:17:00
--  
就是不行  帮我再看看例子
--  作者:lin_hailun
--  发布时间:2012/11/17 11:23:00
--  
 
图片点击可在新窗口打开查看此主题相关图片如下:jjj.gif
图片点击可在新窗口打开查看

--  作者:天涯娇子
--  发布时间:2012/11/17 11:26:00
--  

谢谢  我看明白了