Hi! I am experiencing a very strange problem with my combobox. I am currently using the code
VB Code:
Dim rs As New ADODB.Recordset() cboObject.Items.Clear() rs.Open(strQuery, Cnn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic) If Not rs.EOF Then rs.MoveFirst() Do While Not rs.EOF cboObject.Items.Add(rs.Fields(0).Value) rs.MoveNext() Loop End If rs.Close()
Whenever I run the system, the combobox returns as blank. Here's the weird part, there is a long list of blank entries, if I chose the second one, it will suddenly appear in my combobox. It is like they are invisible or something. The second weird part is after a few minutes the list will suddenly become visible again. I've never encountered this problem before and neither have my coworkers. Please help!




Reply With Quote