Visual Basic DateValue 函数

定义和用法

DateValue 函数可返回一个日期类型。

也就是说，DateValue 函数可从表达式中取回日期。

注释：如果日期中的年份部分不省略，那么函数会使用来自计算机系统日期的当前年份。

注释：如果日期参数含有时间信息，那么时间信息不会被返回。如果日期中含有无效的时间信息，那么会发生 run-time 运行时错误。

注释：如果参数中不含日期，那么 DateValue 函数将返回 0 ，若输出则是 12:00:00 AM，即 0。

语法

DateValue(date)

实例

例子 1

Module Module1
    Sub Main()
        Console.WriteLine(DateValue("31-Jan-02"))
    End Sub
End Module

输出：

1/31/2002

例子 2

Module Module1
    Sub Main()
        Console.WriteLine(DateValue("31-Jan")) '假设当年是2002年，则输出的是系统日期的年份
    End Sub
End Module

输出：

1/31/2002

例子 3

Module Module1
    Sub Main()
        Console.WriteLine(DateValue("31-Jan-02 2:39:49 AM"))
        '如果参数同时包含日期和时间，则只输出日期。
    End Sub
End Module

输出：

1/31/2002

例子 4

Module Module1
    Sub Main()
        Console.WriteLine(DateValue("2:39:49 AM")) '输出 12:00:00 AM ，相当于 0。
    End Sub
End Module

输出：

12:00:00 AM