使用英语阅读

通过


Word) (TextInput 对象

代表一个文本型窗体域。

备注

使用 FormFields (Index) (其中 Index 是与文本窗体字段或索引号关联的书签名称)返回 FormField 对象。 将 TextInput 属性与 FormField 对象一起使用可返回 TextInput 对象。 以下示例删除活动文档中名为“Text1”的文本型窗体域的内容。

ActiveDocument.FormFields("Text1").TextInput.Clear

索引号代表窗体域的 窗体域 中的位置 集合。 以下示例检查活动文档中第一个窗体域的类型。 如果该窗体域是文本型窗体域,则该示例将“Mission Critical”设置为该域的值。

If ActiveDocument.FormFields(1).Type = wdFieldFormTextInput Then 
 ActiveDocument.FormFields(1).Result = "Mission Critical" 
End If

以下示例确定 ffield 变量在设置为默认的文本以前,是否在活动文档中代表一个有效的文本型窗体域。

Set ffield = ActiveDocument.FormFields(1).TextInput 
If ffield.Valid = True Then 
 ffield.Default = "Type your name here" 
Else 
 MsgBox "First field is not a text box" 
End If

Add 方法与 FormFields 对象一起使用可添加文本窗体字段。 以下示例在活动文档的开始处添加文本型窗体域,然后将该窗体域的名称设置为“FirstName”。

Set ffield = ActiveDocument.FormFields.Add( _ 
 Range:=ActiveDocument.Range(Start:=0, End:=0), _ 
 Type:=wdFieldFormTextInput) 
ffield.Name = "FirstName"

另请参阅

Word 对象模型参考

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。