auf den ersten datensatz zugreifen

Hallo Gemeinde,
habe ein relativ triviales Problem, aber stehe gerade ein bischen auf dem schlauch.
Ich loope durch einen datensatz, das läuft auch alles prima, bis auf den Umstand, daß ich nicht auf den ersten Datensatz zugreifen kann.
Der code geht in etwa so:

Do Until pFeature Is Nothing
FeldWert = pFCursor.FindField("station")
FeldW = CStr(pFeature.Value(FeldWert))
wertNeu = FeldW


If wertNeu = wertAlt Then

pFeature.Value(pFeature.Fields.FindField("TransID" )) = i
pFeature.Value(pFeature.Fields.FindField("TransLFt ")) = n + 1

Else
pFeature.Value(pFeature.Fields.FindField("TransID" )) = i + 1

pFeature.Value(pFeature.Fields.FindField("TransLFt ")) = n

i = i + 1

wertAlt = FeldW

End If

pFeature.Store

Set pFeature = pFCursor.NextFeature
Loop

Was mach ich falsch?
Danke und Grüße