主题：[求助]请教如何设置计算代码或表达式

这种要求只能用代码。

日龄帮你设置好了：

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

点击浏览该文件:管理项目20.table

存栏母鸡数你表述不太清楚，就没有设置了。

同样用计算代码，可以参考DataTable的Compute方法。

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

点击浏览该文件:管理项目21.table

不关时易表和foxtable，计算的原理肯定是一样的，建议你多看几次帮助文件，帮助中的例子都手工设计一下看看。

Dim dr As DataRow = e.DataRow
Dim Filter As string = "[日期] <= #" & dr("日期") & "# And [栏舍号] = '" & dr("栏舍号") & "'"
Dim Sum As Integer = e.DataTable.Compute("Sum(淘汰母鸡)",Filter)
e.Datarow("存栏母鸡") = dr("进栏母鸡") - Sum