Office中国论坛/Access中国论坛

标题: 在表中如何设置才能在输入新记录时自动出现一条和上一条一样的记录? [打印本页]

作者: zpw001 时间: 2009-2-13 10:46
标题: 在表中如何设置才能在输入新记录时自动出现一条和上一条一样的记录?
请问各位大侠:如何设置表才能在输入新记录时自动出现一条和上个记录一样的数据?

作者: Grant 时间: 2009-2-13 11:07
DFirst、DLast 函数
参阅应用于示例特性只需要字段中的任意一个值时，可以使用 DFirst 和 DLast 函数，从表或查询的特定字段中返回一个随机记录。可以在 Visual Basic、宏、模块、查询表达式或窗体或报表上的计算控件中使用 DFirst 和 DLast 函数。

DFirst(expr, domain, [criteria])
DLast(expr, domain, [criteria])
DFirst 和 DLast 函数具有下列参数：

参数说明
expr 一个表达式，用于标识从中查找第一个或最后一个值的字段。可以是一个用来标识表或查询中字段的字符串表达式，也可以是以该字段中的数据进行计算的表达式。在 expr 中，可以包括表中字段的名称、窗体上的控件、常量或函数。如果 expr 包括函数，它既可以是内置的，也可以是用户定义的，但不能是另一个域聚合函数或 SQL 聚合函数。
domain 字符串表达式，代表组成域的记录集。
criteria 可选的字符串表达式，用于限制 DFirst 或 DLast 函数执行的数据范围。例如，criteria 通常等价于 SQL 表达式中的 WHERE 子句，只是不含 WHERE 关键字。如果忽略 criteria，DFirst 和 DLast 函数将在整个域范围内计算 expr。任何包含在 criteria 中的字段必须同时也是 domain 中的字段，否则 DFirst 和 Dlast 函数将返回 Null。

说明

注释如果要返回记录集（一个域）中的第一条或最后一条记录，应该创建一个按升序或降序排序的查询，并将 TopValues 属性设为 1。有关详细信息，请参阅 TopValues 属性主题。也可以从 Visual Basic 中创建 ADO Recordset 对象，并使用 MoveFirst 或 MoveLast 方法来返回记录集内的第一条或最后一条记录。

看看帮助你会有收获

作者: ACMAIN_CHM 时间: 2009-2-13 16:42
http://www.accessbbs.cn/bbs/redi ... 9783&ptid=18415

在表中是无法实现的。ACCESS表上没有触发器，没办法响应事件。但在窗体上你或许可以试试上面这个贴子的方法。

******************
* 一切皆有可能 *
******************
.
同一贴子不回复第二次
.
QQ群 48866293 / 12035577 / 7440532 / 13666209
http://forum.csdn.net/BList/OtherDatabase .
http://www.accessbbs.cn/bbs/index.php .
http://www.accessoft.com/bbs/index.asp .
http://www.access-programmers.co.uk/forums .
http://www.office-cn.net .
.
http://www.office-cn.net/home/space.php?uid=141646 .

作者: wu8313 时间: 2009-2-13 19:24
本帖最后由 wu8313 于 2009-2-13 20:14 编辑

可以在窗体中控件上面使用 oldvalue 属性。

OldValue 属性
参阅应用于示例特性使用 OldValue 属性可以确定绑定控件中未编辑的值。Variant 型，只读。
--------------------------------------------------------
参见附件。子窗体是用来查看输入数据后效果

作者: Henry D. Sy 时间: 2009-2-13 20:07
使用 RecordsetClone 属性

作者: changweiren 时间: 2009-2-13 20:59
得益匪浅

作者: chaojianan 时间: 2009-2-13 22:05
学习学习了.

作者: zpw001 时间: 2009-2-20 11:00
谢谢各位大侠的高论

作者: msyangyi 时间: 2014-5-27 13:19
看看学习

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)