hola FernAndo
yo manejo tambien combo y datacombo que los lleno con datos de mis tablas de sql de esta maner:
Private Sub Form_Load()
Dim rsModelo As New ADODB.Recordset
'aqui lleno el combo con los datos de mi tabla modelo
Set rsModelo = New ADODB.Recordset
rsModelo.CursorLocation = adUseClient
SQL = "SELECT * FROM modelo"
rsModelo.Open SQL, CN, adOpenStatic, adLockReadOnly
Do While Not rsModelo.EOF
Combo1.AddItem rsModelo!Nom_modelo
rsModelo.MoveNext
Loop
End Sub
luego valido en el evento CLICK y CHANGE, siempre y cuando tu combo este en la propiedad Style con el valor 2-DropDownList de la sgte manera:
Private Sub Combo1_Click() ' y tambien el mismo codigo en el evento Change
Dim rsModelo As New ADODB.Recordset
Set rsModelo = New ADODB.Recordset
rsModelo.CursorLocation = adUseClient
SQL = "SELECT * FROM modelo"
rsModelo.Open SQL, CN, adOpenStatic, adLockReadOnly
If rsModelo.RecordCount <> 0 Then
Label45.Caption = rsModelo!NOM_modelo 'aqui si quier mostrar algun dato que no veo el combo
Else
Label45.Caption = "Seleccione Modelo"
End If
End Sub
de esa manera estoy validando tanto cuando abandono la seleccion y cuando pulso en algun boton aceptando los valores..
creo que con esto no tendras problema, al menos ami no me resulta ningun error...
suerte
desarrollo
PD: me olvidada ese error del que hablas ("La operacion no esta permitida sino el objeto esta abierto") es referente a que los datos que consultas lo tienes abierto de algun modo dentro del control (combo) y no lo manjeas apropiadamente, lo mismo me paso amitambien, por eso manejalo con eventos el cual te dije alli arriba....
