以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]急求解,合计模式下删除出错!--已解决  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=40952)

--  作者:jnletao
--  发布时间:2013/10/7 14:14:00
--  [求助]急求解,合计模式下删除出错!--已解决
在afterload里用代码生成合计
 Tables("BagRegList").Cols("StyleNum").GrandTotal = True \'指定要合计的列
 Tables("BagRegList").GrandTotal = True \'显示合计模式

在窗体里加了个删除按钮,结果无法区分合计行,急求解


图片点击可在新窗口打开查看此主题相关图片如下:34.gif
图片点击可在新窗口打开查看

在此先谢谢 热心的大能们
[此贴子已经被作者于2013-10-7 14:40:54编辑过]

--  作者:程兴刚
--  发布时间:2013/10/7 14:30:00
--  
不要吝惜删除按钮的代码,亮出来,顺便说一下,查找到的合计行和分组行的行位置是-1,直接引用会出错!
--  作者:有点甜
--  发布时间:2013/10/7 14:33:00
--  

 判断空值呗。

 

if r isnot nothing then

    r.delete

end if


--  作者:jnletao
--  发布时间:2013/10/7 14:33:00
--  
多谢程大哥 提醒,已解决
With Tables("BagRegList")
    If .Position <> -1 Then
        .Current.Delete
    End If
End With