Я только что скачал исходный код и создал новое приложение для формы Windows с этим в нем:
Private Sub DayView1_NewAppointment(ByVal sender As System.Object, ByVal args As Calendar.NewAppointmentEventArgs) Handles DayView1.NewAppointment
Dim appointment As New Calendar.Appointment
With appointment
.StartDate = args.StartDate
.EndDate = args.EndDate
.Title = args.Title
End With
End Sub
Это просто работает, должно быть что-то еще в вашем проекте, вызывающее эту ошибку, свойства, которые вы упомянули, безусловно доступны для записи ..... нет ничего, что вы определили, что могло бы конфликтовать с именем Calendar.Appointment
есть?
Также вы получаете больше ошибок?