以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  [求助]所用表切换后光标定位到最后一行  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=185846)

--  作者：miaoqingqing --  发布时间：2023/3/21 9:17:00 --  [求助]所用表切换后光标定位到最后一行 下面代码只能是1个表，如果要全部项目的所有表切换后光标都到最后一行，下面代码怎么修改？ 求助 If  MainTable.Name = "知识库"  Then  \'如果选择的主表是订单表     With Tables("知识库")         If .Current IsNot Nothing AndAlso .Current.DataRow.RowState = DataRowState.Unchanged Then \'如果当前行未曾修改             .Position = .Rows.Count - 1         End If     End With      End  If

--  作者：cd_tdh --  发布时间：2023/3/21 9:25:00 --   代码写到项目事件 [此贴子已经被作者于2023/3/21 9:34:39编辑过]

--  作者：有点蓝 --  发布时间：2023/3/21 9:31:00 --       With MainTable         If .Current IsNot Nothing AndAlso .Current.DataRow.RowState = DataRowState.Unchanged Then \'如果当前行未曾修改             .Position = .Rows.Count - 1         End If     End With