日期:2010-02-09  浏览次数:21121 次

把weekday星期函数的数字变为中文,收藏备用。

以下是引用片段:
Function FormatWeekday(strdate)
select case strdate
 case 1:FormatWeekday = "日"
 case 2:FormatWeekday = "一"
 case 3:FormatWeekday = "二"
 case 4:FormatWeekday = "三"
 case 5:FormatWeekday = "四"
 case 6:FormatWeekday = "五"
 case 7:FormatWeekday = "六"
end select
End Function