水晶報表公式的VB寫法:
dim pdate,jdate as date
pdate=Maximum ({命令.pdate},{命令.slipno} )
pdate=dateadd("d",2,pdate)
dim str as string
str=cstr({命令.jdate},"yyyy年MM月dd日") & "至"  &  cstr(pdate,"yyyy年MM月dd日")
posted on 2008-07-11 17:09  小哈  阅读(930)  评论(0编辑  收藏  举报