以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  列跳转求助  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=196259)
--  作者：cxmxjwlmq
--  发布时间：2025/4/13 13:53:00
--  列跳转求助
各位老师：在表DataColChanged中，写入如下代码，希望离合单价列后，不管有没有变化，焦点都自动跳转到第12列，但现在数值有变化后焦点可以跳转，没有变化跳转不了！
   If e.DataCol.Name = "单价"  Then 
      \'Messagebox.show("单价  发生变化!")
      If e.NewValue = e.OldValue Then \'如果新值等旧值
         e.DataRow("折后单价") = e.DataRow("折后单价1")
          Tables("销售出库单_Table1").Select(Tables("销售出库单_Table1").RowSel,12) \'定位到当前行到备注列
      Else
         e.DataRow("折后单价") = e.DataRow("折后单价1")
         e.DataRow("修改前单价") = e.OldValue
         e.DataRow("修改单价人员") = _UsersName & " " & Date.Now 
         Tables("销售出库单_Table1").Select(Tables("销售出库单_Table1").RowSel,12) \'定位到当前行的到备注列
      End If
   End If
或者离开单价列后跳到备注列的另外代码？
请各位老师费心！
--  作者：有点蓝
--  发布时间：2025/4/13 20:21:00
--  
DataColChanged肯定是数据发生变化才会触发的，永远都不可能新值等旧值

如果要离开单价列进行跳转，应该到AfterSelChange事件处理