- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 复选框隐藏问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=81731)
-- 发布时间：2016/3/4 15:05:00
-- 复选框隐藏问题
请问大师，不显示复选框 没选中的行的代码怎么写？
-- 发布时间：2016/3/4 15:14:00
--
Dim t As Table = Tables("表A")
For i As Integer = 0 To t.rows.count - 1
If i < t.TopPosition OrElse i > t.BottomPosition Then
output.show(i)
End If
Next
-- 发布时间：2016/3/4 15:31:00
--
大师，不好意思哈，我弄错了，我的要求是：只显示复选框没选中的行，隐藏被选中的行，谢谢了！！
-- 发布时间：2016/3/4 15:35:00
--
Dim t As Table = Tables("表A")
Dim idx As String = "-1,"
For i As Integer = 0 To t.rows.count - 1
If i < t.TopPosition OrElse i > t.BottomPosition Then
idx &= t.rows(i)("_Identify") & ","
End If
Next
t.filter = "_Identify in (" & idx.trim(",") & ")"
-- 发布时间：2016/3/4 15:41:00
--
谢谢大师！！OK了
-- 发布时间：2016/3/4 16:55:00
--
大师我再问个问题，在上面已勾选的隐藏后，再显示所有行时 已勾选的复选框还是被勾选？
-- 发布时间：2016/3/4 17:46:00
--
你说的勾选，指哪里的勾选？截图说明。
-- 发布时间：2016/3/4 21:23:00
--
此主题相关图片如下：无标题.jpg
-- 发布时间：2016/3/5 10:29:00
--
测试不会。上例子说明
-- 发布时间：2016/3/6 12:10:00
--
每一次筛选以后，勾选都会去掉啊，那你要做什么效果？