如何获取两个给定日期之间的周数及其各自的日期（VB.NET）

Question

我是VB.net的新手，这是我正在寻找的例子：Date1 = 2/7/15和Date2 = 3/7/15。这两个日期之间的周数为4，结果日期为2/14/15，2/21/15，依此类推。提前谢谢！

Answer 1

猜测基于我想想你想要的

Dim d1 As DateTime = #2/7/2015#
Dim d2 As DateTime = #3/7/2015#

Do While d1 < d2
    d1 = d1.AddDays(7)
    Debug.WriteLine(d1.ToShortDateString)
Loop