[Access] Récupérer la valeur d'un champ

Bonjour,

Je veux récupérer la valeur d'un champ texte (dfonction_heure). Au premier passage dans la boucle il me récupère la valeur du dernier enregistrement sur lequel le formulaire était ouvert et le met dans fonction, alors que je souhaiterais la valeur du premier enregistrement et ensuite dans la boucle la variable fonction conserve toujours cette valeur au lieu de récupérer successivement les valeurs ????

Si quelqu'un peut m'aider merci

Voici le code :

Private Sub dheures_Click()

Dim fonction As String
Dim nbenr As Integer
Dim i As Integer

DoCmd.GoToRecord , , acFirst
nbenr = DCount("[dfonction_heure]", "[Déroulement du projet heures et frais]")

For i = 1 To nbenr

fonction = dfonction_heure.Value

DoCmd.GoToRecord , , acNext

Next

End Sub