这是我为网友做的题目。

1。学习网友羽扇子君2011-4-6发表的代码:

    If [Page] = [Pages] Then
        Me.LabelTemp.Visible = True
    Else
        Me.LabelTemp.Visible = False
    End If

2。而修改的代码:
Private Sub 页面页眉_Format(Cancel As Integer, FormatCount As Integer)
    Me.页合计 = 0
    If [Page] = [Pages] Then
        Me.Text88.Visible = True
         Me.Text89.Visible = True
          Me.Text90.Visible = True
           Me.Text91.Visible = True
           Me.Label92.Visible = True
       Me.Line93.Visible = True      
    Else
        Me.Text88.Visible = False
        Me.Text89.Visible = False
        Me.Text90.Visible = False
        Me.Text91.Visible = False
        Me.Label92.Visible = False
           Me.Line93.Visible = False   
    End If
End Sub

3。将原报表页脚的文本框可见性设置为否

附   件:  

点击下载此附件