以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 窗口中重新加载后焦点怎样仍然定位到原来的行 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=119769) |
-- 作者:zhaohj611718 -- 发布时间:2018/5/31 16:20:00 -- 窗口中重新加载后焦点怎样仍然定位到原来的行 窗口中重新加载后焦点怎样仍然定位到原来的行 |
-- 作者:有点甜 -- 发布时间:2018/5/31 16:24:00 -- Dim i As Integer = Tables("表A").Current("_Identify") \'重新加载 Dim idx As Integer = Tables("表A").FindRow("_Identify = " & i) If idx >= 0 Then Tables("表A").position = idx End If |
-- 作者:zhaohj611718 -- 发布时间:2018/5/31 16:39:00 -- 谢谢,很好用 |