閱讀英文

共用方式為


Word) (TextInput 物件

代表單一文字表單欄位。

註解

使用 FormFields (Index) ,其中 Index 是與文字表單欄位或索引編號相關聯的書簽名稱,可傳回 FormField 物件。 使用 TextInput 屬性搭配 FormField 物件可傳回 TextInput 物件。 下列範例會刪除使用中檔內名為 「Text1」 的文字表單欄位內容。

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

索引編號代表 FormFields 中之表單欄位的位置 集合。 下列範例會檢查使用中文件之第一個表單欄位的類型。 如果表單欄位是文字表單欄位,則此範例會將 「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 支援與意見反應