怎么关判断一个窗体是否有页眉和页脚??

access_boy_li

如题??

Form.Section 这个 section是个数组，
seciton(0),section(1)，seciton(2)

怎么知道这个窗体是否有页眉和页脚

Henry D. Sy

Section 属性与特定的节对应。可以使用下列常量。建议采用常量来提高程序的可读性。

设置 常量 说明
0 acDetail 窗体或报表的主体节
1 acHeader 窗体页眉节或报表页眉节
2 acFooter 窗体页脚节或报表页脚节
3 acPageHeader 窗体或报表的页面页眉节
4 acPageFooter 窗体或报表的页面页脚节
5 acGroupLevel1Header 分组级别 1 的页眉节（仅用于报表）
6 acGroupLevel1Footer 分组级别 1 的页脚节（仅用于报表）
7 acGroupLevel2Header 分组级别 2 的页眉节（仅用于报表）
8 acGroupLevel2Footer 分组级别 2 的页脚节（仅用于报表）

access_boy_li

谢谢，
我的意思是怎么用程序判断出一个窗体是否有 页眉和页脚

Henry D. Sy

Private Sub Form_Load()
    On Error GoTo Form_Load_Error
    If Me.Section(acHeader).Visible Then
        MsgBox "Had acHeader"
    End If
    On Error GoTo 0
    Exit Sub

Form_Load_Error:
    If Err.Number = 2462 Then
        MsgBox "No acHeader"
    Else
        MsgBox "Error " & Err.Number & " (" & Err.Description & ")"
    End If
End Sub

access_boy_li

谢谢，这个是通过错误处理的吧。还有什么方法吗？？
比如类似 某个控件存在窗体里一样