复制记录

Question

我是编程新手，但我正在为我使用VBA for Microsoft Access 2016和宏工作的公司开发一个新的客户端数据库。

在这个系统中，有一组表单作为我们单独的笔记/待办事项列表，有时我们复制一条记录以保存多次手动输入相同的数据。 在每个表单上有两个日期/时间字段，它们自动输入当前日期和时间，一个仅显示日期，另一个仅显示时间。

目前，要使用预先编程的宏＆＃39;重复记录来复制记录。命令按钮向导中的函数。这会创建记录的副本，包括日期和时间。我想要做的是能够点击该按钮，并让它复制记录，同时自动更新日期和时间字段到当前系统时间。

预编程宏在On Click事件中如下：

OnError
    Go to Next
  Macro Name
RunMenuCommand
    Command SelectRecord

If [MacroError]=0 Then
  RunMenuCommand
    Command Copy
End If

If [MacroError]=0 Then
  RunMenuCommand
    Command RecordsGoToNew
End If

If [MacroError]=0 Then
  RunMenuCommand
    Command SelectRecord
End If

If [MacroError]=0 Then
  RunMenuCommand
    Command Paste
End If

If [MacroError]<>0 Then
  MessageBox
    Message =[MacroError].[Description]
    Beep Yes
    Type None
    Title
End If

我可以添加到此宏中以使日期和时间字段在复制记录时自动更新，还是应该使用VBA进行此过程？

如果您需要更多信息，请询问。

Answer 1

不确定您在此应用程序的设计中的位置，以便您可以更改表属性/设计。如果是，则设置一个日期/时间字段，并将其默认属性设置为：= Now（）

我相信即使在已经有日期/时间价值的另一条记录的副本中也会输入当前日期/时间。

然后，如果人们想要日期＆amp;的显示时间分开;只需使用未绑定的文本框设置为使用LEFT（）或RIGHT（）方法拆分信息的外观。

这种方式更容易管理。