Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
　　Dim dt As DataTable = New DataTable
　　dt.Columns.Add("ID", GetType(System.Int32))
　　dt.Columns.Add("Items", GetType(System.String))
　　dt.Rows.Add(1, "Apple")
　　dt.Rows.Add(2, "Orange")
　　dt.Rows.Add(3, "Grape")
　　dt.Rows.Add(4, "Banana")
　　dt.Rows.Add(5, "Strawberry")
　　dt.Rows.Add(6, "Pineapple")
　　'dt.Rows.Add(7, "Scrollbar does not show although display text are exceeded Display Area!!!")
　　dt.Rows.Add(7, "Lemon")

　　C1MultiSelect1.BindingInfo.DataSource = dt
　　C1MultiSelect1.BindingInfo.DataMember = "Items"
　　C1MultiSelect1.BindingInfo.DisplayMemberPath = "Items"
　　C1MultiSelect1.TagWrap = True

　　UpdateDropDownSize()
End Sub

Private Sub Form1_Resize(sender As Object, e As EventArgs) Handles MyBase.Resize
　　UpdateDropDownSize()
End Sub

Private Sub UpdateDropDownSize()
　　Dim top As Integer = (C1MultiSelect1.Top + C1MultiSelect1.Height)
　　Dim height As Integer = (Me.ClientSize.Height - top)
　　C1MultiSelect1.DropDownHeight = height
End Sub

private void Form1_Load(object sender, EventArgs e)
{
　　DataTable dt = new DataTable();
　　dt.Columns.Add("ID", typeof(int));
　　dt.Columns.Add("Items", typeof(string));
　　dt.Rows.Add(1, "Apple");
　　dt.Rows.Add(2, "Orange");
　　dt.Rows.Add(3, "Grape");
　　dt.Rows.Add(4, "Banana");
　　dt.Rows.Add(5, "Strawberry");
　　dt.Rows.Add(6, "Pineapple");
　　dt.Rows.Add(7, "Scrollbar does not show although display text are exceeded Display Area!!!");

　　c1MultiSelect1.BindingInfo.DataSource = dt;
　　c1MultiSelect1.BindingInfo.DataMember = "Items";
　　c1MultiSelect1.BindingInfo.DisplayMemberPath = "Items";
　　c1MultiSelect1.TagWrap = true;

　　UpdateDropDownSize();
}

private void Form1_Resize(object sender, EventArgs e)
{
　　UpdateDropDownSize();
}

private void UpdateDropDownSize()
{
　　int top = c1MultiSelect1.Top + c1MultiSelect1.Height;
　　int height = this.ClientSize.Height - top;
　　c1MultiSelect1.DropDownHeight = height;
}