主题：求易表对应的狐表公式或代码

易表中，a表某列的公式：
if(findrow("b表","某编码", "=",cell(row-1,col)) > 0,cell(row-1,col),if([某编码] = 0,Maxfor("b表","某编码")+1,[某编码]))
在狐表中怎么表达？
（修改了一下，原两个表的某编码列都是数字型的，所以将""改为0了）

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

点击浏览该文件:调用记录.table

附上文件，说明在调用表里的备注列内。这几天在学，可是不能解决，特来求助。

怎么今天狐朋们休假吗，怎么我第一个法帖？

哈哈～
 第 1 项是狐爸的方法正确！gdtgl的办法也能调入，但是没有删除原有的内容。

 第 2 项根据狐爸的稍微改两个小地方。

Dim Max As integer = DataTables("订单").Compute("Max(编号)")
For i As integer  = 1 To 8
   DataTables("调用").AddNew()("编号") = Max + 1
Next
增加的行是在【调用】表中增加，编号列的内容要全部一样（即：【订单】表的最大编号+1）

另外，我原来问题的第2项中，还有两个没解决：a、增加行前要删除【调用】表中的所有行，b、有可能还要在8条后再增加行，此时再增的行的编码也要自动的等于Max + 1。

第1个好用！  但DataTables("订单")DataRows.Clear()   但"订单"要改成"调用"，不然订单表上的数据就彻底没了！～ 哈哈，这会要命的呀。

第2个：新增行的编码都是 1 ？，如果是用按钮新增行这个代码就ok了：
Dim Max As integer = DataTables("订单").Compute("Max(编号)")
   DataTables("调用").AddNew()("编号") = Max + 1
但我的意思是：在设置回车向下增加行（8行以后的行）时自动填入这个Max + 1编号， 应该放在哪？

哈哈～！ 六爷来了。

不一样啊，以后【调用】表放在主窗口里，敲回车敲不动后，再要去点击按钮，操作人会很烦的。再说要增加n条记录，就要敲n此按钮，这会不方便的啊。 看来，我得自己琢磨了～ 看来我等不太懂vb或代码的狐胎们要慢慢练内功呀。

我一楼这样简单的问题，对狐师们来说很烦吧，但对我们来说很有意义，谢谢你们了！ ～

咱每次都会进步一些的！

非常感谢！～  很好。