VB。 NET将日期转换为数字

Question

我在VB中有这个代码。 NET

dim date_e As DateTime
date_e = New DateTime(CLng(Convert.ToDouble("635434240520170000")))

结果是：

12.08.2014 07:07:32

现在我的问题是如何反转该编码以获取我自己输入的特定日期和时间的数字： 让我们说。

22.09.2014 07:07:32

谢谢！

Answer 1

Long的{​​{3}}是格里高利历中自0001年1月1日00：00：00000以来的刻度。

您首先需要将字符串解析为Date，然后您可以使用它DateTime constructor：

Dim dt = Date.Parse("22.09.2014 07:07:32") ' presumes that this is the correct format
Dim ticks As Long = dt.Ticks

如果输入日期字符串的格式与当前文化格式不同，则可以使用具有正确文化的Date.Parse：

dt = Date.Parse("22.09.2014 07:07:32", New CultureInfo("de-DE"))

或 - 如果您不了解文化，只知道格式 - Date.ParseExact：

dt = Date.ParseExact("22.09.2014 07:07:32", "dd.MM.yyyy HH:mm:ss", CultureInfo.InvariantCulture)