我有一个字段,其中包含数字形式的日期,并且需要转换为等效日期以进行进一步的操作,例如在日期与其他日期变量之间进行检查。
例如:我的长整数变量是
Dim ndate as Long
ndate=20140901
我需要将此ndate作为日期变量,例如01/09/2014(dd / mm / yyyy)
提前致谢
这可以为您提供答案。如果日期为20140901,则newdate的日期为01/09/2014
dim newdate as date
newdate = CDate(Right(ndate, 2) & "/" & Mid(ndate, 5, 2) & "/" & Left(ndate, 4))
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句