如何比较子窗体不同记录的值?

gokong · 发表于 2006-1-4 21:55:00

本人设计的动物档案输入系统,在"变动栏舍输入系统2"窗体中输入动物变化情况.有变化的就输入,无变化就不输.为了方便其它人员输入记录,需要设定一些限制.比如新输入的"变动时间"不可以晚于以往的"变动时间",否则就给予提示并不能保存记录.请大家帮帮忙,非常感谢!

一点通 · 发表于 2006-1-4 22:48:00

gokong · 发表于 2006-1-5 17:50:00

非常感谢.版主给的解决方法非常好.只是将"变动时间_AfterUpdate()"代码中dlookup条件改成""[动物明细ID]=" & 动物明细ID"即可.小弟还有一个问题,当时间输错后,如何让"变动时间"空白栏重新处于点击的状态(或者是获得焦点)?

我在"变动时间_AfterUpdate()"中end if前加上"Me.变动时间.SetFocus"好像也没作用,后又加入如下代码,也不起作用:

Private Sub 变动时间_LostFocus()
If IsNull(Me.[变动时间]) Then
Me.变动时间.SetFocus
End If
End Sub

谢谢.

fuyvn · 发表于 2006-1-5 18:09:00

在 "变动时间_AfterUpdate()"

中. 比较后如不正确时的代码的最后面加上

DoCmd.CancelEvent

即可.

gokong · 发表于 2006-1-6 00:12:00

此外,当我打开"变动栏舍输入系统2"输入时,我发现当我在第一个记录黄猩猩保罗处输入时,当我输入时间为"2005-12-25"时,它却不会弹出对话框,当输入2004-1-1时却会弹出,这是为什么?

此外,加上"docmd.cancelevent"j时焦点还是不能回到"变动时间"中.

一点通 · 发表于 2006-1-6 00:56:00

奇，为何在我的机上测试可以呢，修改了一下，请重试

[此贴子已经被作者于2006-1-5 17:14:39编辑过]

gokong · 发表于 2006-1-6 17:45:00

现在是可以,多谢.此外,当我打开"变动栏舍输入系统2"输入时,我发现当我在第一个记录黄猩猩保罗处输入时,当我输入时间为"2005-12-25"时,它却不会弹出对话框,当输入2004-1-1时却会弹出,这是为什么?

我用的是ACCESS2000,winxp.

一点通 · 发表于 2006-1-6 18:11:00

可能是你表达不清，也可能是我理解不好，你要的结果是：

现输入时间 > 旧时间发出提示，并不能更改？

如果这样你可以将 < 号变改一下就可以了

gokong · 发表于 2006-1-7 00:44:00

我要的结果是新输入的时间不可以小于以往所有有记录时间,但当我打开"变动栏舍输入系统2"输入时,我发现当我在第一个记录黄猩猩保罗处输入时,当我输入时间为"2005-12-25"时,它虽然大于它上面的记录时间,但却小于以往最大的时间2006-1-1,输入时不会弹出对话框,这是为什么?非常感谢.

一点通 · 发表于 2006-1-7 00:52:00

8楼不是给你修改的方法吗?难道还要上传修改后的例子?

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[窗体] 如何比较子窗体不同记录的值?

本帖子中包含更多资源

本帖子中包含更多资源

本帖子中包含更多资源

有时候不行

本帖子中包含更多资源

本帖子中包含更多资源

群介绍
主题无相 (随机显示版	同地区群块其他地区)