[求助]焦点单元格 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]焦点单元格

共有2016人关注过本帖树形打印复制链接主题：[求助]焦点单元格

有点甜

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2019/5/26 16:16:00 [显示全部帖子]

1、

Dim nr As Row = Tables("表A").AddNew
nr.Table.Select(nr.Index, nr.Table.Cols("第二列").index)

2、在新增行之前，重置当前行（或者某一行）

DataTables("表A").DataCols("第二列").RaiseDataColChanged(Tables("表A").Current.DataRow)

有点甜

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2019/5/27 11:49:00 [显示全部帖子]

以下是引用工匠在2019/5/27 11:15:00的发言：
谢谢甜老师,重置列可以达到效果。

焦点单元格功能代码放在增加行之后，系统直接闪退了，请老师再帮看看，怎么实现

谢谢！

做一个实例发上来测试。

有点甜

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2019/5/27 12:15:00 [显示全部帖子]

Dim nr As Row = Tables("表A").current
nr.Table.Select(nr.Index, nr.Table.Cols("第二列").index)
'nr.Table.TopVisibleRow = nr.Index

主题：[求助]焦点单元格