B4J Question Help. When I click on a combobox I want to run a subroutine

Private Sub B4XPage_Created (Root1 As B4XView)
    Root = Root1
    Root.LoadLayout("MainPage")
    B4XComboBox1.SetItems(Array("aaa", "bbb", "Ccc"))
    Dim r As Reflector 'reflection library
    r.Target = B4XComboBox1.mBase
    r.AddEventFilter("et", "javafx.scene.input.MouseEvent.MOUSE_PRESSED")
End Sub

Private Sub et_Filter(e As Event)
    Log("clicked")
End Sub

Private Sub B4XComboBox1_SelectedIndexChanged (Index As Int)
    Log(B4XComboBox1.GetItem(Index))
End Sub