Public Sub Initialize (vCallback As Object, vEventName As String)
lv.Initialize("lv")
mEventName = vEventName
mCallback = vCallback
et.Initialize("et")
Dim cd As ColorDrawable
cd.Initialize2(Colors.ARGB(180,255,255,255),5dip,2dip,Colors.RGB(233,233,233))
et.Background = cd
et.Hint = "Cerca il luogo di stage"
et.HintColor = Colors.Gray
et.SingleLine = True
'Remove the suggestions bar
'lv.Initialize("lv")
et.InputType = Bit.Or(et.INPUT_TYPE_TEXT, 0x00080000)
.......................
.............
...