Unusual binding problem with comboboxes and currency manager

I have an authors form that includes columns whose UI are comboboxes. On the form level I have

Dim cm As CurrencyManager

In the formload event handler I bind as follows:

cm = CType(BindingContext(DsAuthorsTwo1, "Authors"), CurrencyManager)
Here's what happened. The form would open to the first Author. The values for the columns represented by textboxes or in one case a checkbox were correct. The values for the columns represented by comboboxes were wrong. They were always the 0th selected index.

If I moved the cm.position forward then back to 0, then the values would be correct.

So I contrived the obvious at the bottom on the form_load event procedure:


MsgBox(cboContentRights.SelectedIndex.ToString) -> 0
cm.Position += 1
cm.Position -= 1
MsgBox(cboContentRights.SelectedIndex.ToString) -> 3 (correct)

There's got to be a more elegant way.

polynomial5d