7,731
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
changechange 2004-05-08
- 打赏
- 举报
窗体有dirty属性
liufuzhonglin 2004-05-07
- 打赏
- 举报
pnhyh:
有更好的吗？
如果窗口中的计算字段变了，Form_BeforeUpdate不执行。
有更好的吗？
如果窗口中的计算字段变了，Form_BeforeUpdate不执行。
pnhyh 2004-05-07
- 打赏
- 举报
1、假设窗口上有两个字段：字段1、字段2
2、在窗口的更新前中选择“(事件过程)”，事件代码如：
Private Sub Form_BeforeUpdate(Cancel As Integer)
If (字段1.Value <> 字段1.OldValue) Or (字段2.Value <> 字段2.OldValue) Then
'执行记录被修改代码
MsgBox "记录被修改"
End If
End Sub
2、在窗口的更新前中选择“(事件过程)”，事件代码如：
Private Sub Form_BeforeUpdate(Cancel As Integer)
If (字段1.Value <> 字段1.OldValue) Or (字段2.Value <> 字段2.OldValue) Then
'执行记录被修改代码
MsgBox "记录被修改"
End If
End Sub
