请问如何同时实现这样的效果

dingliang　发表于：2010-05-14 01:39:36 　

复制

我设计了一个窗口用来对数据进行查询与修改。

我想实现两个效果：

1.记录修改的日期与时间

2.在保存修改前提示我是否保存修改，否则就不保存修改。

参考了论坛上的讨论，我分别做了一个LAST MODIFIED的宏用来实现效果1，用“事件过程”中的代码实现了效果2。但是好像这两个效果都需要添加在属性表-窗体-事件-更新前之中，但是这两个都是不同类型的东西，我在操作中好像只能选择一个。

请教各位老师我该怎样同时实现这两个效果。

Top

煮江品茶发表于：2010-05-14 07:01:57

第一个效果的描述只有主语，你的谓语和宾语是什么来着？

Top

jia 发表于：2010-05-14 07:27:13

给你发一个我用的保存提示。

Private Sub Form_BeforeUpdate(Cancel As Integer)
Dim q As Integer
q = MsgBox("是否保存当前记录", vbOKCancel, "保存当前记录")
If q <> 1 Then
Me.Undo
End If
    If IsNull(Me.楼号) = True Then
        MsgBox "楼号不能为空！请输入新增的楼号。", , "规范操作提示"
        Cancel = True
        Me.楼号.SetFocus
    ElseIf IsNull(Me.门牌号) = True Then
        MsgBox "门牌号不能为空！请输入输入门牌号。", , "规范操作提示"
        Cancel = True
        Me.门牌号.SetFocus
    End If
End Sub

问题1：不知你是在本表内保存修改记录，还是将修改记录另保存？

Top

dingliang 发表于：2010-05-14 21:31:19

我是在我的表中添加了两个字段，一个用来保存修改日期，另一个用来保存修改时间。修改的日期与时间都保存在我的同一张数据表内。

Top

jia 发表于：2010-05-15 08:24:11

制作了一个例子，不知是否是你所需要的，

点击下载此附件

Top

总记录：4篇页次：1/1 9 1 :

Access交流中心

请问如何同时实现这样的效果