以文本方式查看主题 -  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=161190)

--  作者：dycwylb --  发布时间：2021/3/9 15:24:00 --  自动填充 If e.IsFocusCell Then \'如果是焦点所在单元格     If e.Col.Name = "明细序号" Then  Dim max As Integer  max = e.Table.DataTable.Compute("Max("明细序号")","申购单号 = \'" &  e.Row.DataRow.GetParentrow("申购单主表")("申购单号") & " \'")  \'\' If max > 0 Then e.Row("明细序号") = max + 1 End If End If End If 提示max = e.Table.DataTable.Compute("Max("明细序号")","申购单号 = \'" &  e.Row.DataRow.GetParentrow("申购单主表")("申购单号") & " \'") 此名编译错误，没有可接受的参数，重载失败，请指正一下。

--  作者：有点蓝 --  发布时间：2021/3/9 15:28:00 --   max = e.Table.DataTable.Compute("Max("明细序号")","申购单号 = \'" &  e.Row("申购单号") & " \'")

--  作者：dycwylb --  发布时间：2021/3/10 10:08:00 --   有提示错误码，但不知错在那里，请指正一下 此主题相关图片如下：qq图片20210310080554.png  下载信息  [文件大小：   下载次数： ] 点击浏览该文件:管理项目1.foxdb

--  作者：dycwylb --  发布时间：2021/3/10 10:11:00 --   老师附件为实例  下载信息  [文件大小：   下载次数： ] 点击浏览该文件:管理项目1.foxdb

--  作者：dycwylb --  发布时间：2021/3/10 11:01:00 --   请看一下

--  作者：有点蓝 --  发布时间：2021/3/10 11:01:00 --   max = e.Table.DataTable.Compute("Max(明细序号)","申购单号 = \'" &  e.Row("申购单号") & " \'")

--  作者：dycwylb --  发布时间：2021/3/10 11:15:00 --   修改后还是这样的提示

--  作者：有点蓝 --  发布时间：2021/3/10 11:37:00 --   不可能还是这样的提示，我测试没有问题

--  作者：dycwylb --  发布时间：2021/3/10 11:41:00 --   我的原代码为什么会不行呢

--  作者：有点蓝 --  发布时间：2021/3/10 11:43:00 --    下载信息  [文件大小：   下载次数： ] 点击浏览该文件:管理项目1 (3).zip