获得时间的字符串形式，例如：20031110

'获得时间的字符串形式，例如：20031110

Function GetDateStringByDateTime(ByVal DateTime As Date) As String

    Return DateTime.Year & Format(DateTime.Month, "00") & Format(DateTime.Day, "00")

End Function

本文地址：http://com.8s8s.com/it/it43912.htm