您的位置:首页 > 其它

将输入的20041219等的数字字符串等格式化成日期型

2008-04-24 06:51 309 查看
dim strin as string,strout as string
strin="20051219"

strout=left(strin,4)

strout=strout & "/" & mid(strin,5,iif(len(strin)=8,2,1))

strout=strout & "/" & right(strin,2)

strout=format(strour,"yyyy/mm/dd")

msgbox(strout)
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: 
相关文章推荐