This example selects the next field and displays the field codes.
With Selection
.GoTo What:=wdGoToField
.Expand Unit:=wdWord
If .Fields.Count = 1 Then .Fields(1).ShowCodes = True
End With
This example updates and displays the result of the first field in the active document.
If ActiveDocument.Fields.Count >= 1 Then
With ActiveDocument.Fields(1)
.Update
.ShowCodes = False
End With
End If