Dim swf As CheckBox = Sender
Dim Index As Int = clvdati.GetItemFromView(swf)
Dim item As CLVItem = clvdati.GetRawListItem(Index)
Dim pp As Panel=item.Panel.GetView(0).GetView(0)
Dim lbl4 As EditText = pp.GetView(0)
Dim checkb1 As CheckBox = pp.GetView(3)
Dim checkb2 As CheckBox = pp.GetView(4)
Dim checkb3 As CheckBox = pp.GetView(5)