Сначала вы получите свой daa из базы данных, а затем напишите следующий код
Для каждого др. Как DataRow в dt.Rows
«CdrCalendar.SelectedDates.Add (Convert.ToDateTime (д-р ( "Start")))
'Convert.ToDateTime(ddlFromHours.SelectedItem.Text + " " + ddlAMPM.SelectedItem.Text).ToString("dd-MM-yyyy hh:mm tt")
If Convert.ToDateTime(dr("Start")).ToString("dd-MM-yyyy") <> Convert.ToDateTime(Date.Today).ToString("dd-MM-yyyy") Then
cdrCalendar.SelectedDates.Add(New RadDate(dr("Start"))) '(dr("Start")))
End If
Next