主题：系统日期问题

老师，请问下，如果电脑系统日期时间有被人修改了，那么表A的A列会自动输入修改前的日期时间，B列会自动自动输入修改后的日期时间，C列会自动输入登入的用户用，这样的代码要怎么写，谢谢！

老师，我不是要弹出提示框，我是要自动输入时间，比如说现在是10：00点，员工这时把时间改为10:30分，那么A列就会自动输入10:00，B列会自动输入10:30，C列会自动输入用户登入名。

是的，老师，不好意思确实不会写，麻烦老师帮我写下，谢谢！

老师，这段代码能帮我改下吗?我不想要跳出提示框，只有在系统时间变更时，第一列和第二列会自动输入修改前和修改后的时间，变更完后就不会每隔多少秒在输入或跳出提示框，直到下一次系统时间变更时才会再次自动输入。 static pd As Date = Date.now Dim d As Date = Date.Now If pd > d Then '如果之前的时间大于之后的时间     msgbox("修改了")     msgbox(pd)     msgbox(d)     Dim nr = Tables("表a").addnew     nr("第一列") = pd     nr("第二列") = d End If pd = d