Access - Cargar primer registro de un combobox

hola

Sucede que tengo una consulta en SQL, esta funciona correctamente y el resultado de esta debe guardarse en un combobox, necesito que por defecto se cargue el valor de la primera posición (0).

Estoy utilizando esta función :

Private Sub CCodigoRevistaTT_BeforeUpdate(Cancel As Integer)
Me.CCodigoRevistaTT.SetFocus
Me.CCodigoRevistaTT.ListIndex = 0
End Sub

Pero al ejecutarla sale el siguiente error ...."Se ha producido el error 2115 en tiempo de ejecucion"

Help!!!!

Hola Mariha
Prueba lo siguiente:

CCodigoRevistaTT.Value = CCodigoRevistaTT.ItemData(0)

Saludos,
Ana.

Holaaa Ana

Muchas gracias por contestar mi duda, pero no me funciono, probe haciendo actualizaciones after y before.. con la sentencia que me dices pero nada....

No se que pueda pasar con el combobox...

Vaya Mariha, pues lo siento. Yo lo tengo así funcionando para varios combobox sin problema. Y además lo ejecuto en diferentes momentos: al cargar el formulario, al seleccionar un elemento en otro combobox...
Sin más pistas no sé qué más decirte, lo siento.

Ana... tenias razon, ya lo modifique y lo guarde en otro campo, y funciono... muchas gracias!!

Saludos

muchas gracias es correcto funciono bien asi como lo enseñas

Funciono de maravilla, muchas gracias Ana

El primer elemento de un combo cualquiera: