Asp Control ASP.Net

<%@ Page Language=VB Debug=true %>

Sub Page_Load(ByVal Sender as Object, ByVal E as EventArgs)
    If Not IsPostBack Then
        MyCal.SelectedDate = DateAdd( _
            Microsoft.VisualBasic.DateInterval.Month, 2, Today())
        MyCal.VisibleDate = DateAdd( _
            Microsoft.VisualBasic.DateInterval.Month, 2, Today())
    End If
End Sub



Displaying a Date in the Calendar Control



Select a Date



    id="Mycal" 
    runat="server"
    cellpadding="3"
    cellspacing="3"
/>