以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 如何让选择行自动到屏幕中间去呢。 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=159000) |
-- 作者:81538475 -- 发布时间:2020/12/9 22:41:00 -- 如何让选择行自动到屏幕中间去呢。 是否能够每次再选择行之后,自动滚动,让这一行再屏幕中间。 |
-- 作者:有点蓝 -- 发布时间:2020/12/10 8:47:00 -- 表格click事件 If e.Table.rows.Count > 0 Then Dim y As Integer = e.Table.Position - (e.Table.BottomVisibleRow - e.Table.TopVisibleRow) / 2 e.Table.TopVisibleRow = y+1 End If |
-- 作者:81538475 -- 发布时间:2020/12/10 9:20:00 -- 如果不是点击,如果是指定的某一行放到中间有可能吗,比如把 第15行显示再中间。15行的下面还有很多。 |
-- 作者:有点蓝 -- 发布时间:2020/12/10 9:34:00 -- Dim y As Integer = 15 - (Tables("表A").BottomVisibleRow - Tables("表A").TopVisibleRow) / 2 Tables("表A").TopVisibleRow = y+1
|