Partial Class html_Default
Inherits System.Web.UI.Page
Sub DayRender(ByVal sender As Object, ByVal e As DayRenderEventArgs)
If e.Day.Date < Today Then
e.Day.IsSelectable = False
e.Cell.ForeColor = Drawing.Color.Gray
End If
If e.Day.IsOtherMonth Then
e.Cell.ForeColor = Drawing.Color.AntiqueWhite
e.Cell.BackColor = Drawing.Color.AntiqueWhite
e.Day.IsSelectable = False
End If
End Sub
Protected Sub Calendar1_SelectionChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles Calendar1.SelectionChanged
TextBox1.Text = Calendar1.SelectedDate
If Calendar1.SelectedDate > Calendar2.SelectedDate Then
Calendar2.SelectedDate = Calendar1.SelectedDate.AddDays(1)
TextBox2.Text = Calendar2.SelectedDate
End If
If Calendar1.SelectedDate = ...
Go to the complete details ...