以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  AfterEdit事件什么不弹出对话框？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=176988)

--  作者：foxtablefanse --  发布时间：2022/5/5 21:31:00 --  AfterEdit事件什么不弹出对话框？ 想改变单元格的值，重新计算出勤天数。AfterEdit事件什么不弹出对话框？ If e.Col.Name <> "姓名" AndAlso e.Col.Name <> "出勤天数"  Then     \'统计出勤天数     Dim ts As Double=0.0     For Each c As Col In Tables("KQ").Cols         If e.Col.Name <> "姓名" AndAlso e.Col.Name <> "出勤天数"  Then             ts += iif( e.Row(c.name)="√",1,iif( e.Row(c.name)="休/√",0.5,iif( e.Row(c.name)="√/休",0.5,0)))         End If         e.Row("出勤天数")=ts ‘这句写在next后面就没反应     Next     MessageBox.Show(ts) ’为什么不弹框？ End If 此主题相关图片如下：360截图1872011511112393.png [此贴子已经被作者于2022/5/5 21:38:43编辑过]

--  作者：有点蓝 --  发布时间：2022/5/5 21:36:00 --   改改放到datacolchanged事件

--  作者：foxtablefanse --  发布时间：2022/5/5 21:43:00 --   试了也是一样不弹出

--  作者：有点蓝 --  发布时间：2022/5/5 22:32:00 --   请上传实例说明