Sets or returns the value of the On Click box in the Properties window of one of the objects in the Applies To list. Read/write String.
expression.OnClick
expression Required. An expression that returns one of the objects in the Applies To list.
The Click event occurs when a user presses and releases the left mouse button over an object.
The OnClick value will be one of the following, depending on the selection chosen in the Choose Builder window (accessed by clicking the Build button next to the On Click box in the object's Properties window):
If the On Click box is blank, the property value is an empty string.
The following example associates the Click event with the "OK_Click" event procedure for the button named "OK" on the "Order Entry" form, if there is currently no association.
With Forms("Order Entry").Controls("OK")
If .OnClick = "" Then
.OnClick = "[Event Procedure]"
End If End With