como mostrar el primer dato en combobox
 

Hola gente del foro. de nuevo piediendo ayuda, que tal que no existiera este foro.

estoy haciendo una consulta la cual carga los datos en un combobox, pero el problema es que tengo que hacer clic en el combo para ver los datos y lo que quiero es que me muestre el primer registro de la consulta sin necesidad de hacer clic dentro del combo.

Call Conexion
rsbuscar(0).Open "SELECT DISTINCT nivel,nombregrupo From partesdelequipo ORDER BY nivel", cnn, adOpenStatic, adLockOptimistic
While Not rsbuscar(0).EOF
grupop.AddItem rsbuscar(0)("nombregrupo") rsbuscar(0).MoveNext
Wend
Call cerrarcnn

agradezco cualquier colaboracion.:si:

Hola

Para que el primer elemento del combo aparezca seleccionado, y por tando en el texto del combo:

Combo1.ListIndex=0

--Saludos--

proba con esto

Call Conexion
rsbuscar(0).Open "SELECT DISTINCT nivel,nombregrupo From partesdelequipo ORDER BY nivel", cnn, adOpenStatic, adLockOptimistic
grupop.Text rsbuscar(0)("nombregrupo")
While Not rsbuscar(0).EOF
grupop.AddItem rsbuscar(0)("nombregrupo") rsbuscar(0).MoveNext
Wend
Call cerrarcnn

espero que te sirva
saludos

estuvo perfecta la respuesta, era lo que necesitaba. muchisisimas gracias por la ayuda.