Search into WebListbox

I need example for search into weblistbox, me code for Deskop is:

if len(txtPosteo1.Text)=0 then
ListApuesta.listindex=-1
else
dim value As String = txtPosteo1.Text
Dim I As Integer
dim FoundAt As Integer = -1
FoundAt = -1
for i = 0 to (ListApuesta.ListCount - 1)
if instr(ListApuesta.cell(i,ListApuesta.SortedColumn),value) > 0 then
FoundAt = i
MsgBox (“Encontrado …”)
exit
end
next
if FoundAt >= 0 then
ListApuesta.ListIndex = FoundAt
MsgBox (“Se encontro” + FoundAt)

else
  ListApuesta.listindex=-1
end if

end if
txtPosteo1 = “”

But, not work in Web

Fernando, this code should work in both your desktop and web app:

Dim value As String = txtPosteo1.Text Dim i, j As Integer Dim FoundAt As Integer = -1 if value <> "" then i = 0 while (i <= ListApuesta.LastIndex) and (FoundAt < 0) j = 0 while (j < ListApuesta.ColumnCount) and (FoundAt < 0) if InStr(0, ListApuesta.Cell(i, j), value) > 0 then FoundAt = i end if j = j + 1 wend i = i + 1 wend end if ListApuesta.ListIndex = FoundAt txtPosteo1.Text = ""

The record in the weblistbox is in fact found but the weblistbox does not highlight the row when the listindex value is set.