以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 自动填充 (http://foxtable.net/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 -- 有提示错误码,但不知错在那里,请指正一下 ![]() ![]()
|
||||
-- 作者:dycwylb -- 发布时间:2021/3/10 10:11:00 -- 老师附件为实例
|
||||
-- 作者:dycwylb -- 发布时间:2021/3/10 11:01:00 -- ![]() |
||||
-- 作者:有点蓝 -- 发布时间:2021/3/10 11:01:00 --
|
||||
-- 作者: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 --
|