如果指定的图形有相关的文字,则该属性值为 True。 只读 Boolean。
语法
表达式。HasText
表达 一个代表 TextFrame 对象的变量。
示例
如果活动文档中的第二个图形包含文字,并且文字超出了图文框时,本示例显示一条消息。
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
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。