Logré escribir el código bien. Es este:
If Left( [FID],Len( [FID] )-1 )="" Then
Progresiva="0"
Else
Progresiva=Left( [FID],Len( [FID] )-1 )
End If
If Right( [FID],1 )="0" Then
Progresiva=Progresiva & "+000 Km."
Else
Progresiva=Progresiva & "+" &Right( [FID],1 )*100 & " Km."
End If
En el espacio donde va el nombre del campo, escribe:
Progresiva