يا ريت احد الاخوة الاعزاء يساعدني في شرح هذا الخاص الcalendar
Sub Calendar1_DayRender(sender As Object, e As DayRenderEventArgs)
Dim d as CalendarDay
Dim c as TableCell
d = e.Day
c = e.Cell
If d.IsOtherMonth Then
c.Controls.Clear
Else
Try
Dim Hol As String = holidays(d.Date.Month,d.Date.Day)
If Hol <> "" Then
c.Controls.Add(new LiteralControl("<br>" + Hol))
End If
Catch exc as Exception
Response.Write (exc.ToString())
End Try
End If
End Subانا بالانتظار في فارغ الصبر
