[2005] Simple Combobox problem

[fatihpk]

I just want to add each combobox item into a Toolstrip ComboBox. The next sourcecode will not work:

    Private Sub CopyBoxItems()

        Me.ToolStripBox.Items.Clear()

        For i As Integer = 0 To FilterBox.Items.Count - 1

            Me.ToolStripBox.Items.Add(Me.FilterBox.Items.Item(i))

        Next

    End Sub

[Hack]

What error do you get?

[fatihpk]

The box is filled with

System.Data.Datarow etc.

I just can't loop through the Filter Box.

[jmcilhinney]

You're adding items directly from your FilterBox to the ToolStripBox. If your FilterBox is bound to a DataTable then each of those items is a DataRow, so it's no surprise that that's what you see in the ToolStripBox. If you only want to add the text of each item in the FilterBox to the TooStripBox then that's exactly what you have to do:

For Each item As Object In FilterBox.Items
    Me.ToolStripBox.Items.Add(FilterBox.GetItemText(item))
Next item

That said, if you have the FilterBox bound to a DataTable then, depending on the circumstances, it may be appropriate to simply bind the ToolStripBox to the same Datatable, e.g.

Dim bs As New BindingSource
 
bs.DataSource = FilterBox.DataSource
 
With Me.ToolStripBox.ComboBox
    .DisplayMember = FilterBox.DisplayMember
    .ValueMember = FilterBox.ValueMember
    .DataSource = bs
End With

By creating a different BindingSource you enable the two controls to be bound to the data from the same DataTable without having to have the same record selected at the same time.

[fatihpk]

Thanx jmcilhinney that workt grate