- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助] currentchanged 事件 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=191756)
-- 发布时间：2024/5/8 9:14:00
-- [求助] currentchanged 事件
老师，下面的代码是不是对筛选后的当前行没用？筛选前可以，筛选后就不执行了。
If e.Table.Current
Is Nothing Then \'如果Current为Nothing
Return
\'则返回
End
If
Dim wz As
Integer
Dim dr As
DataRow
dr = DataTables("客户").Find("[客户ID] = \'" & e.Table.Current("客户ID") &
"\'")
If dr IsNot Nothing
Then
wz = Tables("客户").FindRow(dr)
If wz
>= 0
Then
Tables("客户").Position = wz
End
If
End
If
-- 发布时间：2024/5/8 9:21:00
--
如果"客户"做了筛选，不显示这个客户ID的数据，当然是无效的。因为数据都没有，怎么定位呢！
-- 发布时间：2024/5/8 9:34:00
--
老师，这个筛选前后格式一样啊
此主题相关图片如下：{7eb76961-0b10-45c8-b28f-47b0376fc86e}.png
-- 发布时间：2024/5/8 9:36:00
--
没看懂，请再详细举例说明一下什么地方有问题
-- 发布时间：2024/5/8 9:45:00
--
搞错了，不行
[此贴子已经被作者于2024/5/8 9:55:27编辑过]
-- 发布时间：2024/5/8 9:52:00
--
请上传实例说明
-- 发布时间：2024/5/8 10:16:00
--
老师，上面的窗口表，在筛选前那段代码是执行的，就是点击一行与该行绑定的控件信息都会更新该行的数据，
但是筛选后点击表里各行，与之绑定的控件数据就么有变化了。
-- 发布时间：2024/5/8 10:30:00
--
原因看2楼