Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/vb.net/14.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Vb.net 循环以根据开始日期和结束日期生成日期列表_Vb.net_Date - Fatal编程技术网

Vb.net 循环以根据开始日期和结束日期生成日期列表

Vb.net 循环以根据开始日期和结束日期生成日期列表,vb.net,date,Vb.net,Date,如何根据开始日期和结束日期生成日期列表 i) dt.行(k).项目(“开始日期”)=开始日期=2019-11-13 ii)dt第(k)行项目(“结束日期”)=结束日期=2019-11-27 For p = dt.Rows(k).Item("startdate") To dt.Rows(k).Item("enddate") //display p value Next p 如果您得到这些日期之间的天数,那么您可以重复多次+1(包括开始日期和结束日期),并将循环变量添加

如何根据开始日期和结束日期生成日期列表

i) dt.行(k).项目(“开始日期”)=开始日期=2019-11-13

ii)dt第(k)行项目(“结束日期”)=结束日期=2019-11-27

 For p = dt.Rows(k).Item("startdate") To dt.Rows(k).Item("enddate")

         //display p value

  Next p

如果您得到这些日期之间的天数,那么您可以重复多次+1(包括开始日期和结束日期),并将循环变量添加到开始日期

Module Module1

    Sub Main()
        Dim startDate = New DateTime(2019, 11, 13)
        Dim endDate = New DateTime(2019, 11, 27)

        Dim daysCount = (endDate - startDate).Days

        For i = 0 To daysCount
            Dim p = startDate.AddDays(i)
            Console.WriteLine(p.ToString("yyyy-MM-dd"))
        Next

        Console.ReadLine()

    End Sub

End Module
产出:

2019-11-13
2019-11-14
2019-11-15
2019-11-16
2019-11-17
2019-11-18
2019-11-19
2019-11-20
2019-11-21
2019-11-22
2019-11-23
2019-11-24
2019-11-25
2019-11-26
2019-11-27
注意它是如何
。。。到daysunt
而不是
。。。至daysCount-1


在本例中,没有必要对LINQ进行更精细的处理,但以防在其他情况下有意义:

对于可枚举范围(0,(endDate-startDate).Days+1)中的每个p。选择(函数(i)startDate.AddDays(i))
Console.WriteLine(p.ToString(“yyyy-MM-dd”))
下一个

我随时都会选择LINQ版本。我会说“没有必要通过不使用LINQ来使它变得更加灵活”