请教：报表页面页眉

我要飞

如何控制页面页眉的显示与否？
如：page1显示其中的label1，page2显示其中的label2，以后显示显示其中的label3？
我用select case me.page.value
     case 1
     me.label1.visible=true
     case 2
     me.label2.visible=true
     case >=3
     me.label3.visible=true
    endselect
没成功，请教该怎么写？写在何处？  谢谢！！！

[此贴子已经被作者于2002-8-14 13:44:56编辑过]

cattjiu

Private Sub Report_Open(Cancel As Integer)
Me.Label6.Visible = True
Me.Label7.Visible = False
Me.Label8.Visible = False
End Sub

Private Sub Report_Page()


Select Case Me.Page
Case 1
Me.Label6.Visible = False
Me.Label8.Visible = False
Me.Label7.Visible = True

'Me.Label6.Visible = True
'Me.Label7.Visible = False
'Me.Label8.Visible = False
'Case 2
'Me.Label6.Visible = False
'Me.Label8.Visible = False
'Me.Label7.Visible = True
Case Is >= 2 '3
Me.Label8.Visible = True
Me.Label6.Visible = False
Me.Label7.Visible = False

End Select
End Sub

在报表设计状态直接贴在程序码窗体.label6 7 8 与你的1 2 3对应

[此贴子已经被cattjiu于2002-8-14 16:54:18编辑过]

我要飞

非常感谢版主的指点！！！