ASP.NET Calendar SelectedDates 屬性

<script language="VB" runat="server">
Sub Change(obj As Object, e As EventArgs)
??Dim i As Integer
??For i = 0 To Cal1.SelectedDates.Count - 1
????Response.Write(Cal1.SelectedDates(i).ToShortDateString())
????Response.Write("<br />")
??Next i
End Sub
</script>

<form runat="server">
<asp:Calendar id="cal1" runat="server"
SelectionMode="DayWeekMonth"
OnSelectionChanged="Change" />
</form>