以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  副表怎么清空？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=73796)
--  作者：bagih
--  发布时间：2015/8/26 22:34:00
--  副表怎么清空？
窗口 中的副表用代码怎么清空呢，试着清除主表数据，但因有行位置联动代码，会报错
--  作者：大红袍
--  发布时间：2015/8/26 22:37:00
--  

For i As Integer =  Tables("表A").rows.count - 1 To 0 Step -1
    Dim r As Row = Tables("表A").rows(i)
    If r("账目金额") = 0 Then
        r.Delete()
    End If
Next

--  作者：bagih
--  发布时间：2015/8/26 23:31:00
--  
For i As Integer =  Tables("窗口_table1").rows.count - 1 To 0 Step -1
    Dim r As Row = Tables("窗口_table1").rows(i)
    If r("随便1列") = 0 Then
        r.Delete()
    End If
Next

是这个意思吗，我试了一下，执行后没反应呢
--  作者：lmk
--  发布时间：2015/8/27 0:26:00
--  
测试是可以执行的。
请检查一下列类型、窗口名称、控件名等有无拼写错误。
--  作者：大红袍
--  发布时间：2015/8/27 9:07:00
--  
For i As Integer =  Tables("窗口_table1").rows.count - 1 To 0 Step -1
    Dim r As Row = Tables("窗口_table1").rows(i)
    r.Delete()
Next