lang • last

LAST

LAST

Returns a reference to the object that raised the last event.

Examples

Dim hButton[3] As Button

hButton[0] = New Button(Me) As "MyButtons"
hButton[0].Text = "Red";

hButton[1] = New Button(Me) As "MyButtons"
hButton[1].Text = "Green"

hButton[2] = New Button(Me) As "MyButtons"
hButton[2].Text = "Blue"

...

Public Sub MyButtons_Click()

  Print Last.Text

End

See also