Step1:添加开发工具，为了实现VBA编程
选项——>自定义功能去——>勾选开发工具
Step2：开发工具——>插入文字型窗体域
Step3：为所有窗体域添加唯一的书签
Step3：VBA编程实现对应书签的文本设置
Sub Main()
Dim doc As Document
Set doc = ThisDocument
doc.FormFields("文字1").Result = "姓名"
doc.FormFields("文字2").Result = "张某"
doc.FormFields("文字3").Result = "性别"
doc.FormFields("文字4").Result = "男"
doc.FormFields("文字5").Result = "联系方式"
doc.FormFields("文字6").Result = "133********"
End Sub
