How to find an item in a WinForms ComboBox (ComboBoxAdv) using its ValueMember?

public int FindTextByValue(object Value)
{
   int i = -1;
   if (this.DataSource != null)
   {
      string val = Value.ToString();
      IList collection = (IList)this.DataSource;
      foreach (object o in collection)
      {
          Type t = o.GetType();
           if (t != null)
           {
               PropertyInfo propertyInfo = t.GetProperty(this.ValueMember);
               i++;
               if (propertyInfo.GetValue(o, null).ToString() == val)
               {
                    break;
               }
           }
      }
   }
   return i;
}

Public Function FindTextByValue(ByVal Value As Object) As Integer
   Dim i As Integer = -1
   If Me.DataSource IsNot Nothing Then
        Dim val As String = Value.ToString()
        Dim collection As IList = CType(Me.DataSource, IList)
        For Each o As Object In collection
  Dim t As Type = o.GetType()
    If t IsNot Nothing Then
         Dim propertyInfo As PropertyInfo = t.GetProperty(Me.ValueMember)
         i += 1
         If propertyInfo.GetValue(o, Nothing).ToString() = val Then
  Exit For
         End If
    End If
               Next o
   End If
   Return i
End Function