VB.NET DateTime FromBinary()用法及代码示例

FromBinary() 方法用于创建 DateTime 类的对象。

用法:

Function FromBinary(ByVal bin as Long ) as Date

参数：

• Bin:指定long值

返回值：它返回一个 DateTime 类的对象。

程序/源代码：

下面给出了演示 DateTime 类的 FromBinary() 方法的源代码。给定的程序已成功编译并执行。

'VB.NET program to demonstrate FromBinary() method of 
'DateTime class.

Imports System

Module Module1
    Sub Main()
        Dim date1 As New DateTime(2020, 4, 27, 10, 20, 30)
        Dim date2 As New DateTime()

        Dim bin As Long = 0

        bin = date1.ToBinary()

        date2 = DateTime.FromBinary(bin)

        Console.WriteLine("Binary value:{0}", bin)
        Console.WriteLine("Date:{0}", date2)
    End Sub
End Module

输出：

Binary value:637235796300000000
Date:27-04-2020 10:20:30
Press any key to continue . . .

说明：

在上面的程序中，我们创建了一个包含 Main() 函数的模块 Module1。 Main() 函数是程序的入口点。

在 Main() 函数中，我们创建了 DateTime 类的对象，并使用 ToBinary() 方法将日期对象转换为 64 位二进制，然后从 64 位二进制值中获取日期对象。之后在控制台屏幕上打印日期。

---