日期|字符串
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)
将输入的20041219等的数字字符串等格式化成日期型
80酷酷网 80kuku.com
