通过

TextFrame.HasText Property

  • 项目
Word Developer Reference

True if the specified shape has text associated with it. Read-only Boolean.

Syntax

expression.HasText

expression   A variable that represents a TextFrame object.

Example

If the second shape on the active document contains text, this example displays a message if the text overflows its frame.

Visual Basic for Applications 
  Dim docActive As Document

Set docActive = ActiveDocument
With docActive.Shapes(2).TextFrame
If .HasText = True Then
If .Overflowing = True Then
Msgbox "Text overflows the frame."
End If
End If
End With

See Also