vb.net - 转换日期格式（yyyy-mm-dd 到七位儒略格式

Question

我正在开发一个生成 Google 查询的小型应用程序。使用运算符“daterange:”，您可以限制结果。示例（“搜索字符串”日期范围：juliandate）

Google 中的日期范围运算符需要七位朱利安格式。我发现了一些这样的例子

    datediff("yyyy","01/01/1900",date) & format(date,"y")

需要帮助找到一些代码解决方案，将普通日期格式转换为七位朱利安格式（VB 代码）。

Answer 1

从文件开头的导入开始

Imports System.Globalization

要转换您的日期，请使用下面的代码。

Dim dt As DateTime
Dim jc As String
dt = DateTime.ParseExact("2012/12/15", "yyyy/MM/dd", CultureInfo.InvariantCulture)
jc = dt.Year.ToString + dt.DayOfYear.ToString