Foxtable(狐表)用户栏目专家坐堂 → 逻辑列全选


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

主题:逻辑列全选

帅哥,在线噢!
有点蓝
  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107677 积分:547706 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/6/22 8:37:00 [只看该作者]

换行可以触发currentChanged事件,在currentChanged事件设置复选框的选中状态即可

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


加好友 发短信
等级:八尾狐 帖子:1837 积分:12990 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2017/6/22 10:24:00 [只看该作者]

Dim gx As WinForm.CheckBox = e.Form.Controls("勾选")
For Each r As Row In Tables("订单主表.订单明细表").Rows
    r("已下单") = gx.Checked = True  
Next

 

把这段代码加到订单明细表的currentchanged事件里吗?


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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/6/22 10:30:00 [只看该作者]

 currentChanged事件写入代码后还有什么问题?

 


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


加好友 发短信
等级:八尾狐 帖子:1837 积分:12990 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2017/6/22 10:32:00 [只看该作者]

写入后只要换行就全选或全不选, 不对哦

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


加好友 发短信
等级:八尾狐 帖子:1837 积分:12990 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2017/6/22 10:33:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:fff截图20170622102642.png
图片点击可在新窗口打开查看
报价主表当前行勾选报价主表.报价明细表的复选框“已订购全选”,<已订购全选复选框>为选中状态,在报价主表里换行后,,<已订购全选复选>框如何返回到没有选中的状态!
[此贴子已经被作者于2017/6/22 10:37:17编辑过]

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/6/22 10:59:00 [只看该作者]

Dim gx As WinForm.CheckBox = e.Form.Controls("勾选")

SystemReady = False

gx.Checked = False

SystemReady = True


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


加好友 发短信
等级:八尾狐 帖子:1837 积分:12990 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2017/6/22 11:09:00 [只看该作者]

写到那个事件中

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/6/22 11:31:00 [只看该作者]

 CurrentChanged事件。


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


加好友 发短信
等级:八尾狐 帖子:1837 积分:12990 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2017/6/22 14:17:00 [只看该作者]

将代码

Dim gx As WinForm.CheckBox = e.Form.Controls("勾选")

SystemReady = False

gx.Checked = False

SystemReady = True

写入报价明细表的currentChanged事件

 

提示未将对象引用设置到对象的实例?

[此贴子已经被作者于2017/6/22 14:19:28编辑过]

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/6/22 15:33:00 [只看该作者]

不可能报错,上传具体项目测试。

 回到顶部
总数 20 上一页 1 2