Visual Basic - Que diablos estoy Haciendo Mal??

Agradeceré buestras Ayudas, cree esta rutina pero no me llena los campos:

Sub resumen()
Dim etiqueta As String
niveles_hora.MoveFirst
While Not niveles_hora.EOF
For i = 48 To 26 Step -1
etiqueta = "label" & i & ".caption"
etiqueta = niveles_hora("laguna")

niveles_hora.MoveNext
Next i

Wend
End Sub

Yo creo que esta rutina lo que está haciendo es cargando en la variable 'etiqueta' una cadena y sobreescribiendo en la misma el contenido del campo 'laguna' y éso mismo lo sobreescribe 23 veces
en el bucle for...next.
En definitiva, no veo que actualice ningún recordset.

Comprobar, pues lo dicho es salvo error.
Un saludo.

aunque tu programa esta un poco mal hecho,
lo que tienes que hacer es cambiar el orden de la segunda asignación?
niveles_hora("laguna") =etiqueta

tambien creo que esta mal la asiganacion de la etiqueta,
no creo nesesario el uso de esta variable, esa mejor hacerlo directo.
ademas no puedes usar el nombre de un control como string ya que lo estas usando como string y no como nombre y propiedad, mejor crea una matriz de controles label.

label(i)

Sub resumen()

niveles_hora.MoveFirst
While Not niveles_hora.EOF
For i = 48 To 26 Step -1

niveles_hora("laguna") = label(i).caption

niveles_hora.MoveNext
Next i

Wend
End Sub