GefObjectEvent.SetKey (method)

Changes the key associated with this event.
Syntax: object.SetKey Key, KeyModFlags
Key As long -
Optional KeyModFlags As long -
Description: The KeyModFlags parameter will the values of GefKeyModifierFlags logically OR'd together. Make sure that each enum only gets used once.


Sub GefObjectEvent_SetKey()
    Dim oCimObj As GefObject
    Dim oCimObjEvnts As GefObjectEvents
    Dim oCimObjEvnt As GefObjectEvent
    Set oCimObj = CimGetObject
    Set oCimObjEvnts = oCimObj.Events
    Set oCimObjEvnt = oCimObjEvnts.Item(0)
    oCimObjEvnt.SetKey 65, gefModAlt + gefModControl + gefModShift
End Sub