The Arguments property, gives a NETObjectTemplate object, whose Item or Template properties can be used to access the event's argument using the x-script language. The AsString property gives a brief description including name, identifier and arguments of the event.

The following sample displays the number of arguments the event has:

Private Sub NETHost1_HostEvent(ByVal Ev As exontrol_NETHostCtl.INETHostEvent)
    With Ev
        Debug.Print .Arguments.Item("GetType().GetProperties().Length").AsString
    End With
End Sub

The following sample displays brief information about firing events:

Private Sub NETHost1_HostEvent(ByVal Ev As exontrol_NETHostCtl.INETHostEvent)
    With NETHost1
        Debug.Print Ev.AsString()
    End With
End Sub

The information you get shows as follows:

MouseMove[72] {Button = Left, Clicks = 0, X = 69, Y = 53, Delta = 0, Location = {X=69,Y=53}}
NodeMouseHover[15] {Node = TreeNode: Sub-Child 2.1}
Click[42] {Button = Left, Clicks = 1, X = 69, Y = 53, Delta = 0, Location = {X=69,Y=53}}
MouseClick[65] {Button = Left, Clicks = 1, X = 69, Y = 53, Delta = 0, Location = {X=69,Y=53}}
MouseUp[73] {Button = Left, Clicks = 1, X = 69, Y = 53, Delta = 0, Location = {X=69,Y=53}}
MouseMove[72] {Button = None, Clicks = 0, X = 69, Y = 54, Delta = 0, Location = {X=69,Y=54}}

Let's explain what data in the AsString representation means:

MouseMove[72] {Button = Left, Clicks = 0, X = 69, Y = 53, Delta = 0, Location = {X=69,Y=53}}

 Having this information about the event, we would know the following:

• Name property that specifies the name of the event, in this case is MouseMove
• ID property which specifies the identifier of the event, in this case 72.
• Arguments such as: Button, Clicks, X, Y, Delta, Location.X and Location.Y, ...

The following sample displays each argument of the MouseMove event:

Private Sub NETHost1_HostEvent(ByVal Ev As exontrol_NETHostCtl.INETHostEvent)
    With Ev
        If (.Name = "MouseMove") Then
            Debug.Print .Arguments.Item("Button").AsInt
            Debug.Print .Arguments.Item("Clicks").AsInt
            Debug.Print .Arguments.Item("X").AsInt
            Debug.Print .Arguments.Item("Y").AsInt
            Debug.Print .Arguments.Item("Delta").AsInt
            Debug.Print .Arguments.Item("Location.X").AsInt
            Debug.Print .Arguments.Item("Location.Y").AsInt
        End If
    End With
End Sub