Calcolare il numero dei giorni in un anno in VB.NET

Calcolare il numero dei giorni in un anno in VB.NET

Visto che mi ha incuriosito farlo in PHP, ho deciso di divertirmi anche con altri linguaggi.

Quindi oggi calcoliamo quanti giorni ha un anno usando VB.NET.

Ecco il codice di esempio:

Imports System.DateTime

Module Module1

    Sub Main()
        calcola(2016)
        calcola(2019)
    End Sub

    Sub calcola(ByVal anno As Integer)
        Dim totDays As Integer = 0
        For i As Integer = 1 To 12
            Dim d As Integer = DaysInMonth(anno, i)
            Console.WriteLine(i & " - " & d)
            totDays += d
        Next
        Console.WriteLine("TOT GIORNI: " & totDays)
    End Sub

End Module

Anche qui iteriamo sui mesi dell'anno passato come parametro, e sommiamo i vari giorni.

Per i giorni di un mese usiamo la funzione DaysInMonth, che richiede due paramentri (l'anno e il numero del mese).

Ho fatto il testo con due anni per vedere se i calcoli erano esatti.

Enjoy!




Share

Commentami!

About Mattepuffo.com

Blog dedicato all'informatica e alla programmazione!
Tutti i contenuti di questo blog, tranne casi particolari, sono sotto licenza Licenza Creative Commons Creative Commons Attribution-Noncommercial-Share Alike 2.5. .

2626 articoli
310 commenti
19 progetti
Altri link
  • About
  • Scrivimi
  • Copyright
  • Sitemap
  • matteo.ferrone@yahoo.it
  • GitHub
  • Privacy Policy