主题：[求助]请教这里表达式该如何写？(已解决)

此主题相关图片如下：01.jpg


此主题相关图片如下：2.jpg

 

请教如何才能在产指表中选择工序号以后在后面的工序产值列自动填入产品表中对应工序产值.

 

初用狐表，请大哥大姐们多多关照！

 

 

 

 

 

 

 

 

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

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

多谢狐狸爸爸，下次一定记住传数据，测试了你的代码，还是出错！

 

 

已经搞定，参考　http://www.foxtable.com/help/index.html?n=1451.htm

 

在此谢谢各位的帮忙，谢谢lihe60，谢谢狐狸爸爸！

find

搞不定，看帮助。很简单的。罚你看帮助。

 

我真的看帮助了啊，没有找到啊！能提示下不？谢了！设置了关联，但是没有办法引用父表数据！

帮助你读了三遍吗？

若没有，读三遍，其义自现。

 

老大，你就说下怎么弄好不？或者说下在帮助的那个位置？成不？

DataColChanged

事件里写代码

e.datarow("工序产值")=datatables("").compute("sum(e.datacol.name)"，"")

条件表达式自己写。

我没有测试。

楼主你提问要养成一个好习惯，除了图片，还应该直接将表传上来，这样大家可以直接帮你设置好代码。

否则人家要帮助你，还得先建两个表，输入测试数据，毕竟每个人写代码都不是一气呵成的，都需要测试的。

没有表测试，我只能大概给你写一下，放在产值表的DataColChanged事件:

 

Select case e.DataCol.Name
    Case "产品名称"，"工序号"
        Dim dr As DataRow = DataTables("产品").Find("产品名称 = '" & e.DAtaRow("产品名称") & "'")
        If dr IsNot Nothing And e.Datarow("工序号") > "" Then
               e.DataRow("工序产值") = dr(e.DataRow("工序号") & "产值")
        End if
End Select

 

另：lihe60回帖不要那么随便，以免给新同学带来困惑。

 

 

呵呵，你传表上来，我才能测试的。

不过要等晚上或明天了，我要出去了。

没有关系的，谢谢你哈！