Forum Discussion
Establecer valor por defecto Combo Box desde una SQL query
Hola a todos! Me estoy realizando una BBDD y tengo un problema con un formulario. En uno de los ComboBox que utilizo, me gustaría poner como valor por defecto el resultado de una query SQL, el pr...
¡Hola!
Con un evento adecuado (abrir el formulario o algo así) puedes utilizar un código como éste:
Dim rs As DAO.Recordset
Dim strSQL As StringstrSQL = "SELECT Campo1 " & _
" FROM Tabla " & _
" WHERE Id=42"
Set rs = CurrentDb.OpenRecordset(strSQL, dbOpenSnapshot)If Not rs.BOF Then
Forms!Formulario1!Combo1.DefaultValue = rs!Campo1
End IfServus
Karl
************
Access News (March edition)
Access DevCon (April 28+29)
Hola Karl, muchas gracias por la ayuda, ahora parece que falla otra instrucción:
Muchísimas gracias.
Muchísimas gracias Karl_Donaubauer, ya funciona todo a la perfección. Mil gracias!!!!! 🙂
