主题：狐表－通用打印窗口 打遍项目中所有的表◎

这一行：

Dim tb As string = Forms("狐表打印").Controls("ComboBox1").text

应该改为：

Dim tb As string = e.form.Controls("ComboBox1").text

否则应用窗口模板后，除非窗口名称也改为狐表打印，否则一定出错。