0

我有一个带有子表单控件的表单。主表单中的字段已计算出默认值（1 为 =Date()，另一个为 DLast()）。人们应该能够更改这些字段，但在大多数情况下，默认值是正确的，因此用户可以直接跳到子表单。子表单与主表单中的记录相连，如果用户不触摸任何主表单控件，他们就无法将记录添加到子表单。他们被迫重新键入主要表单记录之一的默认值才能继续。

我的想法是将其添加到主表单模块中：

Private Sub Form_Open(Cancel As Integer)
    DoCmd.RunCommand acCmdSaveRecord
End Sub

它应该使用默认值创建一条记录，我应该添加一些内容来询问用户是否要在退出表单时保存或删除更改。但它不起作用。不创建记录，必须“触及”默认值才能创建记录。

PS更改它以Form_Load破坏表格

4

1 回答 1

0

使用代码将日期写入控件，而不是使用日期的默认值。只要控件绑定到字段，这将强制创建记录。

Private Sub Form_Current()
    If Me.NewRecord Then
        Me.ADate = Date
    End If
End Sub
于 2012-06-29T12:07:25.740 回答