pb：函数将日期转换成中文名称

//===============================================
// 该函数将日期转换成中文名称
//参数：日期，
//      返回类型：0：星期 1：年 2：年月 3：年月日 4：年月日星期
//返回值：根据返回类型的字符串
// 
//-----------------------------------------------

string ls_NumberName[10] = {"一","二","三","四","五","六","七","八","九","十"}
string ls_WeekName[7]    = {"星期日","星期一","星期二","星期三","星期四","星期五","星期六"}
integer li_Year     , li_Month     , li_Day , li_Week , i
string  ls_YearName ,