
Partial Class Calendar_Calendar_SelectionChanged
    Inherits System.Web.UI.Page


    Protected Sub Calendar1_SelectionChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles Calendar1.SelectionChanged
        lblTodaysDate.Text = "Dzisiejsza data to " + Calendar1.TodaysDate.ToShortDateString()
        If Calendar1.SelectedDate <> DateTime.MinValue Then
            lblSelected.Text = "Zaznaczoną datą jest " + Calendar1.SelectedDate.ToShortDateString()
        End If
        lblCountUpdate()
    End Sub

    Private Sub lblCountUpdate()
        lblCount.Text = "Liczba zaznaczonych dni:  " + Calendar1.SelectedDates.Count.ToString()
    End Sub
End Class
