- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [讨论]在筛选的情况下赋值不起作用 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=152644)
-- 发布时间：2020/7/17 10:07:00
-- [讨论]在筛选的情况下赋值不起作用
Tables("窗口1_Table1")动态绑定表A
表A_CurrentChanged
Forms("窗口1").Controls("TextBox1").Text = Tables("窗口1_Table1").Current("第五列")
当Tables("窗口1_Table1")在筛选的情况下，TextBox1赋值不起作用
-- 发布时间：2020/7/17 10:26:00
--
到窗口表的CurrentChanged写代码
if e.table.current isnot nothing then
Forms("窗口1").Controls("TextBox1").Text = e.table.current("第五列")
end if
-- 发布时间：2020/7/17 10:36:00
--
还是不能赋值
表事件
表A_CurrentChanged
\'Forms("窗口1").Controls("TextBox1").Text
= Tables("窗口1_Table1").Current.DataRow("第五列") ‘不用
窗口表事件
窗口1_Table1_CurrentChanged
If e.Table.current IsNot Nothing Then
Forms("窗口1").Controls("TextBox1").Text = e.Table.current("第五列")
End If
窗口与控件事件
窗口1_AfterLoad
Tables("窗口1_Table1").DataSource
= DataTables("表A") ’动态绑定
Tables("窗口1_Table1").SetColVisibleWidth("第一列|100")
-- 发布时间：2020/7/17 10:42:00
--
我试了一下，如果Tables("窗口1_Table1")是绑定表A的副本，不是动态绑定，筛选后也是不能赋值的，只能取消筛选，才能赋值
-- 发布时间：2020/7/17 10:55:00
--
请上传实例说明
-- 发布时间：2020/7/17 11:18:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:不能赋值.zip |
-- 发布时间：2020/7/17 11:29:00
--
测试没有问题，有什么问题？
筛选后剩下的行就是原表的7~10行，这几行本来第五列就没有值，控件怎么会有值？！到底要做什么功能？
-- 发布时间：2020/7/17 11:36:00
--
明白了，谢谢老题！问题解决了！