Visual Basic Now 函数

定义和用法

Now 函数可根据计算机系统的日期和时间设置返回当前的日期和时间。

语法

Now

提示和注释

重要事项：如果同时读取 Date、Time 以及 Now，那么 Now = Date + Time，但是实际上，我们不可能同时调用这三个函数，因为执行完一个函数之后，才能执行另一个函数，所以如果您在程序中必需同时取得当时的日期和时间，必需调用 Now，再利用 DateVale 及 TimeValue 分别取出日期和时间。

实例：取得某一时间点的日期和时间：

Module Module1
    Sub Main()
        Dim N = Now '这个时间点的日期和时间
        Dim D = Datevalue(N) '同一时间点的日期部分
        Dim T = TimeValue(N) '同一时间点的时间部分
        Dim D2 = Date '时间点1的日期
        Dim T2 = Time '时间点2的时间
    End Sub
End Module

运行一下

问题思考

连续执行 Response.write Now 及 Response.Write Date + Time，则可能出现的最大误差值有多大？假设：

时间点 1 取得的 Now = #7/1/95 23:59:59#
时间点 2 取得的 Date = #7/1/95#

而如果 "时间点 3" 刚好跨过一日，所以 Time = #0:00:00，于是 Now 与 Date+Time 的差距便成了 23:59:59。

实例

例子 1

Module Module1
    Sub Main()
        Console.WriteLine(Now)
    End Sub
End Module