时间戳

首页 > 解决方案 > 在加载时需要表单去记录 =Date()

ms-access-2013 - 在加载时需要表单去记录 =Date()

问题描述

我有一个标有“RouteCard_A”的表，主键为“ID”，然后我有一个名为“AMaidDate”的字段设置为日期/时间，格式为长日期，需要是，索引是（无重复）。我有一个标有“RouteCard_A_Form”的表格。

几周以来，我一直在尝试默认我的表单在加载时打开到“AMaidDate”与今天的日期匹配的记录 [=Date()]。

目前设置为：

Private Sub Form_Load()
 DoCmd.RunCommand acCmdRecordsGoToLast
End Sub

我尝试过使用 Dim 作为字符串、dim 作为日期、docmd.openreport 和 docmd.gotorecord 的组合，但没有成功（我可能用错了）

我在想我需要将 AMaidDate 设置为辅助主键和/或使 AMaidDate 与 ID 字段匹配，以便我可以使用类似的东西：

Private Sub Form_Load()
Dim stToday as date
Dim stOpenRec as string
stToday = date
stOpenRec = (I need a way to get the ID from the AMaidDate that matches today)

DoCmd.GoToRecord acDataForm, "AMaidDate", acGoTo, stOpenRec
End sub

请帮我完成这个。

谢谢

标签： ms-access-2013gotoform-load

解决方案

这应该有效：

Me!AMaidDate.SetFocus
DoCmd.FindRecord Date

推荐阅读