Click 事件

expandtri全部显示

当用户在一个对象上按下然后释放鼠标按钮时,Click 事件发生。

Private Sub object_Change()

Object    窗体或控件的名称。

说明

?Click 事件只适用于窗体、窗体和窗体上的控件,不适用于报表中的控件。
?该事件不适用于选项组中的复选框选项按钮切换按钮。它只适用于选项组本身。
?该事件不适用于附加在另一个控件上的标签,如文本框的标签。它只适用于“独立”的标签。单击附属标签和单击标签所附的控件有相同的效果。控件的正常事件将发生,而附属标签的任何事件都不会发生。
?Click 事件适用于包含超链接的控件

若要在该事件发生时执行一个事件过程,请将 OnClick 属性设置为宏的名称或 [事件过程]。

在窗体上,当用户单击窗体上的空白区域或记录选定器时,该事件发生。

对于控件,用户执行以下操作时发生该事件:

?用鼠标左键单击控件。用右边或中间的鼠标键单击控件不会触发该事件。

 

?用鼠标左键单击包含超链接数据的控件。用右边或中间的鼠标键单击控件不会触发该事件。当用户将鼠标指针移动到包含超链接数据的控件上时,鼠标指针将变成“手型”图标。当用户单击鼠标键时,超链接将被激活,然后 Click 事件发生。

 

?若要在组合框列表框中选择一项,可以按箭头键后再按 Enter,也可以单击鼠标键。

 

?当命令按钮、复选框、选项按钮或切换按钮具有焦点时按空格键。

 

?Default 属性设为“是”的命令按钮所在的窗体上按 Enter。

 

?Cancel 属性设为“是”的命令按钮所在的窗体上按 Esc。

 

?按一个控件的访问键。例如,如果某个命令按钮的 Caption 属性设为 &Go,则按 Alt+G 即可触发该事件。

通常将一个 Click 事件过程附加到命令按钮上,以便执行某些命令和类似命令的操作。对其他适用的控件,可使用这个事件来触发操作以响应本主题前面所讨论的情况之一。

仅对命令按钮而言,当用户使用 Enter 键或访问键来选择命令按钮时,Microsoft Access 将运行 OnClick 属性指定的宏或事件过程。宏或事件过程只运行一次。如果想让宏或事件过程在按下命令按钮时重复执行,可将 AutoRepeat 属性设为“是”。对其他类型的控件而言,必须使用鼠标键单击控件来触发 Click 事件。

命令按钮的 Click 事件在选择命令按钮时发生。另外,如果命令按钮在选择它时还没有获得焦点,则命令按钮的 EnterGotFocus 事件将在 Click 事件之前发生。

双击控件将引起 DblClick 和 Click 事件同时发生。对命令按钮而言,双击鼠标键将以如下顺序触发下列事件:

MouseDown → MouseUp → Click → DblClick → Click

可以在 DblClick 宏中使用 CancelEvent 操作来取消第二个 Click 事件。有关详细信息,请参阅“DblClick 事件”主题。

选项组的 Click 事件将在单击控件更改选项组中某一控件值之后发生。例如,如果单击选项组中的切换按钮、选项按钮或复选框,则选项组的 Click 事件将在 BeforeUpdateAfterUpdate 事件之后发生。

blueup提示

MouseDownMouseUp

示例

在下面的示例中,Click 事件过程附加到 ReadOnly 复选框。该事件过程设置窗体上另一控件(“Amount”文本框)的 Enabled 和 Locked 属性。单击该复选框时,事件过程会检查是选中还是清除了该复选框,然后将文本框的属性相应地设为启用或禁用编辑。

若要尝试该示例,请将下面的事件过程添加到一个包含复选框(名为“ReadOnly”)和文本框(名为“Amount”)的窗体。

Private Sub ReadOnly_Click()

    With Me!Amount

        If Me!ReadOnly = True Then        ' If checked.

            .Enabled = False                ' Disable editing.

            .Locked = True

        Else                                    ' If cleared.

            .Enabled = True                ' Enable editing.

            .Locked = False

        End If

    End With

End Sub