解决方法二:
使用函数:
Function GetDatedis(dteDis)
dim mm,dd,yy,curtday_dis
mm=month(dteDis)
dd=day(dteDis)
if len(mm)=1 then
mm="0"&mm
end if
if len(dd)=1 then
dd="0"&dd
end if
yy=year(dteDis)
curtday_dis=mm&"/"&dd&"/"&yy
GetDatedis=curtday_dis
End function
其它形式可改参数