Foxtable(狐表)用户栏目专家坐堂 → 全选反选复选框


  共有9859人关注过本帖树形打印复制链接

主题:全选反选复选框

美女呀,离线,留言给我吧!
Siluy_kl1017
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:214 积分:1612 威望:0 精华:0 注册:2012/4/12 14:32:00
全选反选复选框  发帖心情 Post By:2012/10/22 16:19:00 [只看该作者]

求助:请教全选和反选复选框的代码怎么写

 回到顶部
帅哥哟,离线,有人找我吗?
lin_hailun
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2012/10/22 16:52:00 [只看该作者]

 方法一:控件命名规范话,这样,就可以直接找到想要的空间。

 方法二:把复选框放到一个单独的容器里,然后找到容器,遍历里面的复选框。

 方式三:...........这就不写了。

 回到顶部
帅哥哟,离线,有人找我吗?
Fotable
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1015 积分:6979 威望:0 精华:0 注册:2012/8/1 18:41:00
  发帖心情 Post By:2012/10/22 16:56:00 [只看该作者]

全选逻辑列

With CurrentTable
    If .DataTable.DataCols(.Cols(.colsel).Name).IsBoolean Then    
        .DataTable.ReplaceFor(  .Cols(.colsel).Name ,True)
    Else
        MessageBox.Show("请先选择逻辑列","提示")
    End If   
End With

 

反选逻辑列

With CurrentTable
    If .DataTable.DataCols(.Cols(.colsel).Name).IsBoolean Then       
        For  Each r As Row In .Rows
            r(.ColSel) = not r(.ColSel)
        Next
    Else
        MessageBox.Show("请先选择逻辑列","提示")
    End If   
End With

 

全清逻辑列

With CurrentTable
    If .DataTable.DataCols(.Cols(.colsel).Name).IsBoolean Then       
        For  Each r As Row In .Rows
            r(.ColSel) = False
        Next
    Else
        MessageBox.Show("请先选择逻辑列","提示")
    End If   
End With

 

全清复选框

CurrentTable.ClearCheckedRows

 


 回到顶部
美女呀,离线,留言给我吧!
Siluy_kl1017
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:214 积分:1612 威望:0 精华:0 注册:2012/4/12 14:32:00
  发帖心情 Post By:2012/10/23 10:43:00 [只看该作者]

灰常感谢!借鉴一下


 回到顶部
美女呀,离线,留言给我吧!
Siluy_kl1017
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:214 积分:1612 威望:0 精华:0 注册:2012/4/12 14:32:00
  发帖心情 Post By:2012/10/23 10:47:00 [只看该作者]

不过我想用的全选和反选复选框达到这种效果,请见图
图片点击可在新窗口打开查看此主题相关图片如下:未命名.jpg
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
blackzhu
  6楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:狐仙 帖子:9875 积分:57584 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2012/10/23 11:08:00 [只看该作者]

你这个其实不好做  自己做个逻辑列 多好

 回到顶部
帅哥哟,离线,有人找我吗?
lin_hailun
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2012/10/23 11:14:00 [只看该作者]

 楼主上个例子。

 回到顶部
美女呀,离线,留言给我吧!
Siluy_kl1017
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:214 积分:1612 威望:0 精华:0 注册:2012/4/12 14:32:00
  发帖心情 Post By:2012/10/23 11:54:00 [只看该作者]

这个我是做出来的,可是重新打开项目全选反选就起不了作用了,不知道什么原因!

 回到顶部
帅哥哟,离线,有人找我吗?
lin_hailun
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2012/10/23 13:12:00 [只看该作者]

以下是引用Siluy_kl1017在2012-10-23 11:54:00的发言:
这个我是做出来的,可是重新打开项目全选反选就起不了作用了,不知道什么原因!

你做的那个,只是起到显示的效果,并没有存储。需要多加一列来保存你选择以后的信息。

 回到顶部