This event is triggered when a key or control key is about to be sent to the host. ControlKeySending allows you to modify a control key value or to cancel a send control key action before it is sent.
These two events capture and print the keys and controlkeycode that were entered.
'To run this example, copy it to the ThisScreen code window
Public SentKeys As String
Private Function Screen_ControlKeySending(ByVal sender As Variant, Key As Attachmate_Reflection_Objects_Emulation_OpenSystems.ControlKeyCode) As Boolean
'Print the keys that are sent and the control key
Debug.Print SentKeys & " <Key: " & Key & ">"
Screen_ControlKeySending = True
'Clear the SentKeys buffer
SentKeys = ""
End Function
Private Sub Screen_KeysSent(ByVal sender As Variant, ByVal Keys As String)
'Add the sent keys to the buffer
SentKeys = SentKeys & Keys
End Sub