or

Imports Telerik.WinControls.UIPublic Class frmMain Inherits RadForm Private Sub frmMain_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load RadDropDownList1.AutoCompleteMode = AutoCompleteMode.SuggestAppend RadDropDownList1.Text = String.Empty RadDropDownList1.DataSource = GetPeople() RadDropDownList1.DisplayMember = "Name" RadDropDownList1.ValueMember = "Name" End Sub Private Function GetPeople() As List(Of Person) Dim oPeople As New List(Of Person) oPeople.Add(New Person("Dean")) oPeople.Add(New Person("Ryan")) oPeople.Add(New Person("Richard")) oPeople.Add(New Person("Duncan")) oPeople.Add(New Person("Peter")) oPeople.Add(New Person("Tony")) oPeople.Add(New Person("Jaco")) oPeople.Add(New Person("Marc")) oPeople.Add(New Person("Lucy")) oPeople.Add(New Person("Mike")) Return oPeople End FunctionEnd ClassPublic Class Person Public Property Name As String Public Sub New(ByVal sName As String) Name = sName End SubEnd Class