高手指教 "如何动态更改datareport中的标题"

Question

高手指教 "如何动态更改datareport中的标题"
   由于本人用VB中的datareport做了一个报表.为了做这个通用的报表,因此在题目上要做相应的变化.如今年的题目为"2003-2004年度优异生申报表"
   那么到了明年,报表的题目就变成了"2004-2005年度优异生申报表"
  现在就要交差了,所以小弟现在紧急求援,特别需要大家的帮忙
  
  先谢谢各位了

Answer 1

假设你的报表标题栏节的名字为：section4
报表标题栏节中显示题目的RptLabel标签名字为：MainTitle
你可以在DataReport1显示之前加入下面的代码实现：Dim strLastYear As String, strYear As String
strYear = Left(Now, 4)
strLastYear = Left(Year(Now) - 1, 4)DataReport1.Sections.Item("section4").Controls.Item("MainTitle").Caption = strLastYear & "---" & strYear & "年度优异生申报表"