获得时间的字符串形式,例如:20031110
'获得时间的字符串形式,例如:20031110
Function GetDateStringByDateTime(ByVal DateTime As Date) As String
Return DateTime.Year & Format(DateTime.Month, "00") & Format(DateTime.Day, "00")
End Function
'获得时间的字符串形式,例如:20031110
Function GetDateStringByDateTime(ByVal DateTime As Date) As String
Return DateTime.Year & Format(DateTime.Month, "00") & Format(DateTime.Day, "00")
End Function