' Return the index in a ListControl given a value' Example:' Dim i As Integer = GetIndexFromText(ListBox1, "hellovalue")Function GetIndexFromValue(ByVal lst As ListControl, ByVal value As String) As _ Integer Return lst.Items.IndexOf(lst.Items.FindByValue(value))End Function

