Dueling Calendar Controls...

[lorena]

I have a form which uses (or tries to use) two separate calendar controls. The user needs to be able to select different dates for 2 different locations. My problem is that the calendar events are some how interrelated and I have to click several times to the the selection in the second calendar to display (I have the controls set up to write the selected dates to associated textboxes). Is it not possible to use two calendar controls? If it is possible, how do I separate the events.

Here is my code:

(Both controls use this event to prevent users from selecting a date that is in the past)

Sub DayRender(ByVal source As Object, ByVal e As DayRenderEventArgs)

If e.Day.Date < Now.Date Then

e.Day.IsSelectable = False

End If

End Sub

 

Private Sub calP1_SelectionChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles calP1.SelectionChanged

txtP1_Date.Text = calP1.SelectedDate

End Sub

 

Private Sub calP3_SelectionChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles calP1.SelectionChanged

txtP3_Date.Text = calP3.SelectedDate

End Sub

[bri189a]

Change

 

Private Sub calP3_SelectionChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles calP1.SelectionChanged

txtP3_Date.Text = calP3.SelectedDate

End Sub

 

TO

 

Private Sub calP3_SelectionChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles calP3.SelectionChanged

txtP3_Date.Text = calP3.SelectedDate

End Sub

[Joe Mamma]

Private Sub CalenderSelectionChanged(ByVal sender As Object, _ 
			ByVal e As System.EventArgs) Handles _
				calP1.SelectionChanged, _
				calP3.SelectionChanged 
if sender is calP1 then
	txtP1_Date.Text = calP1.SelectedDate
else
	txtP3_Date.Text = calP3.SelectedDate
end if
End Sub

[lorena]

Thanks! Man, I looked and looked at that code and it blew right by me :)