Copy the data contents from a combo box to another combo

[yo250]

I have in my project a combo box(a) that in run time I must to copy to another combo box(b)

in the a combo box have items that are in the combo and also Itemdata to every item data
I succed to copy the items but not the Itemdata to every items

dim i as integer

For i = 0 To cboOperators(2).ListCount
newFrmStart(i).cboOperators(0).AddItem cboOperators(0).List(i)
newFrmStart(i).cboOperators(2).AddItem cboOperators(2).List(i)
Next i

Please advice how to copy thr itemdata in run time