人员表+家庭信息直接建立关联表，单向的，

目前问题：每次打开窗口都会弹出人员的家庭关联表

1、选择单向，而不是无，是因为报表里面人员+本人的家庭信息，涉及到引用关联表

提问：

如何既能不弹出来这个关联表，又能在报表里面实现引用本人家庭信息这个功能？

1、你没有关联表，excel报表都是可以引用关联表的。你可以选择【无】的。

2、你可以设置关联表不自动打开的，如 http://www.foxtable.com/webhelp/scr/0094.htm

\'下面很简单,指定每一个单元格的内容
rt1.Cells(0,0).Text= "家庭人员信息表"
rt1.Cells(0,0).Style.FontBold = True \'字体加粗
rt1.Cells(0,0).Style.FontSize = 16 \'大体大小为16磅
rt1.Cells(0,0).Style.TextAlignHorz = prt.AlignHorzEnum.Center \'水平居中排列
rt1.Cells(0,0).Style.Spacing.Bottom = 3 \'和下面的对象(表格)距离3毫米

rt1.Cells(1,0).Text= "关系"
rt1.Cells(1,0).Style.TextAlignHorz = prt.AlignHorzEnum.Center \'水平居中排列
rt1.Cells(1,1).Text= "姓名"
rt1.Cells(1,1).Style.TextAlignHorz = prt.AlignHorzEnum.Center \'水平居中排列
rt1.Cells(1,2).Text= "年龄"
rt1.Cells(1,2).Style.TextAlignHorz = prt.AlignHorzEnum.Center \'水平居中排列
rt1.Cells(1,3).Text= "政治面貌"
rt1.Cells(1,3).Style.TextAlignHorz = prt.AlignHorzEnum.Center \'水平居中排列
rt1.Cells(1,4).Text= "联系方式"
rt1.Cells(1,4).Style.TextAlignHorz = prt.AlignHorzEnum.Center \'水平居中排列
rt1.Cells(1,5).Text= "工作单位"
rt1.Cells(1,5).Style.TextAlignHorz = prt.AlignHorzEnum.Center \'水平居中排列
 

With Tables("person.family")
    For r As Integer = 0 To .Rows.Count - 1 \'遍历关联表每一行
        rt1.Cells(r+2,0).Text = .rows(r)("guanXi")
        rt1.Cells(r+2,1).Text = .rows(r)("name")
        rt1.Cells(r+2,2).Text = .rows(r)("age")
        rt1.Cells(r+2,3).Text = .rows(r)("political")
        rt1.Cells(r+2,4).Text = .rows(r)("tel")
        rt1.Cells(r+2,5).Text = .rows(r)("job")
    Next
End With
ra1.Children.Add(rt1)

doc.Body.Children.Add(ra1)
Doc.Preview() \'预览报表

如果选务，那个红色部分就不能那么写了，该如何写？

此主题相关图片如下：1.png

就是窗口的最底下会有那个标题？去不得，如何去的 不留一点痕迹，就想它不存在一样