此处的实际问题是将日期保存在作为快照创建的报告中,并且不应在用户打开以查看此报告时更改。
我有问题。我们为预定报告提供了报告快照。因此,如果在2016年1月1日按计划任务创建报告,则标题上的日期应显示为
1月份--- 截至:2016年1月31日
二月--- 截至:2016年2月28日
当我打开此报告时,它应该在报告标题上显示相同的日期而不是当前月份。我的报告现在显示我们打开的每份报告的当前月份。
我目前在文本框中的代码是
=iif(Left(User!Language,2)="fr","En date du ", "As of ") + Code.GetDateString()
Public Function GetDateString() as String
Dim iMonth as integer
Dim sYear as String
Dim thisMonth As New DateTime(DateTime.Today.Year, DateTime.Today.Month, 1)
Dim firstDayLastMonth As DateTime
Dim lastDayLastMonth As DateTime
if (Month(Date.Now) = 1) then
iMonth = 12
sYear = CStr(Year(Date.Now)-1)
else
iMonth = Month(Date.Now) - 1
sYear = CStr(Year(Date.Now))
end if
firstDayLastMonth = thisMonth.AddMonths(-1)
lastDayLastMonth = thisMonth.AddDays(-1)
Return MonthName(iMonth) + " " + CStr(Day(lastDayLastMonth)) + ", " + sYear
End Function
由于