返回首页当前位置：首页 >> 网站建设 >> 正文

一种处理不规范日期数据的好方法

文章来自: | 发表时间:2008-2-21 10:45:46

一种处理不规范日期数据的好方法


在实际的工作中，我们经常会从各种管理软件中导出数据，也许你会遇到存在日期数据不规范的现象，下面我们来介绍一种处理不规范日期数据的方法。
例子:
从一个管理系统中导出的日期数据存在以下几种可能：

第一种：2007-11-1 11:32:16:211

第二种：2005-11-1 11:32:16:21

第三种：2005-11-1 11:32:16
现在我们将其规范为正确的日期，可以采用下面的函数来进行转换。

Function TransErrDate(ErrDate As String) As Date
Dim i As Integer
i = InStr(ErrDate, ":") - 4
TransErrDate = left(ErrDate, i)
End Function
相关文章 更多