专家坐堂-word怎么直接从两个后台表甚至多个后台表获取数据并显示出来Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

-- word怎么直接从两个后台表甚至多个后台表获取数据并显示出来

当前运行代码如下：

Dim tm As String = ProjectPath & "Attachments\\关于将某同志进行入党积极分子备案的报告.doc"

Dim fl As String = ProjectPath & "Reports\\关于将某同志进行入党积极分子备案的报告.doc"

Dim wrt As New WordReport(tm,fl) \'注意这里无需指定表名

wrt.AddDataTable("变更登记","智慧党建","Sel/ect TOP 1 * from {变更登记} where 姓名 = \'" & vars("姓名") & "\'")

wrt.Build()

wrt.Show()

问题：黑色加粗部分是变更登记表中的字段值，想把XX部分替换为党员信息表中的字段值，怎么操作呢？

word模板如下：

关于将[姓名]同志进行入党积极分子备案的报告

XX党委：

按照发展党员有关规定，根据党员推荐和群团组织推优情况，经[现支部]委员会研究，确定[姓名]同志为入党积极分子。现将有关情况报告如下：

[姓名]，男，X族，XX文化，XX省XX市XX县XX乡XX村人，XX年X月X日出生，XX年X月参加工作，现任XX单位XX职务。该同志于<Format([事项时间], "yyyy年MM月dd日")>提出入党申请，根据党员推荐和群团组织推优情况（说明具体推荐情况），经[现支部]委会XX年X月X日研究，确定其为入党积极分子，指定培养联系人为XX同志、XX同志。

现予备案，请审查。

[现支部]委员会(盖章)

年月日

word直接从后台读取数据并生成内容如下：

关于将王考同志进行入党积极分子备案的报告

XX党委：

按照发展党员有关规定，根据党员推荐和团组织推优情况，经第一支部委员会研究，确定王考同志为入党积极分子。现将有关情况报告如下：

王考，男，X族，XX文化，XX省XX市XX县XX乡XX村人，XX年X月X日出生，XX年X月参加工作，现任XX单位XX职务。该同志于2020年12月08日提出入党申请，根据党员推荐和团组织推优情况（说明具体推荐情况），经第一支部委会XX年X月X日研究，确定其为入党积极分子，指定培养联系人为XX同志、XX同志。

现予备案，请审查。

第一支部委员会(盖章)

年月日