DateValue 函数 (Visual Basic)
更新：2007 年 11 月
返回一个 Date 值，该值包含用字符串表示的日期信息，其时间信息设置为午夜 (00:00:00)。
Public Function DateValue(ByVal StringDate As String) As DateTime
参数
- StringDate
必选。String 表达式，表示自元年 1 月 1 日 00:00:00 到 9999 年 12 月 31 日 23:59:59 之间的某个日期/时间值。
异常
异常类型 |
错误号 |
条件 |
|---|---|---|
StringDate 包含无效的时间信息。 |
如果正在升级使用无结构错误处理的 Visual Basic 6.0 应用程序，请参见“错误号”一列。（您可以根据 Number 属性（Err 对象）比较错误号。）然而，如果可能，应当考虑用 Visual Basic 的结构化异常处理概述替换这种错误控制。
备注
如果 StringDate 仅包括用有效日期分隔符分隔的从 1 到 12 的数字，DateValue 将根据为系统指定的短日期格式识别年月日的顺序。DateValue 使用 System.Globalization 命名空间中 CultureInfo 类的 CurrentCulture 属性的当前日历设置。默认 CurrentCulture 值由“控制面板”设置决定。可以通过设置 System.Globalization 命名空间中 DateTimeFormatInfo 类的 ShortDatePattern 属性重写短日期格式。
DateValue 可以识别完整形式、缩写形式和数字形式的月份名。例如，除了识别 12/30/1991 和 12/30/91 外，DateValue 还识别“December 30, 1991”和“Dec 30, 1991”。
如果 StringDate 的年份部分被省略，则 DateValue 使用取自计算机系统日期的当前年份。
如果 StringDate 参数包含时间信息，则 DateValue 不会将它包括到返回值中。但是，如果 StringDate 包含无效的时间信息（如“89:98”），则发生 InvalidCastException 错误。
示例
本示例使用 DateValue 函数将字符串转换为日期。也可以使用日期文本将日期直接分配给 Object 或 Date 变量，如 oldDate = #2/12/69#。
Dim oldDate As Date
oldDate = DateValue("February 12, 1969")
要求
**模块：**DateAndTime
**程序集：**Visual Basic 运行库（在 Microsoft.VisualBasic.dll 中）