none
OPERAZIONI SU DATETIMEPICKER RRS feed

  • Domanda

  • buongiorno,

    Avrei la necessità, su un datetimepicker, di capire a quale determinato giorno appartiene la prima domenica di un mese

    grazie.

    mercoledì 13 novembre 2019 15:50

Tutte le risposte

  • Ciao Seby_s,

    Supponendo di avere un Form contenente un DatetimePicker di nome DateTimePicker1 e un Button di nome Button1, il codice seguente utilizza un funzione di nome PrimoGiornoSettimanaleDelMese che accetta un giorno della settimana di cui si vuole trovare la prima occorrenza, il mese e l'anno utilizzati per la ricerca.

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
            Dim GiornoSettimanale = DayOfWeek.Sunday 'Domenica
            Dim Mese = DateTimePicker1.Value.Month
            Dim Anno = DateTimePicker1.Value.Year
    
            Dim d As Date = PrimoGiornoSettimanaleDelMese(GiornoSettimanale, Mese, Anno)
    
            MsgBox(d.ToShortDateString)
        End Sub
        Private Function PrimoGiornoSettimanaleDelMese(GiornoSettimanale As DayOfWeek, Mese As Byte, Anno As Integer) As Date
            Dim d = New Date(Anno, Mese, 1)
            Do Until d.DayOfWeek = GiornoSettimanale
                d = DateAdd(DateInterval.Day, 1, d)
            Loop
            Return d
        End Function


    mario formosa


    giovedì 14 novembre 2019 17:06