access字符串转换为日期

2018-03-17 09:15:00
黄善超
原创
1232

在excel导入的数据中,或者其他录入的数据,看似是日期格式的字符,但是确实文本数据类型。

如何才能把文本转换成日期格式呢?当然可以使用CDate强行转换了。

由于显示的数据是类似日期格式的,所以我们用DateValue函数。



如下示例使用 DateValue 函数将字符串转换为日期。

也可以使用日期原义直接 给 Variant 或 Date 类型的变量赋值日期,例如 MyDate = #2/20/18# 。

Dim MyDate
MyDate = DateValue("February 20, 2018")'返回日期。


说明

如果 date 是一个字符串,且其内容只有数字以及分隔数字的日期分隔符,则 DateValue 就会根据系统中指定的短日期格式来识别月、日、年的顺序。DateValue 也识别明确的英文月份名称,全名或缩写均可。

如果 date 中略去了年这一部分,DateValue 就会使用由计算机系统日期设置的当前年份。

如果 date 参数包含时间信息,则 DateValue 不会返回它。但是,如果 date 包含无效时间信息(如 89:98),则会导致错误发生。


分享