or
private void SetupSpecialControls() { RadButtonElement buttonElement = new RadButtonElement("..."); buttonElement.Click += buttonElement_Click; RadTextBoxItem textBoxItem = Text_Update_BI_BatchNo.TextBoxElement.TextBoxItem; textBoxItem.Alignment = ContentAlignment.MiddleLeft; Text_Update_BI_BatchNo.TextBoxElement.Children.Remove(textBoxItem); DockLayoutPanel.SetDock(textBoxItem, Telerik.WinControls.Layouts.Dock.Left); DockLayoutPanel.SetDock(buttonElement, Telerik.WinControls.Layouts.Dock.Right); DockLayoutPanel dockLayoutPanel = new DockLayoutPanel(); dockLayoutPanel.Children.Add(buttonElement); dockLayoutPanel.Children.Add(textBoxItem); Text_Update_BI_BatchNo.TextBoxElement.Children.Add(dockLayoutPanel); }Public Class Form1 Private Sub Form1_Load() Handles Me.Load Dim x As New ItemModel RadDropDownList1.DataSource = x.ListItems RadDropDownList1.ValueMember = "ItemNumber" RadDropDownList1.AutoCompleteMode = AutoCompleteMode.SuggestAppend RadDropDownList1.AutoCompleteValueMember = "ItemNumber" End Sub Private Sub radDropDownList1_ItemDataBound(ByVal sender As Object, ByVal args As Telerik.WinControls.UI.ListItemDataBoundEventArgs) Handles RadDropDownList1.ItemDataBound Dim view As DataRowView = CType(args.NewItem.DataBoundItem, DataRowView) args.NewItem.Text = "<html><b>" & view("ItemNumber") & " • " & view("ItemName") & "</b><br/>" & view("Description") & "</html>" args.NewItem.Height = 40 End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click MessageBox.Show(RadDropDownList1.SelectedValue) End SubEnd Class