选定下一个域。如果找到了一个域,则本方法返回 Field 对象,如果没有找到,则本方法返回 Nothing。
expression.NextField
expression 必需。该表达式返回一个 Selection 对象。
本示例更新所选内容中的下一个域。
If Not (Selection.NextField Is Nothing) Then
Selection.Fields.Update
End If
本示例选定所选内容中的下一个域,并在状态栏显示一条信息(如果找到了一个域)。
Set myField = Selection.NextField
If Not (myField Is Nothing) Then StatusBar = "Field found"