Foxtable(狐表)用户栏目专家坐堂 → 表第一次加载出来后,使用遍历全选,会有一行选不上,不知道为啥,很诡异


  共有4082人关注过本帖平板打印复制链接

主题:表第一次加载出来后,使用遍历全选,会有一行选不上,不知道为啥,很诡异

帅哥哟,离线,有人找我吗?
chen37280600
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1265 积分:7838 威望:0 精华:4 注册:2017/12/31 14:53:00
表第一次加载出来后,使用遍历全选,会有一行选不上,不知道为啥,很诡异  发帖心情 Post By:2018/4/30 10:17:00 [只看该作者]

我的表使用动态加载。第一次加载SIteminfo这个表,然后我启动表的多选,然后全选,会有一行没有被选上,很奇怪。

 

启动表多选的代码:

Tables("SItemInfo").ShowCheckBox = e.Sender.Checked

 

全选代码:(我的按钮名称写“全选/反选”,但我没有添加反选代码)

For Each r As Row In Tables("SItemInfo").rows
        r.Checked =True
Next

 

全选按钮结果:


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

 

1如果我点击分类,加载其他的数据,再去全选又没有问题了。

2我还试过用倒序遍历全选,也一样会出现。

3出现这个情况后,我不重新加载数据,我点击第二行或者第四第五行,再全选,没用还是漏了。只有我点击了一下那个被漏选的行,然后点一下全选,它才会被选上!

4有时候,第一次加载这个表数据,数据有几十行的时候,还会出现第一行,第4或第5行左右(反正不知名的某一行),和最后一行,没有被选上的诡异情况。

 

我的表的Afterload里有段这样的代码,不知道是否有影响

 

    '表滚动条默认最左边---
    Dim gt As Table =   Tables(e.DataTable.Name)
    If gt.Rows.Count > 0 Then
        gt.Select(0,0)
    End If
    '表滚动条默认最左边---

[此贴子已经被作者于2018/4/30 10:21:09编辑过]

 回到顶部
总数 15 1 2 下一页