VB.net如何計算每月的15號和30號？

Question

例如，1月15日是1月1日至15日，1月30日是1月1日至1月30日。由於並非所有月份都由30天組成，因此2月15日將是1月31日至2月14日。那么獲得當前月15號和30號的公式可能是什么？ 提前致謝。

Answer 1

如果我正確理解了您的問題，您想要該數字是一年中的哪一天？ 如果是這樣，您可以這樣做

Sub Main()
    Dim FIFTEENTH As DateTime = New DateTime(Now.Year, Now.Month, 15)
    Dim THIRTIETH As DateTime
    Dim hasThirty As Boolean = (DateTime.DaysInMonth(Now.Year, Now.Month) >= 30)

    Console.WriteLine("The fifteenth: ")
    Console.WriteLine($"Day of the Year: {FIFTEENTH.DayOfYear}")
    Console.WriteLine($"Day of the Week: {FIFTEENTH.DayOfWeek.ToString("D")} / {FIFTEENTH.DayOfWeek.ToString("g")}")

    If (hasThirty) Then
        Console.WriteLine("The Thirtieth: ")

        Console.WriteLine($"Day of the Year: {THIRTIETH.DayOfYear}")
        Console.WriteLine($"Day of the Week: {THIRTIETH.DayOfWeek.ToString("D")} / {THIRTIETH.DayOfWeek.ToString("g")}")
    End If

End Sub