主题：记录修改用户名和时间代码求助

我在表属性AfterEdit事件中设置如下代码：
 

if e.col.name = "最后修改"

    e.Cancel = True

else

    e.row("最后修改") =Tables("登陆")(0)("用户名")& " " & now

end if

但是现在我是在录入窗口进行修改数据，怎么“最后修改”列不会记录，是否可以在修改窗口保存按钮中加代码，代码应怎么写。窗口保存代码如下：
Tables("产品目录").Current.Locked = True '锁定行
Forms("产品目录修改").Close() '关闭窗口
Ctype(ApplicationMenu.LeftItems("Save"), RibbonMenu.Button).PerformClick() '保存
DataTables("产品目录").AllowEdit = False

已解决：
1.在窗口AfterLoad事件设置代码：
With Forms("产品目录修改").Controls("最后修改")
        .Value = Tables("登陆")(0)("用户名")& " " & now
End With
2.在窗口绑定字段控件（最后修改）TextChanged事件设置代码：
e.Sender.WriteValue()
不知有没有更简单的方法。