vb.net通過本月和過去6個月的循環

Question

我嘗試循環，雖然這個月，直到過去六個月使用vb.net並獲取整數和年份的月份，並將其傳遞給我的sql語句。但似乎無法弄清楚..

到目前爲止，我得到這個：

 Dim dtNow As DateTime = DateTime.Now 
     Dim pastSixMonths As DateTime = dtNow.AddMonths(-6) 

     For i As Integer = dtNow.Month To pastSixMonths.Month 

     Next 

可以有人幫忙，請（無LINQ請）

Answer 1

你想知道如何爲月環月量子飛躍？

Dim result As New List(Of String) 
Dim currentDate = Now() 
Dim last6Month = Now().AddMonths(-6) 
While currentDate >= last6Month 
    result.Add(String.Format("{0}-{1}", currentDate.Month, currentDate.Year)) 
    currentDate = currentDate.AddMonths(-1) 
End While 

result.Clear() 
' or the other way round : 
currentDate = Now().AddMonths(-6) 
While currentDate <= Now() 
    result.Add(String.Format("{0}-{1}", currentDate.Month, currentDate.Year)) 
    currentDate = currentDate.AddMonths(1) 
End While