- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 单选框设置好默认选择，但未生效 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=49516)
-- 发布时间：2014/4/19 10:08:00
-- 单选框设置好默认选择，但未生效
各位高手，
请教单选框筛选的一个问题
1. 单选框“第一列不为空”的属性“选中”设置为“True”
2. 单选框“第一列不为空" 的Click”设置了相应筛选代码
3. 当打开项目，运行筛选窗口时，“第一列不为空”的代码没有运行，表没有被筛选。
此主题相关图片如下：snip20140419_2.png
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:问题案例.foxdb |
-- 发布时间：2014/4/19 10:12:00
--
上个例子看看,并且说清楚你的实现什么效果.
-- 发布时间：2014/4/19 10:39:00
--
1. “本月负责”的属性“选中”设置为“True”
2. “本月负责”的事件“Click”设置了相应筛选代码
3. 当打开“月计划-筛选”窗口时，“本月负责”的代码没有运行，表没有被筛选。
-- 发布时间：2014/4/19 10:40:00
--
未看到附件
上传图片和文件参考这里http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=78 请尽量使用IE,谷歌,火狐等主流浏览器上传. 使用谷歌浏览器必须要先输入一个以上的字符 上传后需要等文件代码出现才算成功! |
-- 发布时间：2014/4/19 22:57:00
--
Bin，你好，
抱歉，今天一直在路上，没法上网。附件已上传。参考1楼
-- 发布时间：2014/4/20 7:59:00
--
逻辑关系没弄明白：
第一个单选框，默认是选中，那么打开窗口，值就是没变化，就不会触发CheckedChanged
有两个方案可以解决：
一、
默认选中，窗口AfterLoad事件：
Tables("表A").Filter = "[第一列] IS NOT NULL"
二、
默认不选，窗口AfterLoad事件：
e.Form.Controls("RadioButton1").Checked = True
-- 发布时间：2014/4/20 8:57:00
--
多谢LSY，我倾向于第二种方案。
另外，还有一个问题：
同步表之后，筛选便失效，所有数据都出来了。
我的想法是在Tables.Load后紧跟e.Form.Controls("RadioButton1").Checked = True，
不知道有没有更好的方式？非常感谢
-- 发布时间：2014/4/20 9:05:00
--
多谢LSY，我倾向于第二种方案。
另外，还有一个问题：
同步表之后，筛选便失效，所有数据都出来了。
我的想法是在Tables.Load后紧跟e.Form.Controls("RadioButton1").Checked = True，
不知道有没有更好的方式？非常感谢
在 表属性->afterload 加入代码
If Forms("xxx").Opened Then
Tables("yyy").Filter = "本月负责 = " & (Forms("xxx").Controls("RadioButton1").Checked = True)
End If
-- 发布时间：2014/4/20 9:07:00
--
更好的方法是：
1、用一个变量存储 temp = Tables("yyy").filter
2、加载完以后，重新设置 Tables("yyy").filter = temp
-- 发布时间：2014/4/20 9:33:00
--
多谢大家，继续完善系统去了