OnCurrent 属性
内容
设置或返回窗体的“属性”窗口中“成为当前”框的值。String 型，可读写。
expression.OnCurrent
expression 必需。返回“应用于”列表中的一个对象的表达式。
说明
该属性有助于以编程方式更改事件被触发时 Microsoft Access 所采取的行动。例如，在各次事件调用之间可能要根据触发事件的环境更改表达式的参数，或从一个事件过程切换到一个表达式或宏。
当焦点移到一条记录上，使它成为当前记录，或当窗体刷新或重新查询时，Current 事件发生。
根据“选择生成器”窗口（在窗体或报表的“属性”窗口中单击“成为当前”框旁的“生成器”按钮即可打开该窗口）中所选内容，OnCurrent 的取值将为下列情况之一：
| ? | 如果选择了“表达式生成器”，则值将是“=expression”，其中，expression 是来自“表达式生成器”窗口的表达式。 |
| ? | 如果选择了“宏生成器”，则值是宏的名称。 |
| ? | 如果选择了“代码生成器”，则值是“[Event Procedure]”。 |
如果“成为当前”框为空，属性值就为空字符串。
示例
下面的示例将“订单输入”窗体的 Current 事件与宏“Current_Macro”相关联。
Forms("Order Entry").OnDeactivate = "Current_Macro"