'返回 0(零)值表明更新域时没有出错。 If ActiveDocument.Fields.Update = 0 Then MsgBox "Update Successful" Else MsgBox "Field " & ActiveDocument.Fields.Update & _ " has an error" End If