ActiveX Control Events

ActiveX controls have events defined for them such as an onClick event. Below is an example of how to script the trapping of such an event in VBScript.

Sub Label3D_onClick
	If Label3D.Angle > 360 Then
		Label3D.Angle = Label3D.Angle - ( 360 * Int ( Label3D.Angle / 360 ) )
	ElseIf Label3D.Angle < -360 Then
		Label3D.Angle = -1 * ( Abs ( Label3D.Angle ) - ( 360 * Int ( Abs ( Label3D.Angle ) / 360 ) ) )
	End If		
End Sub

Other events such as onMouseOver, onMouseOut and onMouseMove are events common to many visual ActiveX controls.