This event is triggered immediately after Reflection transmits a character, or string of characters, to the host.
private Sub Screen_KeysSent (
ByVal As Object, _
ByVal As String _
)
Parameters
- sender
- The Screen object.
- keys
- The character or string that was just sent to the host.
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
