Cool! That worked great. Do you know how to do it for a list box too. Here is what I have, but it didn't work.

'Loading rates
Set m_oRecord = m_oConnect.GetRate

'As long as we have something...
cbStartRate.Text = Format(cbStartRate.Text, "0.000")
While Not m_oRecord.EOF
cbStartRate.AddItem m_oRecord.Fields(0).Value
m_oRecord.MoveNext
Wend