Private Sub lv_ItemClick (Position As Int, Value As Object)
et.Text = Value
et.SelectionStart = et.Text.Length
ime.HideKeyboard
lv.Visible = False
If SubExists(mCallback, mEventName & "_ItemClick") Then
' Don't return the value CallSub2(mCallback, mEventName & "_ItemClick", Value)
' Return the index
CallSub2(mCallback, mEventName & "_ItemClick", Position)
End If
End Sub