数字日期转化为汉字日期格式.doc_第1页
数字日期转化为汉字日期格式.doc_第2页
数字日期转化为汉字日期格式.doc_第3页
数字日期转化为汉字日期格式.doc_第4页
数字日期转化为汉字日期格式.doc_第5页
全文预览已结束

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

数字日期转化为汉字日期格式1. 2. 3. /*功能:YYYY-MM-DD数字日期转化为汉字4. 例:1984-3-7-一九八四年三月七日5. 调用:baodate2chinese(1984-3-7)6. */7. varchinese=零,一,二,三,四,五,六,七,八,九;8. varlen=十;9. varydm=年,月,日;10. functionnum2chinese(s)11. /将单个数字转成中文.12. s=+s;13. slen=s.length;14. varresult=;15. for(vari=0;islen;i+)16. result+=chineses.charAt(i);17. 18. returnresult;19. 20. 21. functionn2c(s)22. /对特殊情况进行处理.23. s=+s;24. varresult=;25. if(s.length=2)26. if(s.charAt(0)=1)27. if(s.charAt(1)=0)returnlen0;28. returnlen0+chineses.charAt(1);29. 30. if(s.charAt(1)=0)returnchineses.charAt(0)+len0;31. returnchineses.charAt(0)+len0+chineses.charAt(1);32. 33. returnnum2chinese(s)34. 35. 36. functionbaodate2chinese(s)37. /验证输入的日期格式.并提取相关数字.38. vardatePat=/(d2|d4)(/|-)(d1,2)(2)(d1,2)$/;39. varmatchArray=s.match(datePat);40. varok=;41. if(matchArray=null)returnfalse;42. for(vari=1;imatchArray.length;i=i+2)43. ok+=n2c(matchArrayi-0)+ydm(i-1)/2;44. 45. returnok;46. 47. 48. 49. 50. YYYY-MM-DD:51. 52. 中文显示:53. 54. 56. 57. C#1. / 2. /数字日期转换成中文日期 3. / 4. /日期 5. / 6. publicstringchangeDate(stringstrDate)7. 8. charstrChinese;9. strChinese=newchar,一,二,三,四,五,六,七,八,九,十;10. StringBuilderresult=newStringBuilder();11. /依据正则表达式判断参数是否正确 12. RegextheReg=newRegex(d2|d4)(/|-)(d1,2)(/|-)(d1,2);13. /if(theReg.Match(strDate).Length!=0) 14. / 15. /将数字日期的年月日存到字符数组str中 16. stringstr=null;17. if(strDate.Contains(-)18. 19. str=strDate.Split(-);20. 21. elseif(strDate.Contains(/)22. 23. str=strDate.Split(/);24. 25. 26. /str0中为年,将其各个字符转换为相应的汉字 27. for(inti=0;i1)39. 40. result.Append(strChineseMN1);41. 42. if(MN10)43. 44. result.Append(strChinese10);45. 46. if(MN2!=0)47. 48. result.Append(strChineseMN2);49. 50. result.Append(月);51. 52. /转换日 53. intday=int.Parse(str2);54. intDN1=day/10;55. intDN2=day%10;56. 57. if(DN11)58. 59. result.Append(strChineseDN1);60. 61. if(DN10)62. 63. result.Append(strChinese10);64. 65. if(DN2!=0)66. 67. result.Append(strChineseDN2

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论