clea
d=day(date())
m=alltrim(str(month(date())))+"月"
if d=8
"今天是"+m+"8号"
else
"今天不是8号"
"今天是"+m+alltrim(str(day(date())))+"号"
endif虽然已经过期了~但是给你吧