以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 换行刷新行 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=189804) |
-- 作者:fangshen -- 发布时间:2023/12/27 11:08:00 -- 换行刷新行 有一个窗口A,窗口A中有一个表B。 希望实现:当鼠标从表B的a行更换到b行时,刷新a行 当鼠标从表B的c行更换到f行时,刷新c行 就类似换行前刷新当前行 不知道是否何以实现 谢谢 |
-- 作者:有点蓝 -- 发布时间:2023/12/27 11:11:00 -- AfterSelChange事件 If e.OldRange.RowSel <> e.NewRange.RowSel \'如果选择的是不同的行
If e.OldRange.RowSel >= 0 AndAlso e.OldRange.Rowsel < e.Table.Rows.Count Then \'而且原来选择的是一个有效的数据行 Dim r As Row = e.Table.Rows(e.OldRange.Rowsel) \'获得原来选择的行 r.load End If End If |
-- 作者:fangshen -- 发布时间:2023/12/27 11:39:00 -- 你好:我测试了一下,感觉是换行刷新表,不是刷新行。 谢谢
|
-- 作者:有点蓝 -- 发布时间:2023/12/27 11:40:00 -- 绝对不可能,2楼的代码不可能会刷新表。除非自己写了其它不合适的代码 |
-- 作者:fangshen -- 发布时间:2023/12/27 13:41:00 -- 谢谢,可以了,刚才在losd后面加了() |
-- 作者:有点蓝 -- 发布时间:2023/12/27 13:48:00 -- 加不加括号都没有什么问题。加括号也不会变成加载表 |