bg.Text = "到期的报告 共有 " & DataTables("客户").Compute("count(_identify)","substring(报告时间,1,4) < " & StartDate.Year & "")